diff options
| -rw-r--r-- | queries/fortran/highlights.scm | 55 |
1 files changed, 31 insertions, 24 deletions
diff --git a/queries/fortran/highlights.scm b/queries/fortran/highlights.scm index 846c25842..efc3817f8 100644 --- a/queries/fortran/highlights.scm +++ b/queries/fortran/highlights.scm @@ -6,48 +6,55 @@ [ (intrinsic_type) + "allocatable" + "attributes" + "device" "dimension" - "intent" - "in" - "out" - "inout" - "type" "endtype" - "attributes" "global" - "device" - "host" "grid_global" + "host" + "import" + "in" + "inout" + "intent" + "optional" + "out" "pointer" + "type" + "value" ] @type [ "contains" - "public" "private" + "public" ] @include [ -"implicit" -(none) + (none) + "implicit" ] @attribute [ - "function" "endfunction" "endprogram" - "subroutine" "endsubroutine" + "function" + "subroutine" ] @keyword.function [ - "module" - "endmodule" "bind" "call" "class" "continue" "cycle" + "endenum" + "endinterface" + "endmodule" + "endprogram" + "enum" "enumerator" "equivalence" "exit" @@ -55,39 +62,37 @@ "goto" "include" "interface" - "endinterface" + "module" + "namelist" "only" "parameter" - "procedure" "print" + "procedure" "program" - "endprogram" "read" "return" "stop" "use" "write" - "enum" - "endenum" (default) (procedure_qualifier) ] @keyword [ - "if" - "then" "else" "elseif" "endif" - "where" "endwhere" + "if" + "then" + "where" ] @conditional [ "do" "enddo" - "while" "forall" + "while" ] @repeat [ @@ -122,6 +127,8 @@ ")" "[" "]" + "<<<" + ">>>" ] @punctuation.bracket ;; Delimiter |