add namespaces to names

aoc2023/Lib.newt

@@ -62,10 +62,10 @@ data IO : U -> U where
   MkIO : {a : U} -> (World -> Pair World a) -> IO a
 
 -- TODO unified Number for now
-ptype Int
-ptype String
 
-ptype Char
+
+
+
 
 ptype Array : U -> U
 

aoc2023/Node.newt

@@ -4,4 +4,4 @@ import Prelude
 
 pfunc fs : JSObject := `require('fs')`
 pfunc getArgs : List String := `arrayToList(String, process.argv)`
-pfunc readFile uses (fs) : (fn : String) -> IO String := `(fn) => (w) => MkIORes(Unit, fs.readFileSync(fn, 'utf8'), w)`
+pfunc readFile uses (fs MkIORes Unit) : (fn : String) -> IO String := `(fn) => (w) => MkIORes(Unit, fs.readFileSync(fn, 'utf8'), w)`