1 1.1.1.2 christos 2 1.1 christos #------------------------------------------------------------------------------ 3 1.1.1.2 christos # $File: lisp,v 1.23 2009/09/19 16:28:10 christos Exp $ 4 1.1 christos # lisp: file(1) magic for lisp programs 5 1.1 christos # 6 1.1 christos # various lisp types, from Daniel Quinlan (quinlan (a] yggdrasil.com) 7 1.1 christos 8 1.1 christos # updated by Joerg Jenderek 9 1.1 christos # GRR: This lot is too weak 10 1.1 christos #0 string ;; 11 1.1 christos # windows INF files often begin with semicolon and use CRLF as line end 12 1.1 christos # lisp files are mainly created on unix system with LF as line end 13 1.1 christos #>2 search/4096 !\r Lisp/Scheme program text 14 1.1 christos #>2 search/4096 \r Windows INF file 15 1.1 christos 16 1.1 christos 0 search/4096 (setq\ Lisp/Scheme program text 17 1.1 christos !:mime text/x-lisp 18 1.1 christos 0 search/4096 (defvar\ Lisp/Scheme program text 19 1.1 christos !:mime text/x-lisp 20 1.1 christos 0 search/4096 (defparam\ Lisp/Scheme program text 21 1.1 christos !:mime text/x-lisp 22 1.1 christos 0 search/4096 (defun\ Lisp/Scheme program text 23 1.1 christos !:mime text/x-lisp 24 1.1 christos 0 search/4096 (autoload\ Lisp/Scheme program text 25 1.1 christos !:mime text/x-lisp 26 1.1 christos 0 search/4096 (custom-set-variables\ Lisp/Scheme program text 27 1.1 christos !:mime text/x-lisp 28 1.1 christos 29 1.1 christos # Emacs 18 - this is always correct, but not very magical. 30 1.1 christos 0 string \012( Emacs v18 byte-compiled Lisp data 31 1.1 christos !:mime application/x-elc 32 1.1 christos # Emacs 19+ - ver. recognition added by Ian Springer 33 1.1 christos # Also applies to XEmacs 19+ .elc files; could tell them apart with regexs 34 1.1 christos # - Chris Chittleborough <cchittleborough (a] yahoo.com.au> 35 1.1 christos 0 string ;ELC 36 1.1 christos >4 byte >18 37 1.1 christos >4 byte <32 Emacs/XEmacs v%d byte-compiled Lisp data 38 1.1 christos !:mime application/x-elc 39 1.1 christos 40 1.1 christos # Files produced by CLISP Common Lisp From: Bruno Haible <haible (a] ilog.fr> 41 1.1 christos 0 string (SYSTEM::VERSION\040' CLISP byte-compiled Lisp program (pre 2004-03-27) 42 1.1 christos 0 string (|SYSTEM|::|VERSION|\040' CLISP byte-compiled Lisp program text 43 1.1 christos 44 1.1 christos 0 long 0x70768BD2 CLISP memory image data 45 1.1 christos 0 long 0xD28B7670 CLISP memory image data, other endian 46 1.1 christos 47 1.1 christos #.com and .bin for MIT scheme 48 1.1 christos 0 string \372\372\372\372 MIT scheme (library?) 49 1.1 christos 50 1.1 christos # From: David Allouche <david (a] allouche.net> 51 1.1 christos 0 search/1 \<TeXmacs| TeXmacs document text 52 1.1 christos !:mime text/texmacs 53