Bill Page wrote:
>
> Am (marginally) happier. :)
>
> On November 6, 2005 10:50 AM Tim Daly wrote:
> >
> > intloop () ==
> > mode := $intRestart
> > while mode = $intRestart repeat
> > resetStackLimits()
> > mode := CATCH($intTopLevel,
> > SpadInterpretStream(1, ["TIM", "DALY", "?"], true))
> >
> > Lisp:
> >
> > (defun intloop ()
> > (do ((mode $intRestart))
> > ((equal mode $intRestart))
> > (resetStackInitials)
> > (setq mode
> > (catch $intTopLevel (SpadInterpretStream 1 '("TIM" "DALY"
> > "?") t)))))
> >
If this is what you view as sugar coating, then why not write all Spad code in
Lisp?
But even if it is sugar coating, don't we all like sweets (especially dentists)?
I would prefer the Boot version over the Lisp version 100 to 1 (even though I
don't follow either -- something like "blame TIM DALY if something goes
wrong"?). Let the computer perform the translation for me. Put the Boot version
in the pamphlet!
William
_______________________________________________
Axiom-developer mailing list
Axiom-developer@nongnu.org
http://lists.nongnu.org/mailman/listinfo/axiom-developer
