cl-ncurses and emacs...

Spyes · 02-19-2010, 02:16 AM

Hi everyone,

I am trying to develop some ncurses code with Lisp, but I'm having some trouble... I currently run emacs with slime and sbcl, and it's working great for "conventional" lisp. However, I cannot get cl-ncurses to work properly.
I am able to do:

Code:

(asdf:operate 'asdf:load-op 'cl-ncurses) 
(in-package :cl-ncurses)
(defun start ()
(initscr)

and after that is somemore ncurses-specific code (mvaddstr etc.)
Now, I get absolutely no errors, and everything seems fine, but when I run the start function, all I get is... well, nothing! Screen doesn't clear, none of the text from mvaddstr is displayed etc. it just sorta hangs in an infinite loop.
I understand that Emacs is not very good with curses, but I couldn't find anything online that would help me fix that... maybe I was looking in the right place? I don't know.. but it'd be great to get this working!

Thanks in advanced,
Lewis

ntubski · 02-19-2010, 12:19 PM

Does the code work from the terminal?

Some output may have ended up in the *inferior-lisp* buffer instead of the REPL buffer.

Spyes · 02-19-2010, 01:38 PM

Well, when I run some cl-ncurses code in sbcl (without slime+emacs, so yeah, in term) it works fine.
I tried running the same code and looking at the *inferior-lisp* buffer, however.. the printed message did not appear, but it did wait for a key press (cl-ncurses:getch), and when I pressed a key in *inferior-lisp*, it exited the ncurses program... so it kinda works, but kinda doesn't hehe

Edit: I just noticed that whenever I run the function in slime, and then go to *inferior-lisp*, it has a whole bunch of white-space... still no message, but it's interesting I suppose..

Any ideas?

ntubski · 02-19-2010, 02:07 PM

I found Can I use Curses on Lisp?

The equivalent for ext:saveinitmem on sbcl would be sb-ext:save-lisp-and-die.

Spyes · 02-20-2010, 03:01 AM

Yeah, I remember doing that with clisp I think and it didn't work... so now I gave the sbcl version a try, and the command I did in SBCL was:

Code:

(load "/usr/share/common-lisp/source/asdf/asdf.lisp")
(load "/usr/share/common-lisp/source/swank/swank.asd")
(asdf:oos 'asdf:load-op :swank)
(sb-ext:save-lisp-and-die "sbclswank" :executable t :toplevel #'swank:create-server)

which gave me no errors, and it create the "sbclswank" executable just fine. But when I run ./sbclswank it says ";; Swank started at port: 4005" but then it just exits, and when I try to do slime-connect via emacs, it gives me an error...

ntubski · 02-26-2010, 02:15 PM

Sorry for the delay, I had to reconnect an older box to try this out.

Quote:

which gave me no errors, and it create the "sbclswank" executable just fine. But when I run ./sbclswank it says ";; Swank started at port: 4005" but then it just exits,

Yes, is seems the :toplevel options wants a function that is equivalent to the REPL, but swank:create-server returns after creating the server. Leaving out the the :toplevel argument and running ./sbclwank --eval '(swank:create-server)' works fine.

Spyes · 02-27-2010, 04:16 AM

Awesome! That worked perfectly!
Thanks, ntubski