;;; -*- Mode:LISP; Package:USER; Readtable:CL; Base:10 -*-

(in-package 'user)

(unless (find-package 'HOSTOBJ)
  (make-package 'hostobj :use '(LISP GLOBAL OBJ)))