aboutsummaryrefslogtreecommitdiff
path: root/src/interp/parsing.lisp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2012-05-12 03:11:52 +0000
committerdos-reis <gdr@axiomatics.org>2012-05-12 03:11:52 +0000
commitc849886ef096a445a65041c0e54ab02728b7b512 (patch)
treec8e791d6c78d6146c393d4e9358deb1f4aa3c725 /src/interp/parsing.lisp
parentd0c0f05a363c11d57c7d70baa224dccb92687ae3 (diff)
downloadopen-axiom-c849886ef096a445a65041c0e54ab02728b7b512.tar.gz
* interp/c-util.boot: Miscellaneous cleanup.
* interp/compiler.boot: Likewise. * interp/database.boot: Likewise. * interp/debug.lisp: Likewise. * interp/format.boot: Likewise. * interp/g-timer.boot: Likewise. * interp/ht-util.boot: Likewise. * interp/i-syscmd.boot: Likewise. * interp/macros.lisp: Likewise. * interp/monitor.lisp: Likewise. * interp/msgdb.boot: Likewise. * interp/newfort.boot: Likewise. * interp/nlib.lisp: Likewise. * interp/parsing.lisp: Likewise. * interp/pf2atree.boot: Likewise. * interp/pf2sex.boot: Likewise. * interp/posit.boot: Likewise. * interp/sfsfun.boot: Likewise. * interp/util.lisp: Likewise.
Diffstat (limited to 'src/interp/parsing.lisp')
-rw-r--r--src/interp/parsing.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/parsing.lisp b/src/interp/parsing.lisp
index aa53480a..658286e7 100644
--- a/src/interp/parsing.lisp
+++ b/src/interp/parsing.lisp
@@ -296,7 +296,7 @@ the stack, then stack a NIL. Return the value of prod."
(go top)))
(defun termchr () "Is CHR a terminating character?"
- (position (|currentChar|) " *,;<>()[]/\\"))
+ (|findChar| (|currentChar|) " *,;<>()[]/\\"))
(defun compfin () (or (|matchString| ")fin") (|matchString| ".FIN")))