msyds/gyehoek-hs
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

driverslop

Browse Source
This commit is contained in:
msyds committed 2026-07-06 05:01:34 -06:00
1 parent 51c86a12cc
commit b2d9a982ac
8 files changed
+68 -16
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

app/Gyehoek/CPS/Convert.hs
+2
View File
@@ -44,4 +44,6 @@ convert (Scm.ExpApply f xs) k =
m <- k (ValVar x)
pure $ ExpFix [(r, MkKappa [x] m)] $ ExpApply f' (xs' ++ [ValVar r])
convert (Scm.ExpBegin xs) k = _
convert _ k = _