X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=CoreTools.hs;h=3bfe1a156dfc89826e6070d7255a854ad514add6;hb=83a9910bd8031fbce225992e432e7dfba73b5c0f;hp=988825509cd33be0b85f4c58d058ce1ba8edf9dc;hpb=aa23b0116eaf65b01499cd1eba93a92f7c8c36e8;p=matthijs%2Fmaster-project%2Fc%CE%BBash.git

diff --git a/CoreTools.hs b/CoreTools.hs
index 9888255..3bfe1a1 100644
--- a/CoreTools.hs
+++ b/CoreTools.hs
@@ -223,4 +223,4 @@ getLiterals :: CoreSyn.CoreExpr -> [CoreSyn.CoreExpr]
 getLiterals app@(CoreSyn.App _ _) = literals
   where
     (CoreSyn.Var f, args) = CoreSyn.collectArgs app
-    literals = filter (is_lit) args
\ No newline at end of file
+    literals = filter (is_lit) args