X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=example.f;h=41993d73ba877de3f7c7c72491ecee6318a43d80;hb=a856c7d5b35de1b48bdd948186ec4a03f7c3685c;hp=2443f3264f6d852188f7249cfc1555b4f0539f84;hpb=055f2efc3011a2102125cd0001adcff1cc6feab9;p=rrq%2Fjonasforth.git diff --git a/example.f b/example.f index 2443f32..41993d7 100644 --- a/example.f +++ b/example.f @@ -1,3 +1,6 @@ +( vim: syntax=forth +) + : FIB ( n -- Fn ) 0 1 ( n a b ) 0 ( n a b i ) @@ -20,6 +23,6 @@ HELLO S" 10 FIB = " TELL 10 FIB .U -S" (Expected: 59)" TELL NEWLINE +SPACE S" (Expected: 59)" TELL NEWLINE TERMINATE