Hi Alex,
Does this look like a reasonable way to create the "create-adder" function?
(de create-adder Args
(let
(N (car Args)
Adder (intern (pack "add-" N))
P
(list
'de
Adder
'(X)
(list '+ N 'X) ) )
(eval P)
Hi Kashyap,
> Does this look like a reasonable way to create the "create-adder" function?
>
> (de create-adder Args
>(let
> (N (car Args)
> Adder (intern (pack "add-" N))
> P
> (list
> 'de
> Adder
> '(X)
> (list
Super! - thank Alex.
On Fri, Feb 9, 2024 at 11:17 AM Alexander Burger
wrote:
> Hi Kashyap,
>
> > Does this look like a reasonable way to create the "create-adder"
> function?
> >
> > (de create-adder Args
> >(let
> > (N (car Args)
> > Adder (intern (pack "add-" N))
> >
