From 9f80c8b41ef2e42f9bc2cce0c2172e879d308dbc Mon Sep 17 00:00:00 2001 From: s-ol Date: Thu, 13 Feb 2020 10:07:05 +0100 Subject: no more @registry juggling --- core/invoke.moon | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'core/invoke.moon') diff --git a/core/invoke.moon b/core/invoke.moon index 9c324e1..5ec4a82 100644 --- a/core/invoke.moon +++ b/core/invoke.moon @@ -29,7 +29,7 @@ class op_invoke extends Action eval: (scope, tail) => L\trace "evaling #{@}" - args = L\push -> [L\push expr\eval, scope, @registry for expr in *tail] + args = L\push -> [L\push expr\eval, scope for expr in *tail] -- Const 'op', with @op with @op @@ -58,15 +58,15 @@ class fn_invoke extends Action for i=1,#params name = params[i]\getc! argm = tail[i] - fn_scope\set name, L\push argm\eval, outer_scope, @registry + fn_scope\set name, L\push argm\eval, outer_scope body = body\clone @tag - body\eval fn_scope, @registry + body\eval fn_scope class do_expr extends Action eval: (scope, tail) => - UpdateChildren [(expr\eval scope, @registry) or Const.empty! for expr in *tail] + UpdateChildren [(expr\eval scope) or Const.empty! for expr in *tail] { :op_invoke, :fn_invoke -- cgit v1.2.3