diff options
Diffstat (limited to 'input.e')
| -rw-r--r-- | input.e | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/input.e b/input.e index a9e73cb..41a2b8c 100644 --- a/input.e +++ b/input.e @@ -236,7 +236,7 @@ ~ an error, just clean up and take no action. dup { swap ~ (metadata pointer, destination length, destination start) - { 3 ndup 3roll buffer-file-descriptor @ sys-read + { 3 ndup 3roll buffer-file-descriptor @ 3unroll swap sys-read ~ (metadata pointer, destination length, destination start, ~ read result) dup 0 > { |