;;; -*- Mode:LISP; Package:SYSTEM-INTERNALS; Cold-Load:T; Base:10; Readtable:cL -*-

(defun si-imports ()
       (li:import '(symbol:symbol-plist) 'SI)
       (loop))