It is possible to track GC time in SBCL via variable
sb-ext:*gc-run-time* .
As for backwards compatibility, this variable is confirmed to
exist in sbcl-1.1.1.
- Qian
=====
diff --git a/src/lisp/fricas-lisp.lisp b/src/lisp/fricas-lisp.lisp
index a904f5be..426c53be 100644
--- a/src/lisp/fricas-lisp.lisp
+++ b/src/lisp/fricas-lisp.lisp
@@ -1154,7 +1154,9 @@ with this hack and will try to convince the GCL
crowd to fix this.
#+:GCL
(defmacro |elapsedGcTime| () '(system:gbc-time))
-#-:GCL
+#+:SBCL
+(defmacro |elapsedGcTime| () 'sb-ext:*gc-run-time*)
+#-(or :GCL :SBCL)
(defmacro |elapsedGcTime| () '0)
(defmacro |char| (arg)
--
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 fricas-devel+unsubscr...@googlegroups.com.
To view this discussion on the web visit
https://groups.google.com/d/msgid/fricas-devel/a14079c3-313e-49d1-9a9b-3a37cb34d716%40gmail.com.
