add annotation param to Expr

nightmare breaking changes. never listening to the "i'll do it later if i REALLY need it" part of my brain again.

add annotation param to Expr

src/Core2Core.hs

@@ -0,0 +1,14 @@
+module Core2Core
+    (
+    )
+    where
+----------------------------------------------------------------------------------
+import Core.Syntax
+----------------------------------------------------------------------------------
+
+core2core :: Program -> Program
+core2core = undefined
+
+floatNonStrictCase :: Expr -> Expr
+floatNonStrictCase (Case e as) = Case e ()
+