On 07/17/2018 07:41 PM, Waldek Hebisch wrote:
Bill Page wrote:
On Sun, Jul 15, 2018 at 6:37 PM, Bill Page <[email protected]> wrote:
It seems that UNTRACE-2 was replaced by untrace2 in this commit
https://github.com/fricas/fricas/commit/546108f1b65acadc38fc7d243b1b29770b6a770a
https://github.com/fricas/fricas/blame/546108f1b65acadc38fc7d243b1b29770b6a770a/src/interp/trace.boot#L387
but apparently this reference to UNTRACE-2 was missed.
On Sun, Jul 15, 2018 at 5:31 PM, Raymond Rogers <[email protected]>
wrote:
Found the call to UNTRACE-2
Overall examining make.lst is pretty depressing. If nobody is going to fix (or
explain) this then I will try another lisp.
I don't think there is anything wrong with your lisp or with your
compiled version of FriCAS.
Here is a patch for the UNTRACE-2 problem:
--
diff --git a/src/interp/slam.boot b/src/interp/slam.boot
index 3787ae0d..26208d5b 100644
--- a/src/interp/slam.boot
+++ b/src/interp/slam.boot
@@ -288,7 +288,7 @@ mkCacheVec(op,nam,kind,resetCode,countCode) ==
clearCache x ==
get(x,'localModemap,$e) or get(x,'mapBody,$e) =>
for [map,:sub] in $mapSubNameAlist repeat
- map=x => _/UNTRACE_-2(sub,NIL)
+ map=x => untrace2(sub,[])
$e:= putHist(x,'localModemap,nil,$e)
$e:= putHist(x,'mapBody,nil,$e)
$e:= putHist(x,'localVars,nil,$e)
--
Good catch, please commit.
Patch worked for me. No side effects noted running a somewhat
complicated test case that had, occasionally, thrown this error. Of
course, if the fix merely fixed a warning/error perhaps it should still
be there in a more suitable manner. Since that didn't happen I don't
know if I fixed the invocation or the invocation was just the result of
internal checking. (:
Ray
--
You received this message because you are subscribed to the Google Groups "FriCAS -
computer algebra system" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
To post to this group, send email to [email protected].
Visit this group at https://groups.google.com/group/fricas-devel.
For more options, visit https://groups.google.com/d/optout.
