src/emacs.lisp

   1 (in-package "LICE")
   2
   3 ;; FIXME: figure out the system type
   4 (defvar system-type :undefined
   5   "Value is symbol indicating type of operating system you are using.
   6 Special values:
   7   `:gnu/linux'   compiled for a GNU/Linux system.
   8   `:darwin'      compiled for Darwin (GNU-Darwin, Mac OS X, ...).
   9   `:macos'       compiled for Mac OS 9.
  10   `:ms-dos'      compiled as an MS-DOS application.
  11   `:windows-nt'  compiled as a native W32 application.
  12   `:cygwin'      compiled using the Cygwin library.
  13   `:vax-vms' or
  14   `:axp-vms'     compiled for a (Open)VMS system.
  15 Anything else indicates some sort of Unix system.  */);
  16   Vsystem_type = intern (SYSTEM_TYPE")