freebsd_amp_hwpstate/contrib/file/magic/Magdir/lisp

Ignoring revisions in .git-blame-ignore-revs. Click here to bypass and see the normal blame view.

79 lines
2.9 KiB
Plaintext
Raw Normal View History

2000-11-05 08:33:55 +00:00
#------------------------------------------------------------------------------
2022-01-03 01:44:41 +00:00
# $File: lisp,v 1.27 2020/08/14 19:23:39 christos Exp $
2000-11-05 08:33:55 +00:00
# lisp: file(1) magic for lisp programs
#
# various lisp types, from Daniel Quinlan (quinlan@yggdrasil.com)
# updated by Joerg Jenderek
# GRR: This lot is too weak
2017-09-17 15:57:06 +00:00
#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/4096 !\r Lisp/Scheme program text
#>2 search/4096 \r Windows INF file
0 search/4096 (setq\ Lisp/Scheme program text
!:mime text/x-lisp
0 search/4096 (defvar\ Lisp/Scheme program text
!:mime text/x-lisp
0 search/4096 (defparam\ Lisp/Scheme program text
!:mime text/x-lisp
0 search/4096 (defun\ Lisp/Scheme program text
!:mime text/x-lisp
0 search/4096 (autoload\ Lisp/Scheme program text
!:mime text/x-lisp
0 search/4096 (custom-set-variables\ Lisp/Scheme program text
!:mime text/x-lisp
2016-04-18 04:43:03 +00:00
# URL: https://en.wikipedia.org/wiki/Emacs_Lisp
2019-11-10 03:44:32 +00:00
# Reference: https://ftp.gnu.org/old-gnu/emacs/elisp-manual-18-1.03.tar.gz
2017-09-17 15:57:06 +00:00
# Update: Joerg Jenderek
2000-11-05 08:33:55 +00:00
# Emacs 18 - this is always correct, but not very magical.
2017-09-17 15:57:06 +00:00
0 string \012(
2016-04-18 04:43:03 +00:00
# look for emacs lisp keywords
# GRR: split regex because it is too long or get error like
# lisp, 36: Warning: cannot get string from `^(defun|defvar|defconst|defmacro|setq|fset|put|provide|require|'
>&0 regex \^(defun|defvar|defconst|defmacro|setq|fset) Emacs v18 byte-compiled Lisp data
!:mime application/x-elc
2016-04-18 04:43:03 +00:00
# https://searchcode.com/codesearch/view/2173420/
# not really pure text
!:apple EMAxTEXT
!:ext elc
# remaining regex
>&0 regex \^(put|provide|require|random) Emacs v18 byte-compiled Lisp data
!:mime application/x-elc
!:apple EMAxTEXT
!:ext elc
# missed cl.elc dbx.elc simple.elc look like normal lisp starting with ;;;
# Emacs 19+ - ver. recognition added by Ian Springer
# Also applies to XEmacs 19+ .elc files; could tell them apart with regexs
# - Chris Chittleborough <cchittleborough@yahoo.com.au>
2017-09-17 15:57:06 +00:00
# Update: Joerg Jenderek
0 string ;ELC
2016-04-18 04:43:03 +00:00
# version\0\0\0
>4 byte >18 Emacs/XEmacs v%d byte-compiled Lisp data
# why less than 32 ? does not make sense to me. GNU Emacs version is 24.5 at April 2015
#>4 byte <32 Emacs/XEmacs v%d byte-compiled Lisp data
2017-09-17 15:57:06 +00:00
!:mime application/x-elc
2016-04-18 04:43:03 +00:00
!:apple EMAxTEXT
!:ext elc
2022-01-03 01:44:41 +00:00
# Files produced by GNU/Emacs pdumper
0 string DUMPEDGNUEMACS GNU/Emacs pdumper image
2000-11-05 08:33:55 +00:00
# Files produced by CLISP Common Lisp From: Bruno Haible <haible@ilog.fr>
0 string (SYSTEM::VERSION\040' CLISP byte-compiled Lisp program (pre 2004-03-27)
0 string (|SYSTEM|::|VERSION|\040' CLISP byte-compiled Lisp program text
2000-11-05 08:33:55 +00:00
0 long 0x70768BD2 CLISP memory image data
0 long 0xD28B7670 CLISP memory image data, other endian
2017-09-17 15:57:06 +00:00
#.com and .bin for MIT scheme
2000-11-05 08:33:55 +00:00
0 string \372\372\372\372 MIT scheme (library?)
# From: David Allouche <david@allouche.net>
0 search/1 \<TeXmacs| TeXmacs document text
!:mime text/texmacs