diff options
Diffstat (limited to 'usr.bin/file/magdir/lisp')
| -rw-r--r-- | usr.bin/file/magdir/lisp | 24 |
1 files changed, 14 insertions, 10 deletions
diff --git a/usr.bin/file/magdir/lisp b/usr.bin/file/magdir/lisp index 10f127265f0..b5c3bfa09d2 100644 --- a/usr.bin/file/magdir/lisp +++ b/usr.bin/file/magdir/lisp @@ -1,4 +1,4 @@ -# $OpenBSD: lisp,v 1.4 2008/05/08 01:40:57 chl Exp $ +# $OpenBSD: lisp,v 1.5 2009/04/24 18:54:34 chl Exp $ #------------------------------------------------------------------------------ # lisp: file(1) magic for lisp programs @@ -6,11 +6,12 @@ # various lisp types, from Daniel Quinlan (quinlan@yggdrasil.com) # updated by Joerg Jenderek -0 string ;; +# GRR: This lot is too weak +#0 string ;; # windows INF files often begin with semicolon and use CRLF as line end # lisp files are mainly created on unix system with LF as line end ->2 search/2048 !\r Lisp/Scheme program text ->2 search/2048 \r Windows INF file +#>2 search/2048 !\r Lisp/Scheme program text +#>2 search/2048 \r Windows INF file 0 search/256 (if\ Lisp/Scheme program text 0 search/256 (setq\ Lisp/Scheme program text @@ -22,15 +23,17 @@ # Emacs 18 - this is always correct, but not very magical. 0 string \012( Emacs v18 byte-compiled Lisp data +!:mime application/x-elc # Emacs 19+ - ver. recognition added by Ian Springer -# Also applies to XEmacs 19+ .elc files; could tell them apart if we had regexp -# support or similar - Chris Chittleborough <cchittleborough@yahoo.com.au> -0 string ;ELC ->4 byte >19 +# Also applies to XEmacs 19+ .elc files; could tell them apart with regexs +# - Chris Chittleborough <cchittleborough@yahoo.com.au> +0 string ;ELC +>4 byte >18 >4 byte <32 Emacs/XEmacs v%d byte-compiled Lisp data +!:mime application/x-elc # Files produced by CLISP Common Lisp From: Bruno Haible <haible@ilog.fr> -0 string (SYSTEM::VERSION\040' CLISP byte-compiled Lisp program text +0 string (SYSTEM::VERSION\040' CLISP byte-compiled Lisp program 0 long 0x70768BD2 CLISP memory image data 0 long 0xD28B7670 CLISP memory image data, other endian @@ -42,4 +45,5 @@ 0 string \372\372\372\372 MIT scheme (library?) # From: David Allouche <david@allouche.net> -0 string \<TeXmacs| TeXmacs document text +0 search/1 \<TeXmacs| TeXmacs document text +!:mime text/texmacs |