;; Testing read-string, eval and slurp

(read-string "(+ 2 3)")
;=>(+ 2 3)

(eval (read-string "(+ 2 3)"))
;=>5

;;; TODO: fix newline matching so that this works
;;;(slurp "../tests/test.txt")
;;;;=>"A line of text\n"


;; Testing load-file

(load-file "../tests/inc.mal")
(inc1 7)
;=>8
(inc2 7)
;=>9
(inc3 9)
;=>12

;;
;; -------- Optional Functionality --------

(load-file "../tests/incB.mal")
; "incB.mal finished"
;=>"incB.mal return string"
(inc4 7)
;=>11
(inc5 7)
;=>12