niceSOFT/file | Gitverse

magic/Magdir/pascal

14 строк444 B

Christos Zoulas

PR/166: polluks: Add Free Pascal Unit files.

07 июн 2020, 21:10

07 июн 2020, 21:10d221278

#------------------------------------------------------------------------------
# $File: pascal,v 1.3 2020/06/07 18:10:26 christos Exp $
# pascal:  file(1) magic for Pascal source
#
0	search/8192	(input,		Pascal source text
!:mime	text/x-pascal
#0	regex		\^program	Pascal source text
#!:mime	text/x-pascal
#0	regex           	\^record		Pascal source text
#!:mime	text/x-pascal

# Free Pascal
0	string	PPU	Pascal unit
>3	string	x	\b, version %s