diff options
| author | Drahflow <drahflow@gmx.de> | 2013-10-22 22:53:25 +0200 |
|---|---|---|
| committer | Drahflow <drahflow@gmx.de> | 2013-10-22 22:53:25 +0200 |
| commit | 36db2558acb7fee6f4e575963b340bdd76143045 (patch) | |
| tree | 6e1e3a8169f9a8a090cdaba65922fc31a82e21c8 /compiler/standardClient.ey | |
| parent | 8ab3918f89bc537bdbdf2d400535c97cacf2dbb8 (diff) | |
Can now retype functions
Diffstat (limited to 'compiler/standardClient.ey')
| -rw-r--r-- | compiler/standardClient.ey | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/compiler/standardClient.ey b/compiler/standardClient.ey index efe7298..8e7a3a9 100644 --- a/compiler/standardClient.ey +++ b/compiler/standardClient.ey @@ -502,8 +502,8 @@ # Returns an array which lists the sequence of curried arguments # i.e. if f: A -> B -> C -> D -> E the result will be [ A B C D ] { ==object - { "unknown type in typeStack" die } ==unknown - { "invalid type in typeStack" die } ==invalid + { object dump "unknown type in typeStack" die } ==unknown + { object dump "invalid type in typeStack" die } ==invalid { [ object 0 1 neg ] } ==literal object sys .typed .type [ @@ -576,7 +576,7 @@ { 2 laterType * 1 neg neq } { laterType 1 } - # General integers go-iterate iff they binary and results in non-zero + # General integers co-iterate iff their binary and results in non-zero { 0 earlierType * 0 laterType * band 0 neq } { earlierType 1 } |
