Next Prev Up Top Contents Index

12.2.5.3 Running your own process on startup

This script saves a LispWorks image which starts multiprocessing on restart and runs a user-defined process.

(load-all-patches)
(load "my-server-code")
(push '("Start Server" () start-my-server)
      mp:*initial-processes*)
(save-image "my-server"
   :remarks "My Server"
   :restart-function 'mp:initialize-multiprocessing
   #+(or Win32 Linux) :environment #+(or Win32 Linux) nil
   )
(quit)

LispWorks User Guide - 18 Feb 2003

Next Prev Up Top Contents Index