diff --git a/subx/056write.subx b/subx/056write.subx
index aaf04b9d..f8e32fb2 100644
--- a/subx/056write.subx
+++ b/subx/056write.subx
@@ -54,8 +54,8 @@ write:  # f : fd or (address stream), s : (address array byte) -> <void>
   81          7/subop/compare     1/mod/*+disp8   4/rm32/sib    5/base/EBP  4/index/none  .           .           8/disp8         0x08000000/imm32  # compare *(EBP+8)
   7f/jump-if-greater  $write:else/disp8
     # push args
-  ff          6/subop/push        1/mod/*+disp8   4/rm32/sib    5/base/EBP  4/index/none  .           .           8/disp8         .                 # push *(EBP+8)
   ff          6/subop/push        1/mod/*+disp8   4/rm32/sib    5/base/EBP  4/index/none  .           .           0xc/disp8       .                 # push *(EBP+12)
+  ff          6/subop/push        1/mod/*+disp8   4/rm32/sib    5/base/EBP  4/index/none  .           .           8/disp8         .                 # push *(EBP+8)
     # call
   e8/call  _write/disp32
     # discard args
diff --git a/subx/apps/crenshaw2-1 b/subx/apps/crenshaw2-1
index 52814a1d..840b93b4 100755
Binary files a/subx/apps/crenshaw2-1 and b/subx/apps/crenshaw2-1 differ
diff --git a/subx/apps/crenshaw2-1.subx b/subx/apps/crenshaw2-1.subx
index 2d7921ce..6678f599 100644
--- a/subx/apps/crenshaw2-1.subx
+++ b/subx/apps/crenshaw2-1.subx
@@ -50,36 +50,36 @@ abort:  # s : (address array byte) -> <void>
 
 # print out "Error: #{s} expected\n" to stderr
 error:  # s : (address array byte) -> <void>
-  # _write(2/stderr, "Error: ")
+  # write(2/stderr, "Error: ")
     # push args
   68/push  "Error: "/imm32
   68/push  2/imm32/stderr
     # call
-  e8/call  _write/disp32
+  e8/call  write/disp32
     # discard arg
   81          0/subop/add         3/mod/direct    4/rm32/ESP    .           .             .           .           .               8/imm32           # add to ESP
-  # _write(2/stderr, s)
+  # write(2/stderr, s)
     # push args
   ff          6/subop/push        1/mod/*+disp8   4/rm32/sib    4/base/ESP  4/index/none  .           .           4/disp8         .                 # push *(ESP+4)
   68/push  2/imm32/stderr
     # call
-  e8/call  _write/disp32
+  e8/call  write/disp32
     # discard arg
   81          0/subop/add         3/mod/direct    4/rm32/ESP    .           .             .           .           .               8/imm32           # add to ESP
-  # _write(2/stderr, " expected")
+  # write(2/stderr, " expected")
     # push args
   68/push  " expected"/imm32
   68/push  2/imm32/stderr
     # call
-  e8/call  _write/disp32
+  e8/call  write/disp32
     # discard arg
   81          0/subop/add         3/mod/direct    4/rm32/ESP    .           .             .           .           .               8/imm32           # add to ESP
-  # _write(2/stderr, "\n")
+  # write(2/stderr, "\n")
     # push args
   68/push  Newline/imm32
   68/push  2/imm32/stderr
     # call
-  e8/call  _write/disp32
+  e8/call  write/disp32
     # discard arg
   81          0/subop/add         3/mod/direct    4/rm32/ESP    .           .             .           .           .               8/imm32           # add to ESP
   # end
diff --git a/subx/apps/factorial b/subx/apps/factorial
index a1fa3905..26729183 100755
Binary files a/subx/apps/factorial and b/subx/apps/factorial differ