xref: /openbsd-src/usr.bin/file/magdir/lisp (revision 0ee74395949c27152548431c5cb896cb486a0866)
1#	$OpenBSD: lisp,v 1.5 2009/04/24 18:54:34 chl Exp $
2
3#------------------------------------------------------------------------------
4# lisp:  file(1) magic for lisp programs
5#
6# various lisp types, from Daniel Quinlan (quinlan@yggdrasil.com)
7
8# updated by Joerg Jenderek
9# GRR: This lot is too weak
10#0	string	;;
11# windows INF files often begin with semicolon and use CRLF as line end
12# lisp files are mainly created on unix system with LF as line end
13#>2	search/2048	!\r		Lisp/Scheme program text
14#>2	search/2048	\r		Windows INF file
15
160	search/256	(if\ 			Lisp/Scheme program text
170	search/256	(setq\ 			Lisp/Scheme program text
180	search/256	(defvar\ 		Lisp/Scheme program text
190	search/256	(defparam\ 		Lisp/Scheme program text
200	search/256	(defun\  		Lisp/Scheme program text
210	search/256	(autoload\ 		Lisp/Scheme program text
220	search/256	(custom-set-variables\ 	Lisp/Scheme program text
23
24# Emacs 18 - this is always correct, but not very magical.
250	string	\012(			Emacs v18 byte-compiled Lisp data
26!:mime	application/x-elc
27# Emacs 19+ - ver. recognition added by Ian Springer
28# Also applies to XEmacs 19+ .elc files; could tell them apart with regexs
29# - Chris Chittleborough <cchittleborough@yahoo.com.au>
300	string	;ELC
31>4	byte	>18
32>4	byte    <32			Emacs/XEmacs v%d byte-compiled Lisp data
33!:mime	application/x-elc
34
35# Files produced by CLISP Common Lisp From: Bruno Haible <haible@ilog.fr>
360	string	(SYSTEM::VERSION\040'	CLISP byte-compiled Lisp program
370	long	0x70768BD2		CLISP memory image data
380	long	0xD28B7670		CLISP memory image data, other endian
39
40# Files produced by GNU gettext
410	long	0xDE120495		GNU-format message catalog data
420	long	0x950412DE		GNU-format message catalog data
43
44#.com and .bin for MIT scheme
450	string	\372\372\372\372	MIT scheme (library?)
46
47# From: David Allouche <david@allouche.net>
480	search/1	\<TeXmacs|	TeXmacs document text
49!:mime	text/texmacs
50