diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /support/highlight/langDefs/f90.lang |
Initial commit
Diffstat (limited to 'support/highlight/langDefs/f90.lang')
-rw-r--r-- | support/highlight/langDefs/f90.lang | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/support/highlight/langDefs/f90.lang b/support/highlight/langDefs/f90.lang new file mode 100644 index 0000000000..dfe6f99e68 --- /dev/null +++ b/support/highlight/langDefs/f90.lang @@ -0,0 +1,42 @@ +# Fortran 90 language definition file +# +# Author: Andre Simon +# Mail: andre.simon1@gmx.de +# Date: 30.03.03 +# ------------------------------------------ +# This file is a part of highlight, a free source code converter released under the GPL. +# +# The file is used to describe keywords and special symbols of programming languages. +# See README in the highlight directory for details. +# +# New definition files for future releases of highlight are always appreciated ;) +# +# ---------- +# andre.simon1@gmx.de +# http:/www.andre-simon.de/ + +$DESCRIPTION=Fortran 90 + +$IGNORECASE=false + +$STRINGDELIMITERS=" ' + +$SL_COMMENT=! + +$KEYWORDS(kwb)= integer real double precision complex logical character + +$KEYWORDS(kwa)=accept endmap pause assign endstructure pointer automatic endunion print backspace entry +program blockdata equivalence read byte external readonly call find real character format record +close function return common goto rewind complex if rewrite continue implicit save data implicitnone +shared decode implicitundefined static definefile include stop delete inquire structure dimension +integer subroutine do intrinsic then doublecomplex key to doubleprecision logical type else map +undefined elseif namelist union encode none unlock end nospanblocks virtual enddo open volatile +endfile options while endif parameter write module interface use contains stop + +$KEYWORDS(kwd)=regex((\w+)\s*\() + +$IGNORECASE=true + +$DIGIT=regex((?:0x|0X)[0-9a-fA-F]+|\d*[\.\_]?\d+(?:[eE][\-\+]\d+)?[lLuUbfdm]*) + +$SYMBOLS= ( ) [ ] { } , ; : & | < > - + = / * % + - . $ |