Fix bad behavior of [ lo .. hi ]
syntax. Now [4..0] ==> [], not [0].
This commit is contained in:
parent
dea401b9f8
commit
028d2eca51
1 changed files with 1 additions and 1 deletions
|
@ -171,7 +171,7 @@ jsNil = "[\"Nil\"]"
|
|||
jsCons e1 e2 = jsList [ show "Cons", e1, e2 ]
|
||||
jsRange e1 e2 = (++"()") . jsFunc "" $
|
||||
assign "lo" e1 ++ assign "hi" e2 ++ assign "lst" jsNil ++
|
||||
"do{" ++ assign "lst" (jsCons "hi" "lst") ++ "}while(hi-->lo)" ++
|
||||
"if(lo<=hi){do{" ++ assign "lst" (jsCons "hi" "lst") ++ "}while(hi-->lo)}" ++
|
||||
ret "lst"
|
||||
|
||||
binop (o:p) e1 e2
|
||||
|
|
Loading…
Reference in a new issue