(defun read-tal-file-into-string (pathname) (read-string-from-file pathname :external-format :utf-8))