<span lang="en-us"></span><span lang="en-us"></span><span lang="en-us"></span><span lang="en-us"></span><span lang="en-us"><font face="Arial" size="2">Hi Lou,<br>
<br>
|| Line 122 of matcher.lisp creates the matcher that your Lisp is complaining about:<br>
|| (def-matcher :bind (spec var)<br>
|| <br>
|| When file matcher.lisp is loaded it should be creating the :bind matcher (with this line).<br>
|| <br>
<br>
Yes that is the line;   I tried to eval that form directly and it gives the same error.<br>
<br>
|| The matcher is stored in the match-handler hash table, so as long as hash.lisp<br>
|| and matcher.lisp are loaded prior to the file that is giving you trouble the<br>
|| function that is causing you the trouble should be defined.<br>
|| <br>
|| Perhaps you could tell us your Lisp version and show us a longer transcript<br>
|| of the output of where the error is occurring so we can see what is prompting<br>
|| the error.<br>
<br>
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.<br>
<br>
|| <br>
|| Is matcher.lisp and hash.lisp loading w/o error and warning?<br>
|| What file is loading when you get the error? Do you know the line number<br>
|| or function that it dies on?<br>
|| <br>
|| Lou Vanek<br>
<br>
</font></span><span lang="en-us"><font face="Arial" size="2">hash.lisp loads fine.</font></span><br>
<span lang="en-us"><font face="Arial" size="2"><br>
matcher.lisp is causing problems - it is this function: at line# 122 in matcher.lisp that I have problems:<br>
----------------------------------------------<br>
(def-matcher :bind (spec var)<br>
  "The :bind matcher attempts to match MATCHER and bind whatever<br>
   MATCHER consumnd to VAR. group is equivalent to SPEC except the value<br>
   of matched when spec has matched will be bound to var."<br>
  (declare (special %bind-vars%))<br>
  (push var %bind-vars%)<br>
  (let ((spec-matcher (%make-matcher spec)))<br>
    (lambda (s k q)<br>
      (funcall spec-matcher s<br>
           (lambda (s. k. q.)<br>
         (declare (ignore k.))<br>
         ;; SPEC succeded, bind var<br>
         (funcall k (copy-state s. :bindings (cons (cons var (matched s.)) (bindings s.)))<br>
              k q.))<br>
           q))))<br>
-----------------------<br>
<br>
I tried to eval the </font></span><span lang="en-us"><font face="Arial" size="2">def-matcher </font></span><span lang="en-us"><font face="Arial" size="2">macro definition (which  evals fine)<br>
but then even when hand evaluating the above, I get the same error
"undefined function (setf it.bese.arnesi::get-match-handler) "<br>
It works find up until the above form is evaluated.<br>
<br>
---<br>
----<br>
<br>
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))<br>
<br>
<br>
I Change-Directory to the top level directory where I extracted the UCW box set, then did:<br>
<br>
1.  (load "start.lisp")<br>
<br>
2.  First problem was easier to fix:  I had problems w/ with-unique-names, <br>
</font></span><span lang="en-us"><font face="Arial" size="2">=> caused by compiling: arnesi_dev\src\one-liners.lisp  (which uses arnesi_dev\src\packages.fasl)<br> 
</font></span><span lang="en-us"><font face="Arial" size="2">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") ]<br>
<br>
3.  The above restart helps keep moving... but later when<br>
</font></span><span lang="en-us"><font face="Arial" size="2">=> ?fast loading: \arnesi_dev\src\matcher.fasl<br>
</font></span><span lang="en-us"><font face="Arial" size="2"> we get Error:  attempt to call the undefined function (setf it.bese.arnesi::get-match-handler)  at line #583-595<br>
(which I originally posted to start this thread).<br>
<br>
--- later on -- </font></span><span lang="en-us"></span><span lang="en-us"><font face="Arial" size="2">just for a test -- </font></span><br>
<span lang="en-us"><font face="Arial" size="2">4.  </font></span><span lang="en-us"><font face="Arial" size="2">see,<br>
</font></span><span lang="en-us"><font face="Arial" size="2">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...<br>
<br>
( 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)<br>
you will see near line #1151, I get an error that:<br>
<br>
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,<br>
<br>
<br>
<br>
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.<br>
<br>
<br>
</font></span>