[Axiom-developer] [vmlisp.lisp] Remove the asec chunk and its documentation

[Bill Page]

Greg,

Did you verify that you can successfully build Axiom with this
modification to vmlisp.lisp.pamphlet?

Regards,
Bill Page.

On November 30, 2006 1:02 PM greg write:
> To: address@hidden
> Subject: [vmlisp.lisp] Remove the asec chunk and its documentation
> 
> 
> Changes 
> http://wiki.axiom-developer.org/axiom--test--1/src/interp/Vmli
> spLisp/diff
> --
> 
> ??changed:
>  
> -\subsection{The arc cotangent function}
> +\subsection{The cotangent function}
>  Contributed by Juergen Weiss from Arthur Norman's CCL.
> 
> --removed:
>  
> -\subsection{The arc cotangent function}
> -Contributed by Juergen Weiss from Arthur Norman's CCL.
> -<<asec>>=
> -#+:(or :cmu :akcl :gcl)
> -(defun asec (a)
> -  (if (and (a > -1.0) (a < 1.0))
> -    0.0
> -    (acos (/ 1.0 a))))
> -@
>  
> 
> --removed:
>  <<cot>>
> -<<asec>>
>  <<getCD>>
> 
> --
> forwarded from 
>
http://wiki.axiom-developer.org/axiom--test--1/src/interp/VmlispLisp#msg2006
address@hidden


On November 29, 2006 8:28 PM Vanuxem Gregory wrote:
> 
> Le mercredi 29 novembre 2006 à 15:25 -0500, Page, Bill a écrit :
> > On Wednesday, November 29, 2006 2:38 PM Vanuxem Gregory wrote:
> > > 
> > > Le mercredi 29 novembre 2006 à 18:18 +0100, Gabriel Dos 
> Reis a écrit :
> > > [...]
> > > 
> > > > vmlisp.lisp has become a kind of black hole attracting all
> > > > kinds of macros. 
> > > > 
> > > > We will make sure that that black hole stops growing, and in
> > > > particular there is only one symbol, dsetq and it is defined.
> > > 
> > > Since you speak about this, the 'asec' function in vmlisp.lisp is
> > > defined two times for gcl and cmucl. Kai Kaminski "literated" 
> > > this file some times ago, he probably fixed this issue.
> > > 
> > 
> > You should pull the updated source from the src link here:
> > 
> > http://wiki.axiom-developer.org/axiom--test--1/src/interp/VmlispLisp
> > 
> 
> I'm going to suppress the Juergen Weiss's asec definition.
> 
> And just for the fun, here is its definition :
> 
> #+:(or :cmu :akcl :gcl)
> (defun asec (a)
>   (if (and (a > -1.0) (a < 1.0))
>     0.0
>     (acos (/ 1.0 a))))
> 
> And no one sees the errors :-)
> 
> Greg
> 
>