Changeset 12348 for src/Pugs/Eval

Timestamp:

08/17/06 04:33:10 (2 years ago)

Author:

audreyt

Message:

* Remove debug statements and reorg a bit.

Files:

• src/Pugs/Eval/Var.hs (modified) (1 diff)

src/Pugs/Eval/Var.hs

@@ -262 +262 @@
         -- get superclasses
         attrs <- fmap (fmap (filter (/= pkg) . nub)) $ findAttrs pkg
-        warn "ATTRS" attrs
         if isNothing attrs || null (fromJust attrs) then fmap (err NoMatchingMulti) (findSub' var) else do
         (`fix` (fromJust attrs)) $ \run pkgs -> do