1#------------------------------------------------------------------------------ 2# lisp: file(1) magic for lisp programs 3# 4# various lisp types, from Daniel Quinlan (quinlan@yggdrasil.com) 5 6# updated by Joerg Jenderek 7# GRR: This lot is too weak 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
| 1#------------------------------------------------------------------------------ 2# lisp: file(1) magic for lisp programs 3# 4# various lisp types, from Daniel Quinlan (quinlan@yggdrasil.com) 5 6# updated by Joerg Jenderek 7# GRR: This lot is too weak 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
| 11#>2 search/4096 !\r Lisp/Scheme program text 12#>2 search/4096 \r Windows INF file
|
13
| 13
|
140 search/256 (if\ Lisp/Scheme program text
| 140 search/4096 (if\ Lisp/Scheme program text
|
15!:mime text/x-lisp
| 15!:mime text/x-lisp
|
160 search/256 (setq\ Lisp/Scheme program text
| 160 search/4096 (setq\ Lisp/Scheme program text
|
17!:mime text/x-lisp
| 17!:mime text/x-lisp
|
180 search/256 (defvar\ Lisp/Scheme program text
| 180 search/4096 (defvar\ Lisp/Scheme program text
|
19!:mime text/x-lisp
| 19!:mime text/x-lisp
|
200 search/256 (defparam\ Lisp/Scheme program text
| 200 search/4096 (defparam\ Lisp/Scheme program text
|
21!:mime text/x-lisp
| 21!:mime text/x-lisp
|
220 search/256 (defun\ Lisp/Scheme program text
| 220 search/4096 (defun\ Lisp/Scheme program text
|
23!:mime text/x-lisp
| 23!:mime text/x-lisp
|
240 search/256 (autoload\ Lisp/Scheme program text
| 240 search/4096 (autoload\ Lisp/Scheme program text
|
25!:mime text/x-lisp
| 25!:mime text/x-lisp
|
260 search/256 (custom-set-variables\ Lisp/Scheme program text
| 260 search/4096 (custom-set-variables\ Lisp/Scheme program text
|
27!:mime text/x-lisp 28 29# Emacs 18 - this is always correct, but not very magical. 300 string \012( Emacs v18 byte-compiled Lisp data 31!:mime application/x-elc 32# Emacs 19+ - ver. recognition added by Ian Springer 33# Also applies to XEmacs 19+ .elc files; could tell them apart with regexs 34# - Chris Chittleborough <cchittleborough@yahoo.com.au> 350 string ;ELC 36>4 byte >18 37>4 byte <32 Emacs/XEmacs v%d byte-compiled Lisp data 38!:mime application/x-elc 39 40# Files produced by CLISP Common Lisp From: Bruno Haible <haible@ilog.fr> 410 string (SYSTEM::VERSION\040' CLISP byte-compiled Lisp program (pre 2004-03-27) 420 string (|SYSTEM|::|VERSION|\040' CLISP byte-compiled Lisp program text 43 440 long 0x70768BD2 CLISP memory image data 450 long 0xD28B7670 CLISP memory image data, other endian 46 47#.com and .bin for MIT scheme 480 string \372\372\372\372 MIT scheme (library?) 49 50# From: David Allouche <david@allouche.net> 510 search/1 \<TeXmacs| TeXmacs document text 52!:mime text/texmacs
| 27!:mime text/x-lisp 28 29# Emacs 18 - this is always correct, but not very magical. 300 string \012( Emacs v18 byte-compiled Lisp data 31!:mime application/x-elc 32# Emacs 19+ - ver. recognition added by Ian Springer 33# Also applies to XEmacs 19+ .elc files; could tell them apart with regexs 34# - Chris Chittleborough <cchittleborough@yahoo.com.au> 350 string ;ELC 36>4 byte >18 37>4 byte <32 Emacs/XEmacs v%d byte-compiled Lisp data 38!:mime application/x-elc 39 40# Files produced by CLISP Common Lisp From: Bruno Haible <haible@ilog.fr> 410 string (SYSTEM::VERSION\040' CLISP byte-compiled Lisp program (pre 2004-03-27) 420 string (|SYSTEM|::|VERSION|\040' CLISP byte-compiled Lisp program text 43 440 long 0x70768BD2 CLISP memory image data 450 long 0xD28B7670 CLISP memory image data, other endian 46 47#.com and .bin for MIT scheme 480 string \372\372\372\372 MIT scheme (library?) 49 50# From: David Allouche <david@allouche.net> 510 search/1 \<TeXmacs| TeXmacs document text 52!:mime text/texmacs
|