Problem with save
- Subject: Problem with save
- From: Robert Dodier
- Date: Sun, 11 Sep 2011 16:32:44 -0600
I've pushed the following patch, which solves this problem if I'm not mistaken.
best
Robert Dodier
diff --git a/src/dskfn.lisp b/src/dskfn.lisp
index 1ddd290..5ba9b37 100644
--- a/src/dskfn.lisp
+++ b/src/dskfn.lisp
@@ -42,7 +42,7 @@
(append (or iteml '(nil)) (cdr x)))))
(defmspec $save (form)
- (let ((*print-circle* nil)) ; $save stores Lisp expressions.
+ (let ((*print-circle* nil) (*print-level* nil) (*print-length*
nil)) ; $save stores Lisp expressions.
(dsksetup (cdr form) nil nil '$save)))
(defvar *macsyma-extend-types-saved* nil)