Thanks a million, quite embarassing. Martin
"Bill Page" <[EMAIL PROTECTED]> writes: > On Thu, Oct 9, 2008 at 2:04 PM, Martin Rubey wrote: > >... > > Modified: trunk/src/interp/i-syscmd.boot > > =================================================================== > > --- trunk/src/interp/i-syscmd.boot 2008-10-08 22:18:29 UTC (rev 406) > > +++ trunk/src/interp/i-syscmd.boot 2008-10-09 18:04:12 UTC (rev 407) > > @@ -1794,8 +1794,10 @@ > > PAIRP ob => > > qcar := QCAR ob > > qcdr := QCDR ob > > + (qcar = function newGoGet) => > > + writifyInner replaceGoGetSlot qcdr > > (name := spadClosure? ob) => > > - d := writifyInner QCDR ob > > + d := writifyInner qcdr ob > > nob := ['WRITIFIED_!_!, 'SPADCLOSURE, d, name] > > HPUT($seen, ob, nob) > > HPUT($seen, nob, nob) > > @@ -1883,6 +1885,7 @@ > > spadClosure? ob == > > fun := QCAR ob > > not (name := BPINAME fun) => nil > > + name = "WRAPPED" => nil > > vec := QCDR ob > > not VECP vec => nil > > name > > > > Shouldn't this be: > > > - d := writifyInner QCDR ob > > + d := writifyInner qcdr > > Or did I misunderstand the intended change? > > Regards, > Bill Page. --~--~---------~--~----~------------~-------~--~----~ 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 -~----------~----~----~----~------~----~------~--~---
