implementation module ReadLine

import StdEnv

import code from "readLine.o"

readLine :: !String !Bool !*env -> (!String, !*env)
readLine s h e = code {
			ccall cleanReadLine "SI:S:A"
	}