msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

the variable labeling should start with 0.

Browse Source
This commit is contained in:
krangelov
2021-12-03 15:00:04 +01:00
parent 348963d13c
commit 655576c291
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/compiler/GF/Compile/Compute/Concrete.hs
View File

@@ -641,7 +641,7 @@ getVariables = EvalM $ \gr k mt r -> do
Ok ts -> length ts
Bad msg -> error msg
params <- metas2params gr tnks
return ((i,range):params)
return ((i-1,range):params)
_ -> metas2params gr tnks
getRef tnk = EvalM $ \gr k mt r -> readSTRef tnk >>= \st -> k st mt r