X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;ds=sidebyside;f=example.f;h=41993d73ba877de3f7c7c72491ecee6318a43d80;hb=55d4cc10bbfa7bc445948b222b6a72d2d4b127a2;hp=2443f3264f6d852188f7249cfc1555b4f0539f84;hpb=a6faff31f03d96b6a62188f330848004119d5165;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