1
1
mirror of https://github.com/kanaka/mal.git synced 2024-11-10 12:47:45 +03:00
mal/chuck/step0_repl.ck
2016-08-06 17:47:13 +02:00

43 lines
537 B
Plaintext

// @import readline.ck
fun string READ(string input)
{
return input;
}
fun string EVAL(string input)
{
return input;
}
fun string PRINT(string input)
{
return input;
}
fun string rep(string input)
{
return input => READ => EVAL => PRINT;
}
fun void main()
{
int done;
while( !done )
{
Readline.readline("user> ") => string input;
if( input != null )
{
chout <= rep(input) + "\n";
}
else
{
true => done;
}
}
}
main();