From 26fe6ead0205ea49bae55203197412816335cccc Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Roman=20Smr=C5=BE?= Date: Sat, 9 May 2026 21:00:33 +0200 Subject: Resolve DynVariable in eval function --- src/Script/Expr.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Script') diff --git a/src/Script/Expr.hs b/src/Script/Expr.hs index aae898a..3e56f8e 100644 --- a/src/Script/Expr.hs +++ b/src/Script/Expr.hs @@ -179,7 +179,7 @@ eval = \case val <- eval valExpr withVar name val $ eval expr Variable _ name -> evalSomeExpr name =<< lookupVar name - DynVariable _ _ name -> fail $ "ambiguous type of ‘" <> unpackFqVarName name <> "’" + DynVariable _ _ name -> evalSomeExpr name =<< lookupVar name FunVariable _ _ name -> evalSomeExpr name =<< lookupVar name OptVariable _ name -> maybe (return Nothing) (fmap Just . evalSomeExpr name) =<< tryLookupVar name ArgsReq (FunctionArguments req) efun -> do -- cgit v1.2.3