shithub: MicroHs

Download patch

ref: 8693a0697d478761f316806f7f2b9e3cabf8f327
parent: e3c1cb70622bd54edef32414191a4898bb55b996
author: Lennart Augustsson <lennart.augustsson@epicgames.com>
date: Thu Feb 15 10:03:32 EST 2024

Remove some junk

--- a/Example.hs
+++ b/Example.hs
@@ -1,5 +1,4 @@
 module Example(fac, main) where
-import Prelude
 
 fac :: Int -> Int
 fac 0 = 1
@@ -7,8 +6,6 @@
 
 main :: IO ()
 main = do
-  --putStrLn $ "word size=" ++ show _wordSize ++ ", os=" ++ if _isWindows then "Windows" else "Unix-like"
-  let
-    rs = map fac [1,2,3,10]
+  let rs = map fac [1,2,3,10]
   putStrLn "Some factorials"
   print rs
--