Changeset 13770 for src/Pugs/Eval

Timestamp:

10/01/06 17:20:00 (2 years ago)

Author:

audreyt

Message:

* Remove support for reduce+posthyper form "[+]<<" because

as specced the hyper will recurse into arrays, so the reduce
never got a chance to run.

* Also add "Loop" as a subtype of "Block" (not used yet)

Files:

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

src/Pugs/Eval/Var.hs

@@ -410 +410 @@
         MFold           -> buildReduce varInfix MFold MNil MNil     -- [+]
         MScan           -> buildReduce varInfix MScan MNil MNil     -- [\+]
-        MFoldPost       -> buildReduce varInfix MFold MNil MPost    -- [+]
-        MScanPost       -> buildReduce varInfix MScan MNil MPost    -- [\+]
+--      MFoldPost       -> buildReduce varInfix MFold MNil MPost    -- [+]
+--      MScanPost       -> buildReduce varInfix MScan MNil MPost    -- [\+]
         MHyperFold      -> buildReduce varInfix MFold MHyper MNil   -- [>>+<<]
         MHyperScan      -> buildReduce varInfix MScan MHyper MNil   -- [>>+<<]
-        MHyperFoldPost  -> buildReduce varInfix MFold MHyper MPost  -- [>>+<<]
-        MHyperScanPost  -> buildReduce varInfix MScan MHyper MPost  -- [>>+<<]
+--      MHyperFoldPost  -> buildReduce varInfix MFold MHyper MPost  -- [>>+<<]
+--      MHyperScanPost  -> buildReduce varInfix MScan MHyper MPost  -- [>>+<<]
         _               -> return Nothing
         where