Emacs Online Documentation

f90-font-lock-keywords-3

f90-font-lock-keywords-3 is a variable defined in `f90.el'.
Its value is shown below.

This variable may be risky if used as a file-local variable.

Documentation:
Highlights all F90 keywords and intrinsic procedures.

Value:



(("\\_<\\(module[ 	]*procedure\\)\\_>\\([^()\n]*::\\)?[ 	]*\\([^&!\n]*\\)"
  (1 font-lock-keyword-face)
  (3 font-lock-function-name-face nil t))
 (f90-typedef-matcher
  (1 font-lock-keyword-face)
  (2 font-lock-function-name-face))
 ("\\_<\\(\\(?:end[ 	]*\\)?interface[ 	]*\\(?:assignment\\|operator\\|read\\|write\\)\\)[ 	]*("
  (1 font-lock-keyword-face t))
 ("\\_<\\(\\(?:end[ 	]*\\)?\\(program\\|\\(?:sub\\)?module\\|function\\|associate\\|subroutine\\|interface\\)\\|use\\|call\\)\\_>[ 	]*\\(\\(?:\\sw\\|\\s_\\)+\\)?"
  (1 font-lock-keyword-face)
  (3 font-lock-function-name-face nil t))
 ("\\_<\\(submodule\\)\\_>[ 	]*([^)\n]+)[ 	]*\\(\\(?:\\sw\\|\\s_\\)+\\)?"
  (1 font-lock-keyword-face)
  (2 font-lock-function-name-face nil t))
 ("\\_<\\(use\\)[ 	]*,[ 	]*\\(\\(?:non_\\)?intrinsic\\)[ 	]*::[ 	]*\\(\\(?:\\sw\\|\\s_\\)+\\)"
  (1 font-lock-keyword-face)
  (2 font-lock-keyword-face)
  (3 font-lock-function-name-face))
 "\\_<\\(\\(end[ 	]*\\)?block[ 	]*data\\|contains\\)\\_>"
 ("\\_"
  (0 font-lock-keyword-face t))
 ("^[ 	0-9]*\\(?:pure\\|elemental\\)?[ 	]*\\(real\\|integer\\|c\\(haracter\\|omplex\\)\\|enumerator\\|generic\\|procedure\\|logical\\|double[ 	]*precision\\)\\(.*::\\|[ 	]*(.*)\\)?\\([^&!\n]*\\)"
  (1 font-lock-type-face t)
  (4 font-lock-variable-name-face t))
 (f90-typedec-matcher
  (1 font-lock-type-face)
  (2 font-lock-variable-name-face))
 ("\\_<\\(\\(real\\|integer\\|c\\(haracter\\|omplex\\)\\|logical\\|double[ 	]*precision\\|\\(?:type\\|class\\)[ 	]*([ 	]*\\(?:\\sw\\|\\s_\\)+[ 	]*)\\)[ 	]*\\)\\(function\\)\\_>[ 	]*\\(\\(?:\\sw\\|\\s_\\)+\\)[ 	]*\\(([^&!\n]*)\\)"
  (1 font-lock-type-face t)
  (4 font-lock-keyword-face t)
  (5 font-lock-function-name-face t)
  (6 'default t))
 ("\\_<\\(enum\\)[ 	]*,"
  (1 font-lock-keyword-face))
 ("\\_<\\(end[ 	]*\\(do\\|if\\|enum\\|select\\|forall\\|where\\|block\\|critical\\)\\)\\_>\\([ 	]+\\(\\(?:\\sw\\|\\s_\\)+\\)\\)?"
  (1 font-lock-keyword-face)
  (3 font-lock-constant-face nil t))
 ("^[ 	0-9]*\\(\\(\\(?:\\sw\\|\\s_\\)+\\)[ 	]*:[ 	]*\\)?\\(\\(if\\|do\\([ 	]*while\\)?\\|select[ 	]*\\(?:case\\|type\\)\\|where\\|forall\\|block\\|critical\\)\\)\\_>"
  (2 font-lock-constant-face nil t)
  (3 font-lock-keyword-face))
 ("\\_<\\(implicit\\)[ 	]*\\(real\\|integer\\|c\\(haracter\\|omplex\\)\\|enumerator\\|procedure\\|logical\\|double[ 	]*precision\\|type[ 	]*(\\(?:\\sw\\|\\s_\\)+)\\|none\\)[ 	]*"
  (1 font-lock-keyword-face)
  (2 font-lock-type-face))
 ("\\_<\\(namelist\\|common\\)[ 	]*/\\(\\(?:\\sw\\|\\s_\\)+\\)?/"
  (1 font-lock-keyword-face)
  (2 font-lock-constant-face nil t))
 "\\_"
 ("\\(&\\)[ 	]*\\(!\\|$\\)"
  (1 font-lock-keyword-face))
 "\\_<\\(then\\|continue\\|format\\|include\\|stop\\|return\\)\\_>"
 ("\\_<\\(exit\\|cycle\\)[ 	]*\\(\\(?:\\sw\\|\\s_\\)+\\)?\\_>"
  (1 font-lock-keyword-face)
  (2 font-lock-constant-face nil t))
 ("\\_<\\(case\\)[ 	]*\\(default\\|(\\)" . 1)
 ("\\_<\\(class\\)[ 	]*default" . 1)
 ("\\_<\\(\\(type\\|class\\)[ 	]*is\\)[ 	]*("
  (1 font-lock-keyword-face t))
 ("\\_<\\(do\\|go[ 	]*to\\)\\_>[ 	]*\\([0-9]+\\)"
  (1 font-lock-keyword-face)
  (2 font-lock-constant-face))
 ("^[ 	]*\\([0-9]+\\)[ 	]*[a-z]+"
  (1 font-lock-constant-face t))
 ("^#[ 	]*\\(?:\\sw\\|\\s_\\)+"
  (0 font-lock-preprocessor-face t)
  ("\\_" nil nil
   (0 font-lock-preprocessor-face)))
 ("^#"
  ("\\(&&\\|||\\)" nil nil
   (0 font-lock-constant-face t)))
 ("^#[ 	]*define[ 	]+\\(\\(?:\\sw\\|\\s_\\)+\\)("
  (1 font-lock-function-name-face))
 ("^#[ 	]*define[ 	]+\\(\\(?:\\sw\\|\\s_\\)+\\)"
  (1 font-lock-variable-name-face))
 ("^#[ 	]*include[ 	]+\\(<.+>\\)"
  (1 font-lock-string-face))
 "\\_<\\(?:a\\(?:bstract\\|llocat\\(?:\\(?:abl\\)?e\\)\\|ssign\\(?:ment\\)?\\)\\|backspace\\|c\\(?:lose\\|o\\(?:dimension\\|n\\(?:current\\|tiguous\\)\\)\\)\\|d\\(?:e\\(?:allocate\\|ferred\\)\\|imension\\)\\|e\\(?:lemental\\|n\\(?:dfile\\|try\\)\\|quivalence\\|xternal\\)\\|final\\|i\\(?:mport\\|n\\(?:quire\\|t\\(?:ent\\|rinsic\\)\\)\\)\\|n\\(?:o\\(?:n_\\(?:intrinsic\\|overridable\\)\\|pass\\)\\|ullify\\)\\|o\\(?:nly\\|p\\(?:e\\(?:n\\|rator\\)\\|tional\\)\\)\\|p\\(?:a\\(?:rameter\\|ss\\|use\\)\\|ointer\\|r\\(?:i\\(?:nt\\|vate\\)\\|otected\\)\\|u\\(?:blic\\|re\\)\\)\\|re\\(?:ad\\|cursive\\|sult\\|wind\\)\\|s\\(?:ave\\|e\\(?:lect\\|quence\\)\\|ync \\(?:all\\|memory\\)\\)\\|target\\|\\(?:v\\(?:alu\\|olatil\\)\\|writ\\)e\\)\\_>" "\\.\\(and\\|eqv?\\|false\\|g[et]\\|l[et]\\|n\\(?:e\\(?:qv\\)?\\|ot\\)\\|or\\|true\\)\\."
 ("\\_<\\(a\\(?:bs\\|c\\(?:har\\|os\\)\\|djust[lr]\\|i\\(?:mag\\|nt\\)\\|ll\\(?:ocated\\)?\\|n\\(?:int\\|y\\)\\|s\\(?:in\\|sociated\\)\\|tan2?\\)\\|b\\(?:essel_\\(?:j[01n]\\|y[01n]\\)\\|g[et]\\|i\\(?:nd\\|t_size\\)\\|l[et]\\|test\\)\\|c\\(?:_\\(?:associated\\|f\\(?:_p\\(?:\\(?:rocp\\)?ointer\\)\\|unloc\\)\\|loc\\|sizeof\\)\\|eiling\\|har\\|mplx\\|o\\(?:m\\(?:mand_argument_count\\|piler_\\(?:options\\|version\\)\\)\\|njg\\|sh?\\|unt\\)\\|pu_time\\|shift\\)\\|d\\(?:ate_and_time\\|ble\\|i\\(?:gits\\|m\\)\\|ot_product\\|prod\\|shift[lr]\\)\\|e\\(?:oshift\\|psilon\\|rf\\(?:c\\(?:_scaled\\)?\\)?\\|x\\(?:p\\(?:onent\\)?\\|tends\\(?:_type_of\\)?\\)\\)\\|f\\(?:indloc\\|l\\(?:oor\\|ush\\)\\|raction\\)\\|g\\(?:amma\\|et_\\(?:command\\(?:_argument\\)?\\|environment_variable\\)\\)\\|h\\(?:uge\\|ypot\\)\\|i\\(?:a\\(?:char\\|ll\\|n[dy]\\)\\|b\\(?:clr\\|its\\|set\\)\\|char\\|e\\(?:ee_\\(?:get_underflow_mode\\|s\\(?:et_underflow_mode\\|upport_underflow_control\\)\\)\\|or\\)\\|mage_index\\|n\\(?:dex\\|t\\)\\|or\\|parity\\|s\\(?:_contiguous\\|hftc?\\)\\)\\|kind\\|l\\(?:bound\\|cobound\\|e\\(?:adz\\|n\\(?:_trim\\)?\\)\\|g[et]\\|l[et]\\|o\\(?:ck\\|g\\(?:10\\|_gamma\\|ical\\)?\\)\\)\\|m\\(?:a\\(?:sk[lr]\\|tmul\\|x\\(?:exponent\\|loc\\|val\\)?\\)\\|erge\\(?:_bits\\)?\\|in\\(?:exponent\\|loc\\|val\\)?\\|o\\(?:d\\(?:ulo\\)?\\|ve_alloc\\)\\|vbits\\)\\|n\\(?:e\\(?:arest\\|w_line\\)\\|int\\|o\\(?:rm2\\|t\\)\\|u\\(?:ll\\|m_images\\)\\)\\|p\\(?:a\\(?:ck\\|rity\\)\\|op\\(?:cnt\\|par\\)\\|r\\(?:e\\(?:cision\\|sent\\)\\|oduct\\)\\)\\|r\\(?:a\\(?:dix\\|n\\(?:dom_\\(?:number\\|seed\\)\\|ge\\)\\)\\|e\\(?:peat\\|shape\\)\\|rspacing\\)\\|s\\(?:ame_type_as\\|ca\\(?:le\\|n\\)\\|e\\(?:lected_\\(?:\\(?:char\\|int\\|real\\)_kind\\)\\|t_exponent\\)\\|h\\(?:ape\\|ift[alr]\\)\\|i\\(?:gn\\|nh?\\|ze\\)\\|p\\(?:acing\\|read\\)\\|qrt\\|torage_size\\|um\\|y\\(?:nc images\\|stem_clock\\)\\)\\|t\\(?:anh?\\|his_image\\|iny\\|r\\(?:a\\(?:ilz\\|ns\\(?:fer\\|pose\\)\\)\\|im\\)\\)\\|u\\(?:bound\\|cobound\\|n\\(?:\\(?:lo\\|pa\\)ck\\)\\)\\|verify\\|wait\\)[ 	]*("
  (1 font-lock-keyword-face keep))
 "\\_"
 ("\\_<\\(asynchronous\\)[ 	]*[^=]" . 1))