Provide a possible L3 translation for parallel tuples

iu-parfunc · Feb 16, 2024 · 91ed31e · 91ed31e
1 parent 1bd31be
commit 91ed31e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/gibbon-compiler/src/Gibbon/Passes/DirectL3.hs b/gibbon-compiler/src/Gibbon/Passes/DirectL3.hs
@@ -72,7 +72,7 @@ directL3 prg@(Prog ddfs fndefs mnExp) = do
           in go env2 ex'
         Ext (AddFixed{}) -> error "directL3: AddFixed not handled."
         Ext (StartOfPkdCursor{}) -> error "directL3: StartOfPkdCursor not handled."
-        ParE{}  -> error "directL3: todo ParE"
+        ParE e1 e2 -> ParE (go env2 e1) (go env2 e2)
         MapE{}  -> error "directL3: todo MapE"
         FoldE{} -> error "directL3: todo FoldE"