Changeset trunk,20 for trunk/matching.lisp
- Timestamp:
- 06/23/2007 07:46:22 PM (19 years ago)
- revision id:
- svn-v3-trunk0:2948df59-2b31-0410-8e06-c40c0b09d5b6:trunk:20
- File:
-
- 1 edited
-
trunk/matching.lisp (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/matching.lisp
r19 r20 1 ;(in-package #:dso-parse) 2 3 4 5 (defmacro while (cond &body body) 6 `(do () 7 ((not ,cond)) 8 ,@body)) 1 ;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp -*- 2 3 (in-package #:dso-parse) 4 5 9 6 10 7 (defmacro if-matches-parser (input parser (next match)
Note: See TracChangeset
for help on using the changeset viewer.
