evalNativeFunc Eval p@ProgramState { programStack = prog, dataStack = ((ForthLambda l):datast) } = Right $ p { programStack = l ++ prog, dataStack = datast }
evalNativeFunc Eval p@ProgramState { programStack = prog, dataStack = ((ForthLambda l):datast) } = Right $ p { programStack = l ++ prog, dataStack = datast }
evalNativeFunc Eval p@ProgramState { programStack = prog, dataStack = ((ForthLambda l):datast) } = Right $ p { programStack = l ++ prog, dataStack = datast }