Add scanner.lisp