summaryrefslogtreecommitdiffstats
path: root/buffer.sml
diff options
context:
space:
mode:
authorRose Hogenson <rosehogenson@posteo.net>2024-05-05 21:12:16 -0700
committerRose Hogenson <rosehogenson@posteo.net>2024-05-05 21:12:16 -0700
commit457c482397e2ca745067e5a3ef2c7d71d7daf187 (patch)
treeaef2b8d88421829105a3c6b8887d8ffde39d5e1e /buffer.sml
parent048895eb0c85b591b2dd338dd06514bc1b18bacb (diff)
downloadsml-457c482397e2ca745067e5a3ef2c7d71d7daf187.tar.zst
Add tuples.
Diffstat (limited to 'buffer.sml')
-rw-r--r--buffer.sml2
1 files changed, 1 insertions, 1 deletions
diff --git a/buffer.sml b/buffer.sml
index 19cd99a..054f29c 100644
--- a/buffer.sml
+++ b/buffer.sml
@@ -9,7 +9,7 @@ struct
if i + aLen + bLen <= baseLen
then
(Word8ArraySlice.copy { src = b, dst = base, di = i + aLen } ;
- Word8ArraySlice.slice (base, i, SOME (aLen + bLen)))
+ Word8ArraySlice.slice (base, i, SOME (aLen + bLen)))
else
let val newBuf = Word8Array.array (baseLen * 2 + bLen, Word8.fromInt 0)
in