1*f72f8299SJan Lentfer 2327e51cbSPeter Avalos#------------------------------------------------------------------------------ 3*f72f8299SJan Lentfer# $File: lisp,v 1.23 2009/09/19 16:28:10 christos Exp $ 4327e51cbSPeter Avalos# lisp: file(1) magic for lisp programs 5327e51cbSPeter Avalos# 6327e51cbSPeter Avalos# various lisp types, from Daniel Quinlan (quinlan@yggdrasil.com) 7327e51cbSPeter Avalos 8327e51cbSPeter Avalos# updated by Joerg Jenderek 979343712SPeter Avalos# GRR: This lot is too weak 1079343712SPeter Avalos#0 string ;; 11327e51cbSPeter Avalos# windows INF files often begin with semicolon and use CRLF as line end 12327e51cbSPeter Avalos# lisp files are mainly created on unix system with LF as line end 1379343712SPeter Avalos#>2 search/4096 !\r Lisp/Scheme program text 1479343712SPeter Avalos#>2 search/4096 \r Windows INF file 15327e51cbSPeter Avalos 1679343712SPeter Avalos0 search/4096 (setq\ Lisp/Scheme program text 1779343712SPeter Avalos!:mime text/x-lisp 1879343712SPeter Avalos0 search/4096 (defvar\ Lisp/Scheme program text 1979343712SPeter Avalos!:mime text/x-lisp 2079343712SPeter Avalos0 search/4096 (defparam\ Lisp/Scheme program text 2179343712SPeter Avalos!:mime text/x-lisp 2279343712SPeter Avalos0 search/4096 (defun\ Lisp/Scheme program text 2379343712SPeter Avalos!:mime text/x-lisp 2479343712SPeter Avalos0 search/4096 (autoload\ Lisp/Scheme program text 2579343712SPeter Avalos!:mime text/x-lisp 2679343712SPeter Avalos0 search/4096 (custom-set-variables\ Lisp/Scheme program text 2779343712SPeter Avalos!:mime text/x-lisp 28327e51cbSPeter Avalos 29327e51cbSPeter Avalos# Emacs 18 - this is always correct, but not very magical. 30327e51cbSPeter Avalos0 string \012( Emacs v18 byte-compiled Lisp data 3179343712SPeter Avalos!:mime application/x-elc 32327e51cbSPeter Avalos# Emacs 19+ - ver. recognition added by Ian Springer 3379343712SPeter Avalos# Also applies to XEmacs 19+ .elc files; could tell them apart with regexs 3479343712SPeter Avalos# - Chris Chittleborough <cchittleborough@yahoo.com.au> 35327e51cbSPeter Avalos0 string ;ELC 3679343712SPeter Avalos>4 byte >18 37327e51cbSPeter Avalos>4 byte <32 Emacs/XEmacs v%d byte-compiled Lisp data 3879343712SPeter Avalos!:mime application/x-elc 39327e51cbSPeter Avalos 40327e51cbSPeter Avalos# Files produced by CLISP Common Lisp From: Bruno Haible <haible@ilog.fr> 4179343712SPeter Avalos0 string (SYSTEM::VERSION\040' CLISP byte-compiled Lisp program (pre 2004-03-27) 4279343712SPeter Avalos0 string (|SYSTEM|::|VERSION|\040' CLISP byte-compiled Lisp program text 4379343712SPeter Avalos 44327e51cbSPeter Avalos0 long 0x70768BD2 CLISP memory image data 45327e51cbSPeter Avalos0 long 0xD28B7670 CLISP memory image data, other endian 46327e51cbSPeter Avalos 47327e51cbSPeter Avalos#.com and .bin for MIT scheme 48327e51cbSPeter Avalos0 string \372\372\372\372 MIT scheme (library?) 49327e51cbSPeter Avalos 50327e51cbSPeter Avalos# From: David Allouche <david@allouche.net> 5179343712SPeter Avalos0 search/1 \<TeXmacs| TeXmacs document text 5279343712SPeter Avalos!:mime text/texmacs 53