fix a bug

This commit is contained in:
Koichi Nakamura 2021-01-12 11:36:49 +09:00
parent dfffc47d16
commit 32027f66f3

View file

@ -2543,6 +2543,7 @@ need-defined (read)
( === End of bootstrap === ) ( === End of bootstrap === )
:noname :noname
argc @ 1 < 2 if exit then
1 arg s" --version" 10 strneq if 1 arg s" --version" 10 strneq if
." PlanckForth " version type cr bye ." PlanckForth " version type cr bye
else 1 arg s" --runtime" 10 strneq if else 1 arg s" --runtime" 10 strneq if