(in-package :KPML-I)

;;; 
;;; This function makes sure that calls to startup do not blow up
;;; when attempted without a user interface present.

(defun STARTUP (&rest stuff)
  (declare (ignore stuff))
  (format t 
	  "~%;;; NOTE: there is no KPML window interface loaded.~%")
  nil)
	 
(export '(startup) "KPML-I")





