diff --git a/javapool b/javapool new file mode 100755 index 0000000..c0c8501 --- /dev/null +++ b/javapool @@ -0,0 +1,2 @@ +#!/bin/sh +gforth ~nihilazo/javapool/main.fs diff --git a/main.fs b/main.fs index 8506501..30e74a5 100644 --- a/main.fs +++ b/main.fs @@ -231,7 +231,8 @@ S" you feel like throwing some stuff into the pool." set-message then draw-screen-name loop inc-y - then draw-tab-keys ; + draw-tab-keys + then ; \ draw-message draws the stored message on the screen. : draw-message ( x y -- x y )