nedit & Fortran 90

[Eric Germaneau]

   Arjan van Dijk wrote:

   Dear nedit users,
   I'm new in Fortran 90 and I'm looking for a nice syntax highlighting.
   What do you use?
    


I use:

      Fortran90:1:30{\n\
            Comment:"!":"$"::Comment::\n\
            Continuation:"&":::Flag::\n\
            String:"'":"'":"\\n([^ \\t]| [^ \\t]|  [^ \\t]|   [^ \\t]|
[^ \\t]|     [ \\t0]| *\\t[^1-9])":String::\n\

Keywords:"<(ACCEPT|[Aa]ccept|ASSIGN|[Aa]ssign|AUTOMATIC|[Aa]utomatic|BACKSPACE|
[Bb]ackspace|BLOCK|[Bb]lock|CALL|[Cc]all|CLOSE|[Cc]lose|COMMON|[Cc]ommon|CONTIN
UE|[Cc]ontinue|DATA|[Dd]ata|DECODE|[Dd]ecode|DELETE|[Dd]elete|DIMENSION|[Dd]ime
nsion|[Ee][Nn][Dd][Dd][Oo]|DO|[Dd]o|ELSE|[Ee]lse|ELSEIF|[Ee]lseif|ENCODE|[Ee]nc
ode|END
 *FILE|[Ee]nd
*[Ff]ile|ENDFILE|[Ee]ndfile|END|[Ee]nd|ENDIF|[Ee]ndif|ENTRY|[Ee]ntry|EQUIVALENC
E|[Ee]quivalence|EXIT|[Ee]xit|EXTERNAL|[Ee]xternal|FORMAT|[Ff]ormat|FUNCTION|[F
f]unction|GOTO|[Gg]oto|IF|[Ii]f|IMPLICIT|[Ii]mplicit|INCLUDE|[Ii]nclude|INQUIRE
|[Ii]nquire|INTRINSIC|[Ii]ntrinsic|LOGICAL|[Ll]ogical|MAP|[Mm]ap|NONE|[Nn]one|O
N|[Oo]n|OPEN|[Oo]pen|PARAMETER|[Pp]arameter|PAUSE|[Pp]ause|POINTER|[Pp]ointer|P
RINT|[Pp]rint|PROGRAM|[Pp]rogram|READ|[Rr]ead|RECORD|[Rr]ecord|RETURN|[Rr]eturn
|REWIND|[Rr]ewind|SAVE|[Ss]ave|STATIC|[Ss]tatic|STOP|[Ss]top|STRUCTURE|[Ss]truc
ture|SUBROUTINE|[Ss]ubroutine|SYSTEM|[Ss]ystem|THEN|[Tt]hen|TO|[Tt]o|TYPE|[Tt]y
pe|UNION|[Uu]nion|UNLOCK|[Uu]nlock|VIRTUAL|[Vv]irtual|VOLATILE|[Vv]olatile|WHIL
E|[Ww]hile|WRITE|[Ww]rite)>":::Keyword::D\n\
            Data
Types:"<(BYTE|[Bb]yte|CHARACTER|[Cc]haracter|COMPLEX|[Cc]omplex|DOUBLE
*COMPLEX|[Dd]ouble *[Cc]omplex|DOUBLE *PRECISION|[Dd]ouble
*[Pp]recision|DOUBLE|[Dd]ouble|INTEGER|[Ii]nteger|REAL|[Rr]eal)(\\*[0-9]+)?>"::
:Keyword::D\n\
            F90
Keywords:"<(ALLOCATABLE|[Aa]llocatable|ALLOCATE|[Aa]llocate|CASE|[Cc]ase|CASE|[
Cc]ase|CONTAINS|[Cc]ontains|CYCLE|[Cc]ycle|DEALLOCATE|[Dd]eallocate|ELSEWHERE|[
Ee]lsewhere|ENDWHERE|[Ee]ndwhere|INTENT|[Ii]ntent|INTERFACE|[Ii]nterface|MODULE
|[Mm]odule|NAMELIST|[Nn]amelist|OPTIONAL|[Oo]ptional|PRIVATE|[Pp]rivate|PROCEDU
RE|[Pp]rocedure|PUBLIC|[Pp]ublic|REWRITE|[Rr]ewrite|SELECT|[Ss]elect|USE|[Uu]se
|WHERE|[Ww]here)>":::Keyword::D\n\
            Numeric
const:"<[0-9]+(\\.[0-9]*)?([DEde][-+]?[0-9]*)?|\\.[0-9]+([DEde][-+]?[0-9]*)?>":
::Numeric
 Const::D\n\
      }


I haven't checked yours, so maybe this is not any better.
Try and see!
Why did you choose for fortran-90?

Regards,


Arjan


  

   Arjan,
   It seems to be the same, I will live with this.
   Thank you,
                              Eric.

   --

                 Be the change you wish to see in the world
                                -- GHANDI --
                           [1]Dr. Éric Germaneau
                      Chemical Engineering Department
                    University of Massachusetts Amherst
                          159 Goessmann Laboratory
                         686 North Pleasant Street
                           Amherst, MA 01003-9303
                                    USA
                         Tel: 413-545-6209 (Office)
                        msn: [2]aihaike at hotmail.com
                               skype: aihaike
        Please consider the environment before printing this email.
        Considérez svp l'environnement avant d'imprimer cet email. 

References

   1. mailto:egermane at engin.umass.edu
   2. mailto:aihaike at hotmail.com