1a5d223e6SXin LI 2a5d223e6SXin LI#------------------------------------------------------------------------------ 3*ae316d1dSXin LI# $File: algol68,v 1.7 2024/08/27 18:50:56 christos Exp $ 4a5d223e6SXin LI# algol68: file(1) magic for Algol 68 source 5a5d223e6SXin LI# 643a5ec4eSXin LI# URL: https://en.wikipedia.org/wiki/ALGOL_68 743a5ec4eSXin LI# Reference: http://www.softwarepreservation.org/projects/ALGOL/report/Algol68_revised_report-AB.pdf 843a5ec4eSXin LI# Update: Joerg Jenderek 943a5ec4eSXin LI0 search/8192 (input, 1043a5ec4eSXin LI>0 use algol_68 1143a5ec4eSXin LI# graph_2d.a68 12898496eeSXin LI0 regex/4006 \^PROC[[:space:]][a-zA-Z0-9_[:space:]]*[[:space:]]= 13898496eeSXin LI>0 use algol_68 1443a5ec4eSXin LI0 regex/1024 \bMODE[\t\ ] 1543a5ec4eSXin LI>0 use algol_68 1643a5ec4eSXin LI0 regex/1024 \bREF[\t\ ] 1743a5ec4eSXin LI>0 use algol_68 1843a5ec4eSXin LI0 regex/1024 \bFLEX[\t\ ]\*\\[ 1943a5ec4eSXin LI>0 use algol_68 2043a5ec4eSXin LI 2143a5ec4eSXin LI# display information like mime type and file name extension of Algol 68 source text 2243a5ec4eSXin LI0 name algol_68 Algol 68 source text 23a5d223e6SXin LI!:mime text/x-Algol68 2443a5ec4eSXin LI# https://file-extension.net/seeker/file_extension_a68 2543a5ec4eSXin LI!:ext a68 2643a5ec4eSXin LI#!:ext a68/alg 2743a5ec4eSXin LI 28a5d223e6SXin LI#0 regex [\t\ ]OD Algol 68 source text 2943a5ec4eSXin LI#>0 use algol_68 30a5d223e6SXin LI#!:mime text/x-Algol68 31a5d223e6SXin LI#0 regex [\t\ ]FI Algol 68 source text 3243a5ec4eSXin LI#>0 use algol_68 33a5d223e6SXin LI#!:mime text/x-Algol68 34