@@ -190,5 +190,9 @@
 		true [ usage ]
 	]
 ]
 
-quit/return main args no
+success: main args no
+if eq? success true [
+	quit/return 0
+]
+quit/return 1