File: packages.lisp

package info (click to toggle)
cl-lexer 1-5
  • links: PTS
  • area: main
  • in suites: stretch
  • size: 88 kB
  • sloc: lisp: 160; makefile: 52; sh: 28
file content (13 lines) | stat: -rwxr-xr-x 354 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
;;; -*- Mode: Lisp; Syntax: Common-Lisp; Base: 10 -*-

(defpackage "LEXER"
#+:Genera  (:use COMMON-LISP CLOS REGEX)
#-:Genera  (:use COMMON-LISP REGEX)
  (:export "TOKENIZE" "DEFLEXER"
   "%N" "%0" "%1" "%2" "%3" "%4" "%5" "%6" "%7" "%8" "%9" "%10"
   "NUM" "INT" "NEXTCH" "UNGETCH"
   ))

(defun delete-lexer ()
  (delete-package :LEXER))