The program we use in the example is:
(in-package "CL-USER")
(defun hello-world ()
(capi:display-message "Hello World!"))
Compile the file, load it and test the program by calling (hello-world) .
(hello-world)