[gtksourceview] Update of fortran.lang

From: Ignacio Casal Quinteiro <icq src gnome org>
To: svn-commits-list gnome org
Cc:
Subject: [gtksourceview] Update of fortran.lang
Date: Mon, 2 Nov 2009 15:36:03 +0000 (UTC)
commit 0ea3c9baf3782ffbd19b037b2c4a76128fe987e8
Author: Toon Verstraelen <Toon Verstraelen UGent be>
Date:   Mon Nov 2 16:08:32 2009 +0100

    Update of fortran.lang

 gtksourceview/language-specs/fortran.lang |  455 +++++++++++++++++------------
 1 files changed, 267 insertions(+), 188 deletions(-)
---
diff --git a/gtksourceview/language-specs/fortran.lang b/gtksourceview/language-specs/fortran.lang
index d41cf52..9f73de2 100644
--- a/gtksourceview/language-specs/fortran.lang
+++ b/gtksourceview/language-specs/fortran.lang
@@ -32,6 +32,7 @@
     <style id="comment" _name="Comment" map-to="def:comment"/>
     <style id="floating-point" _name="Floating Point" map-to="def:floating-point"/>
     <style id="keyword" _name="Keyword" map-to="def:keyword"/>
+    <style id="intrinsic" _name="Intrinsic function" map-to="def:builtin"/>
     <style id="boz-literal" _name="BOZ Literal" map-to="def:base-n-integer"/>
     <style id="decimal" _name="Decimal" map-to="def:decimal"/>
     <style id="type" _name="Data Type" map-to="def:type"/>
@@ -53,32 +54,38 @@
     <context id="operators" style-ref="keyword">
       <prefix>\.</prefix>
       <suffix>\.</suffix>
-      <keyword>TRUE</keyword>
-      <keyword>FALSE</keyword>
-      <keyword>NOT</keyword>
-      <keyword>AND</keyword>
-      <keyword>OR</keyword>
-      <keyword>XOR</keyword>
-      <keyword>EQV</keyword>
-      <keyword>NEQV</keyword>
-      <keyword>EQ</keyword>
-      <keyword>NE</keyword>
-      <keyword>GT</keyword>
-      <keyword>GE</keyword>
-      <keyword>LT</keyword>
-      <keyword>LE</keyword>
+      <keyword>true</keyword>
+      <keyword>false</keyword>
+      <keyword>not</keyword>
+      <keyword>and</keyword>
+      <keyword>or</keyword>
+      <keyword>xor</keyword>
+      <keyword>eqv</keyword>
+      <keyword>neqv</keyword>
+      <keyword>eq</keyword>
+      <keyword>ne</keyword>
+      <keyword>gt</keyword>
+      <keyword>ge</keyword>
+      <keyword>lt</keyword>
+      <keyword>le</keyword>
     </context>
 
     <context id="keywords" style-ref="keyword">
+      <keyword>allocate</keyword>
+      <keyword>assign</keyword>
+      <keyword>assignment</keyword>
       <keyword>block data</keyword>
-      <keyword>CALL</keyword>
+      <keyword>call</keyword>
       <keyword>case</keyword>
       <keyword>common</keyword>
       <keyword>contains</keyword>
       <keyword>continue</keyword>
       <keyword>cycle</keyword>
       <keyword>data</keyword>
+      <keyword>deallocate</keyword>
+      <keyword>default</keyword>
       <keyword>do</keyword>
+      <keyword>elemental</keyword>
       <keyword>elseif</keyword>
       <keyword>else</keyword>
       <keyword>elsewhere</keyword>
@@ -86,22 +93,39 @@
       <keyword>endif</keyword>
       <keyword>endselect</keyword>
       <keyword>end</keyword>
+      <keyword>entry</keyword>
+      <keyword>equivalence</keyword>
+      <keyword>exit</keyword>
       <keyword>external</keyword>
       <keyword>forall</keyword>
       <keyword>function</keyword>
+      <keyword>go to</keyword>
       <keyword>goto</keyword>
       <keyword>if</keyword>
       <keyword>implicit none</keyword>
+      <keyword>in</keyword>
       <keyword>include</keyword>
+      <keyword>inout</keyword>
       <keyword>interface</keyword>
       <keyword>intrinsic</keyword>
       <keyword>kind</keyword>
       <keyword>len</keyword>
       <keyword>module</keyword>
+      <keyword>namelist</keyword>
+      <keyword>nullify</keyword>
+      <keyword>only</keyword>
+      <keyword>operator</keyword>
+      <keyword>out</keyword>
+      <keyword>pause</keyword>
+      <keyword>private</keyword>
       <keyword>program</keyword>
+      <keyword>public</keyword>
+      <keyword>pure</keyword>
+      <keyword>recursive</keyword>
+      <keyword>result</keyword>
       <keyword>return</keyword>
       <keyword>save</keyword>
-      <keyword>SELECT</keyword>
+      <keyword>select</keyword>
       <keyword>stop</keyword>
       <keyword>subroutine</keyword>
       <keyword>then</keyword>
@@ -114,247 +138,286 @@
     <context id="read-write" style-ref="keyword">
       <keyword>backspace</keyword>
       <keyword>close</keyword>
+      <keyword>endfile</keyword>
+      <keyword>format</keyword>
       <keyword>inquire</keyword>
       <keyword>open</keyword>
-      <keyword>rewind</keyword>
-      <keyword>endfile</keyword>
+      <keyword>print</keyword>
       <keyword>read</keyword>
+      <keyword>rewind</keyword>
       <keyword>write</keyword>
-      <keyword>print</keyword>
     </context>
 
     <context id="input-output" style-ref="keyword">
-      <keyword>unit</keyword>
-      <keyword>file</keyword>
-      <keyword>iostat</keyword>
       <keyword>access</keyword>
+      <keyword>action</keyword>
+      <keyword>advance</keyword>
       <keyword>blank</keyword>
+      <keyword>delim</keyword>
+      <keyword>direct</keyword>
+      <keyword>end</keyword>
+      <keyword>eor</keyword>
+      <keyword>err</keyword>
+      <keyword>exist</keyword>
+      <keyword>file</keyword>
       <keyword>fmt</keyword>
       <keyword>form</keyword>
-      <keyword>recl</keyword>
-      <keyword>status</keyword>
-      <keyword>exist</keyword>
-      <keyword>opened</keyword>
-      <keyword>number</keyword>
-      <keyword>named</keyword>
-      <keyword>name</keyword>
-      <keyword>sequential</keyword>
-      <keyword>direct</keyword>
-      <keyword>rec</keyword>
       <keyword>formatted</keyword>
-      <keyword>unformatted</keyword>
+      <keyword>iolength</keyword>
+      <keyword>iostat</keyword>
+      <keyword>name</keyword>
+      <keyword>named</keyword>
       <keyword>nextrec</keyword>
+      <keyword>nml</keyword>
+      <keyword>number</keyword>
+      <keyword>opened</keyword>
       <keyword>pad</keyword>
       <keyword>position</keyword>
-      <keyword>action</keyword>
-      <keyword>delim</keyword>
       <keyword>readwrite</keyword>
-      <keyword>eor</keyword>
-      <keyword>advance</keyword>
-      <keyword>nml</keyword>
+      <keyword>rec</keyword>
+      <keyword>recl</keyword>
+      <keyword>sequential</keyword>
+      <keyword>size</keyword>
+      <keyword>status</keyword>
+      <keyword>unformatted</keyword>
+      <keyword>unit</keyword>
+      <keyword>write</keyword>
     </context>
 
-    <context id="intrinsics" style-ref="keyword">
+    <context id="intrinsics" style-ref="intrinsic">
+      <keyword>abs</keyword>
+      <keyword>achar</keyword>
+      <keyword>acos</keyword>
       <keyword>adjustl</keyword>
       <keyword>adjustr</keyword>
-      <keyword>all</keyword>
+      <keyword>aimag</keyword>
+      <keyword>aint</keyword>
+      <keyword>algama</keyword>
       <keyword>allocated</keyword>
+      <keyword>all</keyword>
+      <keyword>alog10</keyword>
+      <keyword>alog</keyword>
+      <keyword>amax0</keyword>
+      <keyword>amax1</keyword>
+      <keyword>amin0</keyword>
+      <keyword>amin1</keyword>
+      <keyword>amod</keyword>
+      <keyword>anint</keyword>
       <keyword>any</keyword>
+      <keyword>asin</keyword>
       <keyword>associated</keyword>
+      <keyword>atan2</keyword>
+      <keyword>atan</keyword>
       <keyword>bit_size</keyword>
       <keyword>btest</keyword>
+      <keyword>c_associated</keyword>
+      <keyword>c_loc</keyword>
+      <keyword>c_funloc</keyword>
+      <keyword>c_f_pointer</keyword>
+      <keyword>c_f_procpointer</keyword>
+      <keyword>cabs</keyword>
+      <keyword>ccos</keyword>
+      <keyword>cdabs</keyword>
+      <keyword>cdcos</keyword>
+      <keyword>cdexp</keyword>
+      <keyword>cdlog</keyword>
+      <keyword>cdsin</keyword>
+      <keyword>cdsqrt</keyword>
       <keyword>ceiling</keyword>
+      <keyword>cexp</keyword>
+      <keyword>char</keyword>
+      <keyword>clog</keyword>
+      <keyword>cmplx</keyword>
+      <keyword>command_argument_count</keyword>
+      <keyword>conjg</keyword>
+      <keyword>cosh</keyword>
+      <keyword>cos</keyword>
       <keyword>count</keyword>
+      <keyword>cpu_time</keyword>
+      <keyword>cqabs</keyword>
+      <keyword>cqcos</keyword>
+      <keyword>cqexp</keyword>
+      <keyword>cqlog</keyword>
+      <keyword>cqsin</keyword>
+      <keyword>cqsqrt</keyword>
       <keyword>cshift</keyword>
+      <keyword>csin</keyword>
+      <keyword>csqrt</keyword>
+      <keyword>dabs</keyword>
+      <keyword>dacos</keyword>
+      <keyword>dasin</keyword>
+      <keyword>datan2</keyword>
+      <keyword>datan</keyword>
       <keyword>date_and_time</keyword>
+      <keyword>dble</keyword>
+      <keyword>dcmplx</keyword>
+      <keyword>dconjg</keyword>
+      <keyword>dcosh</keyword>
+      <keyword>dcos</keyword>
+      <keyword>ddim</keyword>
+      <keyword>derf</keyword>
+      <keyword>derfc</keyword>
+      <keyword>dexp</keyword>
+      <keyword>dfloat</keyword>
+      <keyword>dgamma</keyword>
       <keyword>digits</keyword>
       <keyword>dim</keyword>
+      <keyword>dimag</keyword>
+      <keyword>dint</keyword>
+      <keyword>dlgama</keyword>
+      <keyword>dlog10</keyword>
+      <keyword>dlog</keyword>
+      <keyword>dmax1</keyword>
+      <keyword>dmin1</keyword>
+      <keyword>dmod</keyword>
+      <keyword>dnint</keyword>
       <keyword>dot_product</keyword>
       <keyword>dprod</keyword>
+      <keyword>dsign</keyword>
+      <keyword>dsinh</keyword>
+      <keyword>dsin</keyword>
+      <keyword>dsqrt</keyword>
+      <keyword>dtanh</keyword>
+      <keyword>dtan</keyword>
       <keyword>eoshift</keyword>
       <keyword>epsilon</keyword>
+      <keyword>erfc</keyword>
+      <keyword>erf</keyword>
+      <keyword>exp</keyword>
       <keyword>exponent</keyword>
+      <keyword>float</keyword>
       <keyword>floor</keyword>
       <keyword>fraction</keyword>
+      <keyword>gamma</keyword>
+      <keyword>getarg</keyword>
+      <keyword>get_command</keyword>
+      <keyword>get_command_argument</keyword>
+      <keyword>get_environment_variable</keyword>
       <keyword>huge</keyword>
+      <keyword>iabs</keyword>
+      <keyword>iachar</keyword>
       <keyword>iand</keyword>
+      <keyword>iargc</keyword>
       <keyword>ibclr</keyword>
       <keyword>ibits</keyword>
       <keyword>ibset</keyword>
+      <keyword>ichar</keyword>
+      <keyword>idim</keyword>
+      <keyword>idint</keyword>
+      <keyword>idnint</keyword>
       <keyword>ieor</keyword>
+      <keyword>ifix</keyword>
+      <keyword>index</keyword>
+      <keyword>int</keyword>
       <keyword>ior</keyword>
-      <keyword>ishft</keyword>
+      <keyword>iqint</keyword>
+      <keyword>is_iostat_end</keyword>
+      <keyword>is_iostat_eor</keyword>
       <keyword>ishftc</keyword>
+      <keyword>ishft</keyword>
+      <keyword>isign</keyword>
+      <keyword>kind</keyword>
       <keyword>lbound</keyword>
       <keyword>len_trim</keyword>
+      <keyword>len</keyword>
+      <keyword>lge</keyword>
+      <keyword>lgt</keyword>
+      <keyword>lle</keyword>
+      <keyword>llt</keyword>
+      <keyword>loc</keyword>
+      <keyword>log10</keyword>
+      <keyword>log</keyword>
+      <keyword>logical</keyword>
       <keyword>matmul</keyword>
+      <keyword>max0</keyword>
+      <keyword>max1</keyword>
       <keyword>maxexponent</keyword>
       <keyword>maxloc</keyword>
       <keyword>maxval</keyword>
+      <keyword>max</keyword>
       <keyword>merge</keyword>
+      <keyword>min0</keyword>
+      <keyword>min1</keyword>
       <keyword>minexponent</keyword>
       <keyword>minloc</keyword>
       <keyword>minval</keyword>
+      <keyword>min</keyword>
+      <keyword>mod</keyword>
       <keyword>modulo</keyword>
+      <keyword>move_alloc</keyword>
       <keyword>mvbits</keyword>
       <keyword>nearest</keyword>
+      <keyword>new_line</keyword>
+      <keyword>nint</keyword>
+      <keyword>not</keyword>
+      <keyword>null</keyword>
+      <keyword>or</keyword>
       <keyword>pack</keyword>
+      <keyword>precision</keyword>
       <keyword>present</keyword>
       <keyword>product</keyword>
+      <keyword>qabs</keyword>
+      <keyword>qacos</keyword>
+      <keyword>qasin</keyword>
+      <keyword>qatan2</keyword>
+      <keyword>qatan</keyword>
+      <keyword>qcmplx</keyword>
+      <keyword>qconjg</keyword>
+      <keyword>qcosh</keyword>
+      <keyword>qcos</keyword>
+      <keyword>qdim</keyword>
+      <keyword>qerf</keyword>
+      <keyword>qerfc</keyword>
+      <keyword>qexp</keyword>
+      <keyword>qgamma</keyword>
+      <keyword>qimag</keyword>
+      <keyword>qlgama</keyword>
+      <keyword>qlog10</keyword>
+      <keyword>qlog</keyword>
+      <keyword>qmax1</keyword>
+      <keyword>qmin1</keyword>
+      <keyword>qmod</keyword>
+      <keyword>qnint</keyword>
+      <keyword>qsign</keyword>
+      <keyword>qsinh</keyword>
+      <keyword>qsin</keyword>
+      <keyword>qsqrt</keyword>
+      <keyword>qtanh</keyword>
+      <keyword>qtan</keyword>
       <keyword>radix</keyword>
       <keyword>random_number</keyword>
       <keyword>random_seed</keyword>
       <keyword>range</keyword>
+      <keyword>real</keyword>
       <keyword>repeat</keyword>
       <keyword>reshape</keyword>
       <keyword>rrspacing</keyword>
       <keyword>scale</keyword>
+      <keyword>scan</keyword>
+      <keyword>selected_char_kind</keyword>
       <keyword>selected_int_kind</keyword>
       <keyword>selected_real_kind</keyword>
-      <keyword>scan</keyword>
+      <keyword>set_exponent</keyword>
       <keyword>shape</keyword>
+      <keyword>sign</keyword>
+      <keyword>sinh</keyword>
+      <keyword>sin</keyword>
       <keyword>size</keyword>
+      <keyword>sngl</keyword>
       <keyword>spacing</keyword>
       <keyword>spread</keyword>
-      <keyword>set_exponent</keyword>
+      <keyword>sqrt</keyword>
+      <keyword>sum</keyword>
+      <keyword>system_clock</keyword>
+      <keyword>tanh</keyword>
+      <keyword>tan</keyword>
       <keyword>tiny</keyword>
+      <keyword>transfer</keyword>
       <keyword>transpose</keyword>
       <keyword>trim</keyword>
       <keyword>ubound</keyword>
       <keyword>unpack</keyword>
       <keyword>verify</keyword>
-      <keyword>precision</keyword>
-      <keyword>sum</keyword>
-      <keyword>system_clock</keyword>
-      <keyword>abs</keyword>
-      <keyword>acos</keyword>
-      <keyword>aimag</keyword>
-      <keyword>aint</keyword>
-      <keyword>anint</keyword>
-      <keyword>asin</keyword>
-      <keyword>atan</keyword>
-      <keyword>atan2</keyword>
-      <keyword>cos</keyword>
-      <keyword>sin</keyword>
-      <keyword>tan</keyword>
-      <keyword>sinh</keyword>
-      <keyword>cosh</keyword>
-      <keyword>tanh</keyword>
-      <keyword>exp</keyword>
-      <keyword>log</keyword>
-      <keyword>log10</keyword>
-      <keyword>sign</keyword>
-      <keyword>sqrt</keyword>
-      <keyword>int</keyword>
-      <keyword>cmplx</keyword>
-      <keyword>nint</keyword>
-      <keyword>min</keyword>
-      <keyword>max</keyword>
-      <keyword>conjg</keyword>
-      <keyword>char</keyword>
-      <keyword>ichar</keyword>
-      <keyword>index</keyword>
-      <keyword>cabs</keyword>
-      <keyword>ccos</keyword>
-      <keyword>cexp</keyword>
-      <keyword>clog</keyword>
-      <keyword>csin</keyword>
-      <keyword>csqrt</keyword>
-      <keyword>dacos</keyword>
-      <keyword>dasin</keyword>
-      <keyword>datan</keyword>
-      <keyword>datan2</keyword>
-      <keyword>dcos</keyword>
-      <keyword>dcosh</keyword>
-      <keyword>ddim</keyword>
-      <keyword>dexp</keyword>
-      <keyword>dint</keyword>
-      <keyword>dlog</keyword>
-      <keyword>dlog10</keyword>
-      <keyword>dmod</keyword>
-      <keyword>dabs</keyword>
-      <keyword>dnint</keyword>
-      <keyword>dsign</keyword>
-      <keyword>dsin</keyword>
-      <keyword>dsinh</keyword>
-      <keyword>dsqrt</keyword>
-      <keyword>dtan</keyword>
-      <keyword>dtanh</keyword>
-      <keyword>iabs</keyword>
-      <keyword>idim</keyword>
-      <keyword>idnint</keyword>
-      <keyword>isign</keyword>
-      <keyword>idint</keyword>
-      <keyword>ifix</keyword>
-      <keyword>amax0</keyword>
-      <keyword>amax1</keyword>
-      <keyword>dmax1</keyword>
-      <keyword>max0</keyword>
-      <keyword>max1</keyword>
-      <keyword>amin0</keyword>
-      <keyword>amin1</keyword>
-      <keyword>dmin1</keyword>
-      <keyword>loc</keyword>
-      <keyword>min0</keyword>
-      <keyword>min1</keyword>
-      <keyword>amod</keyword>
-      <keyword>float</keyword>
-      <keyword>sngl</keyword>
-      <keyword>alog</keyword>
-      <keyword>alog10</keyword>
-      <keyword>cdabs</keyword>
-      <keyword>cdcos</keyword>
-      <keyword>cdexp</keyword>
-      <keyword>cdlog</keyword>
-      <keyword>cdsin</keyword>
-      <keyword>cdsqrt</keyword>
-      <keyword>cqabs</keyword>
-      <keyword>cqcos</keyword>
-      <keyword>cqexp</keyword>
-      <keyword>cqlog</keyword>
-      <keyword>cqsin</keyword>
-      <keyword>cqsqrt</keyword>
-      <keyword>qacos</keyword>
-      <keyword>qasin</keyword>
-      <keyword>qatan</keyword>
-      <keyword>qatan2</keyword>
-      <keyword>qcos</keyword>
-      <keyword>qcosh</keyword>
-      <keyword>qdim</keyword>
-      <keyword>qexp</keyword>
-      <keyword>iqint</keyword>
-      <keyword>qlog</keyword>
-      <keyword>qlog10</keyword>
-      <keyword>qmod</keyword>
-      <keyword>qabs</keyword>
-      <keyword>qnint</keyword>
-      <keyword>qsign</keyword>
-      <keyword>qsin</keyword>
-      <keyword>qsinh</keyword>
-      <keyword>qsqrt</keyword>
-      <keyword>qtan</keyword>
-      <keyword>qtanh</keyword>
-      <keyword>qmax1</keyword>
-      <keyword>qmin1</keyword>
-      <keyword>dimag</keyword>
-      <keyword>qimag</keyword>
-      <keyword>dcmplx</keyword>
-      <keyword>qcmplx</keyword>
-      <keyword>dconjg</keyword>
-      <keyword>qconjg</keyword>
-      <keyword>gamma</keyword>
-      <keyword>dgamma</keyword>
-      <keyword>qgamma</keyword>
-      <keyword>algama</keyword>
-      <keyword>dlgama</keyword>
-      <keyword>qlgama</keyword>
-      <keyword>erf</keyword>
-      <keyword>derf</keyword>
-      <keyword>qerf</keyword>
-      <keyword>erfc</keyword>
-      <keyword>derfc</keyword>
-      <keyword>qerfc</keyword>
-      <keyword>dfloat</keyword>
       <keyword>zabs</keyword>
       <keyword>zcos</keyword>
       <keyword>zexp</keyword>
@@ -364,23 +427,38 @@
     </context>
 
     <context id="types" style-ref="type">
-      <keyword>REAL</keyword>
-      <keyword>INTEGER</keyword>
-      <keyword>CHARACTER</keyword>
-      <keyword>LOGICAL</keyword>
-      <keyword>COMPLEX</keyword>
-      <keyword>DOUBLE PRECISION</keyword>
-      <keyword>DOUBLE COMPLEX</keyword>
-      <keyword>BYTE</keyword>
+      <keyword>byte</keyword>
+      <keyword>character</keyword>
+      <keyword>complex</keyword>
+      <keyword>double complex</keyword>
+      <keyword>double precision</keyword>
+      <keyword>integer</keyword>
+      <keyword>logical</keyword>
+      <keyword>procedure</keyword>
+      <keyword>real</keyword>
+    </context>
+
+    <context id="type-attributes" style-ref="type">
+      <keyword>allocatable</keyword>
       <keyword>dimension</keyword>
-      <keyword>parameter</keyword>
+      <keyword>external</keyword>
       <keyword>intent</keyword>
-      <keyword>public</keyword>
-      <keyword>private</keyword>
+      <keyword>intrinsic</keyword>
       <keyword>optional</keyword>
+      <keyword>parameter</keyword>
       <keyword>pointer</keyword>
+      <keyword>private</keyword>
+      <keyword>public</keyword>
+      <keyword>save</keyword>
       <keyword>target</keyword>
-      <keyword>allocatable</keyword>
+    </context>
+
+    <context id="attributes">
+      <start>,\s*\%[</start>
+      <end>\%[</end>
+      <include>
+        <context ref="type-attributes"/>
+      </include>
     </context>
 
     <context id="floating-point-number" style-ref="floating-point">
@@ -419,12 +497,13 @@
         <context ref="def:string"/>
         <context ref="def:single-quoted-string"/>
         <context ref="line-comment"/>
+        <context ref="types"/>
+        <context ref="attributes"/>
         <context ref="operators"/>
         <context ref="keywords"/>
         <context ref="read-write"/>
         <context ref="input-output"/>
         <context ref="intrinsics"/>
-        <context ref="types"/>
       </include>
     </context>
[Date Prev][Date Next] [Thread Prev][Thread Next] [Thread Index] [Date Index] [Author Index]