2.2.4 The complete Hello World client source code

The complete code for the Hello World client (the hello-world-client.lisp file) is:

(in-package "CL-USER")

(defun run-client ()

  (let ((orb (op:orb_init nil "LispWorks ORB")))

    (let ((world (op:narrow 'HelloWorld:world (file-to-object

                                               orb))))

      (format t "~S~%" (op:hello world)))))