agussusahnti/fostr
1
0
Fork 0
forked from glen/fostr
Code Issues Pull Requests Projects Releases Wiki Activity

refactor: eliminate rule in desugar

Browse Source 
By using list wrap properly.
This commit is contained in:
Glen Whitney 2021-02-10 13:07:51 -08:00
parent 02cf762ac7
commit c516ed6d7f
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
trans/desugar.str
View File

@ -13,8 +13,7 @@ rules
*/
deISe: ISequence(Prior(l),x) -> Sequence(<conc>(l, [x]))
enList: x -> [x]
seqFlatten: Sequence(l) -> Sequence(<mapconcat(?Sequence(<id>) <+ enList)>l)
seqFlatten: Sequence(l) -> Sequence(<mapconcat(?Sequence(<id>) <+ ![<id>])>l)
strategies