git @ Cat's Eye Technologies Robin / 255a21e
Unused (now) function. Chris Pressey 5 years ago
1 changed file(s) with 0 addition(s) and 4 deletion(s). Raw diff Collapse all Expand all
1616 --
1717 -- Helper functions
1818 --
19
20 union (List []) env = env
21 union (List (binding:rest)) env =
22 append (List [binding]) (union (List rest) env)
2319
2420 evalAll i env [] acc cc =
2521 cc $ List $ reverse acc