[jackhill/mal.git] / impls / skew / step0_repl.sk

def READ(str string) string {
  return str
}

def EVAL(ast string, env StringMap<string>) string {
  return ast
}

def PRINT(exp string) string {
  return exp
}

def REP(str string) string {
  return PRINT(EVAL(READ(str), {}))
}

@entry
def main {
  var line string
  while (line = readLine("user> ")) != null {
    if line == "" { continue }
    printLn(REP(line))
  }
}
Commit	Line	Data
034e82ad DM	1	def READ(str string) string {
	2	return str
	3	}
	4
	5	def EVAL(ast string, env StringMap<string>) string {
	6	return ast
	7	}
	8
	9	def PRINT(exp string) string {
	10	return exp
	11	}
	12
	13	def REP(str string) string {
	14	return PRINT(EVAL(READ(str), {}))
	15	}
	16
	17	@entry
	18	def main {
	19	var line string
	20	while (line = readLine("user> ")) != null {
	21	if line == "" { continue }
	22	printLn(REP(line))
	23	}
	24	}