Add missing bit to fill1_r instructions in set_return_code

4a55de0c · Camil Staps · 18acb60c · 4a55de0c
Verified Commit 4a55de0c authored Jan 19, 2021 by Camil Staps
--- a/Unix/set_return_code.icl
+++ b/Unix/set_return_code.icl
@@ -32,7 +32,7 @@ set_return_code_world_64 i world = code {
 	pop_b 1
 	pushI_a 0
 	or%
-	fill1_r _ 0 1 0 0
+	fill1_r _ 0 1 0 01
 .keep 0 2
 	fill_a 1 2
 	pop_a 2
@@ -46,7 +46,7 @@ set_return_code_world_32 i world = code {
 	:xxx
 	push_b_a 0
 	pop_b 1
-	fill1_r _ 0 1 0 0
+	fill1_r _ 0 1 0 01
 .keep 0 2
 	fill_a 1 2
 	pop_a 2