diff --git a/asm/io.asm b/asm/io.asm
index 201e5220..a507e9a5 100644
--- a/asm/io.asm
+++ b/asm/io.asm
@@ -296,7 +296,7 @@ POP_INPUT_SOURCE
 ; handle errors returned by open,
 ; close, and chkin. If ioresult is
 ; nonzero, print error message and
-; abort.
+; throw -37.
     +BACKLINK "ioabort", 7
 IOABORT ; ( ioresult -- )
     inx