+9

src/std/core.zig

reviewed

··· 30 30 try scope.insert("and", try Value.initNativeFunc(scope, @"and")); 31 31 try scope.insert("or", try Value.initNativeFunc(scope, @"or")); 32 32 33 33 + try scope.insert("eval", try Value.initNativeFunc(scope, eval)); 33 34 try scope.insert("set", try Value.initNativeFunc(scope, set)); 34 35 try scope.insert("print", try Value.initNativeFunc(scope, print)); 35 36 try scope.insert("floop", try Value.initNativeFunc(scope, floop)); ··· 243 244 } 244 245 245 246 // -- FUNCTIONS -- 247 247 + 248 248 + pub fn eval(scope: *Scope, args: []const *Value) RuntimeError!*Value { 249 249 + if (args.len != 1) { 250 250 + return error.InvalidArguments; 251 251 + } 252 252 + 253 253 + return scope.evalExpr(args[0]); 254 254 + } 246 255 247 256 pub fn set(scope: *Scope, args: []const *Value) RuntimeError!*Value { 248 257 var iter = SliceIterator(*Value).init(args);

+2 -8

src/test/test7.zexa

reviewed

··· 1 1 - (print "Hello World!") 2 2 - 3 3 - ;; (set 'double (lambda (x) 4 4 - ;; (mul x 2))) 5 5 - 6 6 - 7 7 - (while #t 8 8 - (rejfr)) 1 1 + (print "hello world") 2 2 + (undefined-function)