From aa161777510728c94e51e9ef1d6df4146d7d952b Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Mon, 24 Feb 2025 22:08:35 +0100
Subject: Scalar unification for variables in expansion

---
 src/Parser/Expr.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Parser/Expr.hs')

diff --git a/src/Parser/Expr.hs b/src/Parser/Expr.hs
index bc16149..9966d6f 100644
--- a/src/Parser/Expr.hs
+++ b/src/Parser/Expr.hs
@@ -89,7 +89,7 @@ someExpansion = do
         [do off <- stateOffset <$> getParserState
             sline <- getSourceLine
             name <- VarName . TL.toStrict <$> takeWhile1P Nothing (\x -> isAlphaNum x || x == '_')
-            lookupVarExpr off sline name
+            lookupScalarVarExpr off sline name
         , between (char '{') (char '}') someExpr
         ]
 
-- 
cgit v1.2.3