Martin Rubey <[EMAIL PROTECTED]> writes:
> > Another posibility is to call replaceGoGetSlot to get real value.
This was easy enough. Given the time pressure, I hope it's acceptable:
Index: i-syscmd.boot
===================================================================
--- i-syscmd.boot (revision 405)
+++ i-syscmd.boot (working copy)
@@ -1794,6 +1794,9 @@
PAIRP ob =>
qcar := QCAR ob
qcdr := QCDR ob
+ (qcar = function newGoGet) =>
+ writifyInner replaceGoGetSlot qcdr
+
(name := spadClosure? ob) =>
d := writifyInner QCDR ob
nob := ['WRITIFIED_!_!, 'SPADCLOSURE, d, name]
(by the way, I think the QCDR in line -2 could be replaced by qcdr, couldn't
it?
In Sage they test this for every object: loads(dumps(obj)) or some such.
Martin
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups
"FriCAS - computer algebra system" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at
http://groups.google.com/group/fricas-devel?hl=en
-~----------~----~----~----~------~----~------~--~---
