diff options
Diffstat (limited to 'stdlib.slip')
| -rw-r--r-- | stdlib.slip | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib.slip b/stdlib.slip index e73674e..107bb1f 100644 --- a/stdlib.slip +++ b/stdlib.slip @@ -22,8 +22,8 @@ (let sum (fix - (fn sum' ((Int ...) -> Int) ((Int ...) -> Int) - (fn vec (Int ...) Int + (fn sum' ((Vector (Int ...)) -> Int) ((Vector (Int ...)) -> Int) + (fn vec (Vector (Int ...)) Int (case vec ((h ..t) (+ h (sum' t))) (_ 0)) |