(let text (call read_text_file "program.phi")) (fn a (b c) (do )) (call println text)