X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=forth.jl.git;a=blobdiff_plain;f=src%2Fforth.jl;h=877c2d2c7bed41cb1d3c81f9ace117be74f174a7;hp=9939c9c2e7ee2b8fbc856a68f3da4f0f1ad34396;hb=b5c0bc63b635d113a5fafacbf5c0c7634a9a3012;hpb=3a6f6d8ce275a51f67a8fde0a89ac9deb0020217

diff --git a/src/forth.jl b/src/forth.jl
index 9939c9c..877c2d2 100644
--- a/src/forth.jl
+++ b/src/forth.jl
@@ -1143,7 +1143,7 @@ CREATE_PRIM_CFA = defPrimWord("CREATE-PRIM", () -> begin
                         getString(addr, len), "\n",
                         "return NEXT\n",
                         "end")
-    func = eval(parse(expString))
+    func = eval(parse(exprString))
 
     pushPS(defPrim(func))
     return NEXT