Page 1 of 1

How to make newLISP quiet when it starts; start with ()

Posted: Fri May 15, 2009 4:53 pm
by scottmaccal
Hi all,

When I start newLISP from the shell, I'd like it to be quiet. No newLISP v.9.4.5 on BSD IPv4, execute 'newlisp -h' for more info message.

I would also like newLISP to start with () with the cursor in the middle.

Does newLISP use something similar to a .emacs?

What is the best way to make this modification.

Posted: Fri May 15, 2009 5:15 pm
by shercipher
You can turn off prompts with the -c option. Don't know how to get a () (I don't think readlines even supports that, emacs probably does). There doesn't seem to be a quiet or suppress option; that needs to be added.

Posted: Fri May 15, 2009 6:00 pm
by Lutz
There are support files for several editors here (including emacs support):

http://www.newlisp.org/index.cgi?Code_Contributions

There are also two functions to write more sophisticated REPL supoort in newLISP iself (newLISP 10.0 or later required):

http://www.newlisp.org/newlisp_manual.html#prompt-event

and here:

http://www.newlisp.org/newlisp_manual.h ... mand-event

The file newlisp-x.x.x/util/nls in the source distribution is a script showing how to use this functions and also includes command-line help. nls tries to combine the BASH shell with a newLISP REPL.

Cormullion from http://unbalanced-parentheses.nfshost.com has shown a few months back, how to build a repl using 'prompt-event' and 'command-event' which handles the entry of multi-line functions.

Last not least: on Mac OS X and other UNIX like OSs there is also support for .inputrc to customize for options from the linked in GNU readline library.

Posted: Fri May 15, 2009 6:08 pm
by cormullion
Lutz wrote:Cormullion from http://unbalanced-parentheses.nfshost.com has shown a few months back, how to build a repl using 'prompt-event' and 'command-event' which handles the entry of multi-line functions.
That has serious problems, so don't use it as is...

Try putting this in ~/.init.lsp:

Code: Select all

(prompt-event (fn () ""))

Posted: Fri May 15, 2009 6:19 pm
by Lutz
Yes, Cormullion's repl code is more a proof of concept, than a finished program, but worth looking at for some interesting ideas.

And I forgot: there is built-in function name completion for newLISP native functions when hitting the TAB key. Hitting it twice shows all available functions. This is the same kind of support known from the Bash shell. OS X and other UNIXs only.

Wow.

Posted: Fri May 15, 2009 7:48 pm
by scottmaccal
Hi all,

Wow, a flood of responses right away. Thank you!

What I'm really trying to do is have (cursor) after a print.

(print "Input function please ") (cursor)

I would like a function to be called by input without the user having to worry about typing the (). They can just input the function name and press enter.

Posted: Fri May 15, 2009 9:09 pm
by cormullion
Well, you could put this into ~/.init.lsp:

Code: Select all

(prompt-event (fn () "Input function: "))

(command-event (fn (c)
  (println "you typed " c " so I'm evaluating " (string "(" c ")") )
  (string "(" c ")")))  
to get this, for example:

Code: Select all

$ newlisp -c
context
you typed context so I'm evaluating (context)
MAIN
+ 2 2
you typed + 2 2 so I'm evaluating (+ 2 2)
4
reverse "aloha"
you typed reverse "aloha" so I'm evaluating (reverse "aloha")
"ahola"
exit
you typed exit so I'm evaluating (exit)
$ 
but I think it's a really bad idea...! :)

Posted: Sun May 17, 2009 1:05 pm
by scottmaccal
Hi cormullion,

Thank you for you reply. I will give it a try.

Posted: Wed May 20, 2009 4:42 pm
by scottmaccal
Hi cormullion,

I tried your suggestions and I couldn't get them to work. Perhaps I am not understanding. Here is some code that I hope is a little clearer.

Code: Select all

(define (main)
  (print "What can I assist you with? ")
  code that will place (cursor) after the question
)
Result of evaluated function main on screen:

What can I do for you? (cursor)

Posted: Wed May 20, 2009 4:57 pm
by Lutz
Cormullion was showing you how to change the newLISP command line behavior, but perhaps this explains what you really want to do:

http://www.newlisp.org/newlisp_manual.html#read-line

Code: Select all

(define (main)
  (print "What can I assist you with? ")
  (set 'answer (read-line)))
)

Posted: Wed May 20, 2009 5:48 pm
by scottmaccal
Lutz wrote:Cormullion was showing you how to change the newLISP command line behavior, but perhaps this explains what you really want to do:

http://www.newlisp.org/newlisp_manual.html#read-line

Code: Select all

(define (main)
  (print "What can I assist you with? ")
  (set 'answer (read-line)))
)
Hi Lutz,

in a nutshell I'd like the user to be able to run an already defined and loaded function from within the newLISP interpreter without the user needing to type the () every time.

The program I am working on can be downloaded by: svn checkout http://faridayix.googlecode.com/svn/trunk/ faridayix-read-only A Mac is recommend if you have time/desire.

I am sure I breaking rules and probably doing bad design. But it is fun :-)