Work in progress, recovered from old crybaby.

[sod] / src / hacks.lisp

(in-package #:sod)

(defun make-lexer (string)
  (make-instance 'sod-token-scanner
                 :char-scanner (make-string-scanner string)
                 :filename "<string>"))