INT-CHAR has been removed from CL standard, it's not defined in SBCL. https://github.com/oldk1331/fricas/commit/92d0f44a486b7fe6b36e8e8a2ef87d35fe7f8abf.patch
diff --git a/src/interp/foam_l.lisp b/src/interp/foam_l.lisp index d9dceb91..bf89b50d 100644 --- a/src/interp/foam_l.lisp +++ b/src/interp/foam_l.lisp @@ -227,8 +227,8 @@ (defmacro |CharNE| (x y) `(CHAR/= (the |Char| ,x) (the |Char| ,y))) (defmacro |CharLower| (x) `(the |Char| (CHAR-DOWNCASE (the |Char| ,x)))) (defmacro |CharUpper| (x) `(the |Char| (CHAR-UPCASE (the |Char| ,x)))) -(defmacro |CharOrd| (x) `(CHAR-INT (the |Char| ,x))) -(defmacro |CharNum| (x) `(INT-CHAR (the |SInt| ,x))) +(defmacro |CharOrd| (x) `(CHAR-CODE (the |Char| ,x))) +(defmacro |CharNum| (x) `(CODE-CHAR (the |SInt| ,x))) (defmacro |SFlo0| () 0.0s0) (defmacro |SFlo1| () 1.0s0) -- 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.
