[Bese-devel] Re: UCW box-set - undefined-function error get it.bese.arnesi::get-match-handler

[Tom Popovich]

Hi Lou,

|| Line 122 of matcher.lisp creates the matcher that your Lisp is
complaining about:
|| (def-matcher :bind (spec var)
||
|| When file matcher.lisp is loaded it should be creating the :bind matcher
(with this line).
||

Yes that is the line;   I tried to eval that form directly and it gives the
same error.

|| The matcher is stored in the match-handler hash table, so as long as
hash.lisp
|| and matcher.lisp are loaded prior to the file that is giving you trouble
the
|| function that is causing you the trouble should be defined.
||
|| Perhaps you could tell us your Lisp version and show us a longer
transcript
|| of the output of where the error is occurring so we can see what is
prompting
|| the error.

WHAT LISP:  I was using Allegro version 8.0 on Windows (modern image version
- the one w/ case sensitive symbol names) - its called mlisp.exe they also
have alisp.exe that uppercases all symbol names.

||
|| Is matcher.lisp and hash.lisp loading w/o error and warning?
|| What file is loading when you get the error? Do you know the line number
|| or function that it dies on?
||
|| Lou Vanek

hash.lisp loads fine.

matcher.lisp is causing problems - it is this function: at line# 122 in
matcher.lisp that I have problems:
----------------------------------------------
(def-matcher :bind (spec var)
  "The :bind matcher attempts to match MATCHER and bind whatever
   MATCHER consumnd to VAR. group is equivalent to SPEC except the value
   of matched when spec has matched will be bound to var."
  (declare (special %bind-vars%))
  (push var %bind-vars%)
  (let ((spec-matcher (%make-matcher spec)))
    (lambda (s k q)
      (funcall spec-matcher s
           (lambda (s. k. q.)
         (declare (ignore k.))
         ;; SPEC succeded, bind var
         (funcall k (copy-state s. :bindings (cons (cons var (matched s.))
(bindings s.)))
              k q.))
           q))))
-----------------------

I tried to eval the def-matcher macro definition (which  evals fine)
but then even when hand evaluating the above, I get the same error
"undefined function (setf it.bese.arnesi::get-match-handler) "
It works find up until the above form is evaluated.

---
----

High-Level steps that I did (and corresponding line number in the attached
log of my complete REPL session:  See file REPL_last_run_attempt.txt.gz.uu
(uuencoded gzip-ed text file copied from xemacs slime buffer))


I Change-Directory to the top level directory where I extracted the UCW box
set, then did:

1.  (load "start.lisp")

2.  First problem was easier to fix:  I had problems w/ with-unique-names,
=> caused by compiling: arnesi_dev\src\one-liners.lisp  (which uses
arnesi_dev\src\packages.fasl)
  so you will see I did a restart to "use cl-ppcre::with-unique-names" in
place of "it.bese.arnesi:with-unique-names"[SEE line #235-255 in the log
file where I redo  (load "start.lisp") ]

3.  The above restart helps keep moving... but later when
=> ?fast loading: \arnesi_dev\src\matcher.fasl
 we get Error:  attempt to call the undefined function (setf
it.bese.arnesi::get-match-handler)  at line #583-595
(which I originally posted to start this thread).

--- later on -- just for a test --
4.  see,
Near line 627,  I redid: (load "start.lisp")    ;;; this time choose "2:
[skip] skip loading C:\Documents and Settings\popovth\.lispbox\fasl\allegro-
8.0-mswindows-x86\tjp\lisp\ucw-boxset\arnesi_dev\src\matcher.fasl" and see
how far we get...

( I know the above is a little risky, but I did it just as a test to see how
far I can continue compiling UCW)
you will see near line #1151, I get an error that:

restart:#P'C:\\Documents and Settings\\popovth\\.lispbox\\fasl\\allegro-
m8.0-mswindows-x86\\tjp\\lisp\\ucw-boxset\\parenscript\\src\\js-html.fasl'
does not exist,



PS:  I am using the asdf setup that is done in "lispbox" which is what I
used to bootstrap my environment *but I am running a CVS copy of SLIME that
I pulled about Feb 2006.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/bese-devel/attachments/20060614/5ad3ef65/attachment.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: REPL_last_run_attempt.txt.gz.uu
Type: application/octet-stream
Size: 7987 bytes
Desc: not available
URL: <https://mailman.common-lisp.net/pipermail/bese-devel/attachments/20060614/5ad3ef65/attachment.obj>