st/lama_byterun
1
0
Fork 0
mirror of https://github.com/ProgramSnail/Lama.git synced 2025-12-06 06:48:48 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Cosmetics; probably a fix for regexps

Browse source
This commit is contained in:
Dmitry Boulytchev 2020-05-04 02:45:34 +03:00
parent 423e4e7724
commit 9d0b8e811a
6 changed files with 72 additions and 54 deletions
Download patch file Download diff file Expand all files Collapse all files

5
stdlib/Collection.lama
View file

@ -310,9 +310,10 @@ public fun lookupMemo (m, v) {
case v of
#string -> m ::= addMap (deref (m), v, v); v
| _ ->
local vc = clone (v), i = case vc of #fun -> 1 | _ -> 0 esac;
local vc = clone (v), i = case vc of #fun -> 1 | _ -> 0 esac;
for skip, i < v.length, i := i + 1 do
vc [i] := lookupMemo (m, vc [i])
local vci = lookupMemo (m, vc [i]);
vc [i] := vci
od;
m ::= addMap (deref (m), vc, vc);
vc