From 3a0446237e255e56202a4f1f9662da64b59a80ab Mon Sep 17 00:00:00 2001 From: Kartik Agaram Date: Wed, 22 May 2019 21:34:39 -0700 Subject: 5218 --- subx/056trace.subx | 2 +- subx/062write-stream.subx | 2 +- subx/064write-byte.subx | 2 +- subx/069allocate.subx | 2 +- subx/070new-stream.subx | 2 +- subx/072slice.subx | 2 +- subx/074print-int-decimal.subx | 2 +- subx/apps/assort | Bin 22506 -> 22514 bytes subx/apps/assort.subx | 2 +- subx/apps/crenshaw2-1 | Bin 19675 -> 19682 bytes subx/apps/crenshaw2-1b | Bin 20234 -> 20241 bytes subx/apps/dquotes | Bin 27186 -> 27193 bytes subx/apps/factorial | Bin 18591 -> 18598 bytes subx/apps/handle | Bin 19418 -> 19426 bytes subx/apps/handle.subx | 2 +- subx/apps/hex | Bin 22684 -> 22691 bytes subx/apps/pack | Bin 37316 -> 37323 bytes 17 files changed, 9 insertions(+), 9 deletions(-) (limited to 'subx') diff --git a/subx/056trace.subx b/subx/056trace.subx index cedc512a..5203f914 100644 --- a/subx/056trace.subx +++ b/subx/056trace.subx @@ -350,7 +350,7 @@ $_append-4:end: $_append-4:abort: # . _write(2/stderr, error) # . . push args - 68/push "stream overflow"/imm32 + 68/push "stream overflow\n"/imm32 68/push 2/imm32/stderr # . . call e8/call _write/disp32 diff --git a/subx/062write-stream.subx b/subx/062write-stream.subx index 92c67dc2..c4ec8db2 100644 --- a/subx/062write-stream.subx +++ b/subx/062write-stream.subx @@ -122,7 +122,7 @@ _write-stream: # fd : int, s : (address stream) -> $_write-stream:abort: # . _write(2/stderr, error) # . . push args - 68/push "_write-stream: failed to write to file"/imm32 + 68/push "_write-stream: failed to write to file\n"/imm32 68/push 2/imm32/stderr # . . call e8/call _write/disp32 diff --git a/subx/064write-byte.subx b/subx/064write-byte.subx index 606cc7d3..057b9164 100644 --- a/subx/064write-byte.subx +++ b/subx/064write-byte.subx @@ -243,7 +243,7 @@ $append-byte:end: $append-byte:abort: # . _write(2/stderr, error) # . . push args - 68/push "append-byte: out of space"/imm32 + 68/push "append-byte: out of space\n"/imm32 68/push 2/imm32/stderr # . . call e8/call _write/disp32 diff --git a/subx/069allocate.subx b/subx/069allocate.subx index ac491ac3..e262b4d5 100644 --- a/subx/069allocate.subx +++ b/subx/069allocate.subx @@ -177,7 +177,7 @@ allocate-region: # ad : (address allocation-descriptor), n : int -> new-ad : (a $allocate-region:abort: # . _write(2/stderr, error) # . . push args - 68/push "allocate-region: failed to allocate"/imm32 + 68/push "allocate-region: failed to allocate\n"/imm32 68/push 2/imm32/stderr # . . call e8/call _write/disp32 diff --git a/subx/070new-stream.subx b/subx/070new-stream.subx index 8a833581..b6934b1e 100644 --- a/subx/070new-stream.subx +++ b/subx/070new-stream.subx @@ -52,7 +52,7 @@ $new-stream:end: $new-stream:abort: # . _write(2/stderr, error) # . . push args - 68/push "new-stream: size too large"/imm32 + 68/push "new-stream: size too large\n"/imm32 68/push 2/imm32/stderr # . . call e8/call _write/disp32 diff --git a/subx/072slice.subx b/subx/072slice.subx index fb1d5394..6d8e174b 100644 --- a/subx/072slice.subx +++ b/subx/072slice.subx @@ -901,7 +901,7 @@ $slice-to-string:end: $slice-to-string:abort: # . _write(2/stderr, error) # . . push args - 68/push "slice-to-string: out of space"/imm32 + 68/push "slice-to-string: out of space\n"/imm32 68/push 2/imm32/stderr # . . call e8/call _write/disp32 diff --git a/subx/074print-int-decimal.subx b/subx/074print-int-decimal.subx index 04385795..3b4f4830 100644 --- a/subx/074print-int-decimal.subx +++ b/subx/074print-int-decimal.subx @@ -124,7 +124,7 @@ $print-int32-decimal:end: $print-int32-decimal:abort: # . _write(2/stderr, error) # . . push args - 68/push "print-int32-decimal: out of space"/imm32 + 68/push "print-int32-decimal: out of space\n"/imm32 68/push 2/imm32/stderr # . . call e8/call _write/disp32 diff --git a/subx/apps/assort b/subx/apps/assort index 9a0c6bbe..a330978f 100755 Binary files a/subx/apps/assort and b/subx/apps/assort differ diff --git a/subx/apps/assort.subx b/subx/apps/assort.subx index 988f9c1a..2350603b 100644 --- a/subx/apps/assort.subx +++ b/subx/apps/assort.subx @@ -885,7 +885,7 @@ $get-or-insert-segment:end: $get-or-insert-segment:abort: # . _write(2/stderr, error) # . . push args - 68/push "get-or-insert-segment: too many segments"/imm32 + 68/push "get-or-insert-segment: too many segments\n"/imm32 68/push 2/imm32/stderr # . . call e8/call _write/disp32 diff --git a/subx/apps/crenshaw2-1 b/subx/apps/crenshaw2-1 index 4c15f534..04957ac1 100755 Binary files a/subx/apps/crenshaw2-1 and b/subx/apps/crenshaw2-1 differ diff --git a/subx/apps/crenshaw2-1b b/subx/apps/crenshaw2-1b index 4f629ee2..660d69e9 100755 Binary files a/subx/apps/crenshaw2-1b and b/subx/apps/crenshaw2-1b differ diff --git a/subx/apps/dquotes b/subx/apps/dquotes index 1d5688e2..47b3b7d7 100755 Binary files a/subx/apps/dquotes and b/subx/apps/dquotes differ diff --git a/subx/apps/factorial b/subx/apps/factorial index af0ddc65..3c3942a3 100755 Binary files a/subx/apps/factorial and b/subx/apps/factorial differ diff --git a/subx/apps/handle b/subx/apps/handle index e1900e47..5b1156a6 100755 Binary files a/subx/apps/handle and b/subx/apps/handle differ diff --git a/subx/apps/handle.subx b/subx/apps/handle.subx index 39bbf501..f64d8ee1 100644 --- a/subx/apps/handle.subx +++ b/subx/apps/handle.subx @@ -231,7 +231,7 @@ lookup: # h : (handle T) -> EAX : (address T) $lookup:abort: # . _write(2/stderr, msg) # . . push args - 68/push "lookup failed"/imm32 + 68/push "lookup failed\n"/imm32 68/push 2/imm32/stderr # . . call e8/call _write/disp32 diff --git a/subx/apps/hex b/subx/apps/hex index 5bf09dcc..8a2f240a 100755 Binary files a/subx/apps/hex and b/subx/apps/hex differ diff --git a/subx/apps/pack b/subx/apps/pack index c72f538a..fed8a27f 100755 Binary files a/subx/apps/pack and b/subx/apps/pack differ -- cgit 1.4.1-2-gfad0