8 lines
279 B
Agda
8 lines
279 B
Agda
module Node
|
|
|
|
import Prelude
|
|
|
|
pfunc fs : JSObject := `require('fs')`
|
|
pfunc getArgs : List String := `arrayToList(String, process.argv)`
|
|
pfunc readFile uses (MkIORes) : (fn : String) -> IO String := `(fn) => (w) => Prelude_MkIORes(null, require('fs').readFileSync(fn, 'utf8'), w)`
|