[slime-devel] Slime hanging on foreign function calls with Lispworks

[Shawn Nicholson]

Hello,
  I am a new user to slime and have run into something I can't seem to
figure out.  
  I am running Lispworks 4.4.5 Professional and Slime 2005-4-27
(LispWorks Port 1525 PID 220).  
  I am attempting to run some code which calls some foreign functions
however any attempt to do so causes Slime to hang. The windows click
does not happen at all. 

  Any ideas on what I'm missing (or what settings I have incorrect) that
would prevent me from making FLI calls?

  Thanks,
    Shawn


(in-package :cl-user)

(defparameter *segman-dll*
"C:\\Projects\\SegMan\\hemets\\src\\segman.dll")

(fli:register-module *segman-dll*)

(fli:define-foreign-function (c_single_click "c_single_click" :source)
    ((pause :int))
  :result-type :void)


(defun single-click (&optional (pause 0))
  (format t "Executing single click.~%")
  (c_single_click pause))


(defun test-click ()
  (single-click))