Ok, that change should now be in SVN as well. I also added /usr/lib64 to get this working on x64 Centos 5 (and probably other platforms).<br><br>Thanks!<br><br>-- Jacob<br><br><div><span class="gmail_quote">On 5/22/07, <b class="gmail_sendername">
Julian Stecklina</b> <<a href="mailto:der_julian@web.de">der_julian@web.de</a>> wrote:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Jacob Gabrielson wrote:<br>> I recently took over the project from Marcelo Ramos (whom neither I nor<br>> Erik Enge could successfully contact, although he's certainly welcome to<br>> re-take it over if he wants to). There's now an SVN repository
<br>> available, which should have your patch, plus a couple more minor<br>> changes. If someone wants to try it out and let me know if it works for<br>> them I'll release it as the latest build.<br><br>Yes, I am still there. ;) The version from the repository compiles fine
<br>and some simple tests do what they should (Gentoo x88 with SBCL 1.0.4).<br>With one exception: /usr/lib/libncurses.so is a linker script on my<br>platform (Gentoo x86) which refers to /lib/libncurses.so, which cannot<br>
be loaded by SBCL. I reversed the order in which the code looks for the<br>library:<br><br><br>--- package.lisp (revision 14)<br>+++ package.lisp (working copy)<br>@@ -29,7 +29,7 @@<br><br> (in-package :cl-ncurses)
<br><br>-(defvar *ncurses-search-paths* '("/usr/local/lib/" "/usr/lib/" "/lib/")<br>+(defvar *ncurses-search-paths* '("/lib/" "/usr/lib/" "/usr/local/lib/")
<br> "The paths where to search the ncurses shared library")<br><br> (defparameter *ncurses-path*<br><br>On a related sidenote, the test program I used also had a bug (declaring<br>symbols from the CL package special):
<br><br>--- tests/scroll-test.lisp (revision 14)<br>+++ tests/scroll-test.lisp (working copy)<br>@@ -29,7 +29,7 @@<br> str)))<br> t)<br><br>-(defvar max 100)<br>+(defvar *max* 100)
<br><br> ;; This function creates two scrolling regions, which scroll<br> ;; simultaneously...<br>@@ -73,7 +73,7 @@<br> (wrefresh win2)<br><br> (do ((n 3 (incf n)))<br>- ((eql n (+ max 1)))<br>+ ((eql n (+ *max* 1)))
<br> (if (>= (+ n 2) 16)<br> (progn (write-number win1 16 1 n t)<br> (wrefresh win1)<br><br><br>Regards,<br>Julian<br></blockquote></div><br>