contrib/file-4/magic/Magdir/lisp

   1
   2 #------------------------------------------------------------------------------
   3 # lisp:  file(1) magic for lisp programs
   4 #
   5 # various lisp types, from Daniel Quinlan (quinlan@yggdrasil.com)
   6
   7 # updated by Joerg Jenderek
   8 0       string  ;;
   9 # windows INF files often begin with semicolon and use CRLF as line end
  10 # lisp files are mainly created on unix system with LF as line end
  11 >2      search/2048     !\r             Lisp/Scheme program text
  12 >2      search/2048     \r              Windows INF file
  13 0       string  (
  14 >1      string  if\                     Lisp/Scheme program text
  15 >1      string  setq\                   Lisp/Scheme program text
  16 >1      string  defvar\                 Lisp/Scheme program text
  17 >1      string  autoload\               Lisp/Scheme program text
  18 >1      string  custom-set-variables    Lisp/Scheme program text
  19
  20 # Emacs 18 - this is always correct, but not very magical.
  21 0       string  \012(                   Emacs v18 byte-compiled Lisp data
  22 # Emacs 19+ - ver. recognition added by Ian Springer
  23 # Also applies to XEmacs 19+ .elc files; could tell them apart if we had regexp
  24 # support or similar - Chris Chittleborough <cchittleborough@yahoo.com.au>
  25 0       string  ;ELC
  26 >4      byte    >19
  27 >4      byte    <32                     Emacs/XEmacs v%d byte-compiled Lisp data
  28
  29 # Files produced by CLISP Common Lisp From: Bruno Haible <haible@ilog.fr>
  30 0       string  (SYSTEM::VERSION\040'   CLISP byte-compiled Lisp program text
  31 0       long    0x70768BD2              CLISP memory image data
  32 0       long    0xD28B7670              CLISP memory image data, other endian
  33
  34 # Files produced by GNU gettext
  35 0       long    0xDE120495              GNU-format message catalog data
  36 0       long    0x950412DE              GNU-format message catalog data
  37
  38 #.com and .bin for MIT scheme
  39 0       string  \372\372\372\372        MIT scheme (library?)
  40
  41 # From: David Allouche <david@allouche.net>
  42 0       string  \<TeXmacs|      TeXmacs document text