(defpackage "MESYSTEM"
  (:nicknames "MSYS")
  (:import-from "COMMON-LISP")
  (:shadow :eval
   
   :nil 

   :not

   :eq
   :null :atom
   :cons :car :cdr
   :consp :listp

   :make-string :char
   :length
   :stringp
   :string= :string< :string>

   :make-vector :svref
   :arrayp
   :numberp

   :intern
   :make-symbol
   :symbol-function :symbol-value :symbol-plist :symbol-package
   :symbol-name
   :symbolp

   :code-char :char-code
   :characterp )
  (:export))