diff options
author | pommicket <pommicket@gmail.com> | 2022-01-08 10:15:43 -0500 |
---|---|---|
committer | pommicket <pommicket@gmail.com> | 2022-01-08 10:15:43 -0500 |
commit | d74f349e27a1ba20bd549362f95915ee6d2dd9d1 (patch) | |
tree | 900ab7d53c215e47c5bfb83acea94e1c74e3a19e /04/in04 | |
parent | 262824b21491446bb20acba8be1054207b5f50f0 (diff) |
allow terms to be more complicated
Diffstat (limited to '04/in04')
-rw-r--r-- | 04/in04 | 7 |
1 files changed, 2 insertions, 5 deletions
@@ -15,8 +15,7 @@ function strlen local p p = s :strlen_loop - c = *1p - if c == 0 goto strlen_loop_end + if *1p == 0 goto strlen_loop_end p += 1 goto strlen_loop :strlen_loop_end @@ -24,9 +23,7 @@ function strlen function putc argument c - local p - p = &c - syscall(1, 1, p, 1) + syscall(1, 1, &c, 1) return function puts |