Commit 1207b7c5 authored by bbr's avatar bbr
Browse files

white spaces

parent bcd7d35f
......@@ -338,7 +338,7 @@ addExec (aux1,aux2) opts (Prog m is ts funcs ops) =
where
a1 = (m,aux1)
a2 = (m,aux2)
calla1 t = if debug opts
calla1 t = if debug opts
then Comb FuncCall ("Oracle","oracle") [Comb (FuncPartCall 1) a1 []]
else Comb FuncCall a1 []
printIO = ("Interactive","printIO")
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment