diff options
| author | johnvg | 2002-06-17 11:29:50 +0000 |
|---|---|---|
| committer | johnvg | 2002-06-17 11:29:50 +0000 |
| commit | 2503354503ecdd697bb1dbea7c9fb8fee3f77ae6 (patch) | |
| tree | 3abf7a922862ca12c2c78a3fc03220290f8e9549 /frontend/utilities.dcl | |
| parent | removed hello and bye, replace testArgs by [] (diff) | |
removed ingnored !'s
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1097 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/utilities.dcl')
| -rw-r--r-- | frontend/utilities.dcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/frontend/utilities.dcl b/frontend/utilities.dcl index 8df39e2..1d3967b 100644 --- a/frontend/utilities.dcl +++ b/frontend/utilities.dcl @@ -65,7 +65,7 @@ map2St f l1 l2 st :== map2_st l1 l2 st app2St :: !(!.(.a -> .(.st -> (.c,.st))),!.(.e -> .(.st -> (.f,.st)))) !(.a,.e) !.st -> (!(.c,.f),!.st) -mapAppendSt :: !(.a -> .(.b -> (.c,.b))) ![.a] !u:[.c] !.b -> !(!u:[.c],!.b) +mapAppendSt :: !(.a -> .(.b -> (.c,.b))) ![.a] !u:[.c] !.b -> (!u:[.c],!.b) strictMap :: !(.a -> .b) ![.a] -> [.b] |