Changeset 6286 for src/Pugs/Bind.hs

Timestamp:

08/16/05 19:26:48 (3 years ago)

Author:

autrijus

svk:copy_cache_prev:

8581

Message:

* Single-argument calls with object as the argument should

dispatch to method:

close $fh # same as $fh.close

Reported by Yiyi Hu.

Files:

• src/Pugs/Bind.hs (modified) (1 diff)

src/Pugs/Bind.hs

@@ -182 +182 @@
            -> MaybeError VCode -- ^ Returns either a new 'VCode' with all the
                                --     bindings in place, or an error message
+-- Special case: 'close $fh' should be bound as '$fh.close'
+bindParams sub Nothing [inv]
+    | (p:_) <- subParams sub, isInvocant p
+    = bindParams sub (Just inv) []
 bindParams sub invExp argsExp = do
     case bindSomeParams sub invExp argsExp of