Cormullion solves food crisis with newLISP

For the Compleat Fan
Locked
Lutz
Posts: 5289
Joined: Thu Sep 26, 2002 4:45 pm
Location: Pasadena, California
Contact:

Cormullion solves food crisis with newLISP

Post by Lutz »

No more hungry newLISP porgrammers:

see here: http://newlisper.blogspot.com/

post from 2006-10-18

Lutz

pjot
Posts: 733
Joined: Thu Feb 26, 2004 10:19 pm
Location: The Hague, The Netherlands
Contact:

Post by pjot »

Looks very nice! ...but: is it working?
peter[~]$ ./render.lsp
sh: open: command not found
In the source, I see:

Code: Select all

(exec (string "open "(env "HOME") "/Desktop/noname.ps"))
In my Linux environment I do not have a command called 'open'...

Peter

cormullion
Posts: 2038
Joined: Tue Nov 29, 2005 8:28 pm
Location: latiitude 50N longitude 3W
Contact:

Post by cormullion »

really sorry about that, Peter. I had been browsing Lutz's PostScript.lsp code module, lifted out the bits which i could test on my MacOS machine and forgot that you'll probably need to go via GhostScript if you don't have a built-in PostScript interpreter.

lucky I'm not a developer ... :-)

Lutz
Posts: 5289
Joined: Thu Sep 26, 2002 4:45 pm
Location: Pasadena, California
Contact:

Post by Lutz »

For Windows change Cormullion's render function to this:

Code: Select all

(define (render)
    (write-file "noname.ps" 
        (append [text]%!PS-Adobe-3.1
%%Creator: newLISP
[/text] buffer "showpage" "\r\n")))
and use ghostscript for display of the generated postscript file.

enjoy the meal,

Lutz

newdep
Posts: 2038
Joined: Mon Feb 23, 2004 7:40 pm
Location: Netherlands

Post by newdep »

aaaa nice..... Now the only thing I need is "The CornFlakes" version ;-)
-- (define? (Cornflakes))

cormullion
Posts: 2038
Joined: Tue Nov 29, 2005 8:28 pm
Location: latiitude 50N longitude 3W
Contact:

Post by cormullion »

newdep wrote:aaaa nice..... Now the only thing I need is "The CornFlakes" version ;-)
Ha! But when did this obsession with cornflakes start? :-)

I think cornflakes will be difficult. Too much PostScript, and not enough newLISP...

Locked