added new directives

2024-12-05 12:50:36 +03:00
parent 77c46121a2
commit 21acea498e
18 changed files with 8906 additions and 9031 deletions
--- a/dvm/fdvm/trunk/parser/lexfdvm.c
+++ b/dvm/fdvm/trunk/parser/lexfdvm.c
@@ -2214,6 +2214,9 @@ analyz()
             }  else if (eqn(13,  nextch,  "doublecomplex")) {
                stkey = DOUBLECOMPLEX;
                nextch += 13;
+             }  else if (eqn(7, nextch, "declare")) { /*ACC*/
+                stkey = ACC_DECLARE;  
+                nextch += 7; 
             }  else if (eqn(2,  nextch,  "do")) { /*OMP*/
 		if (OMP_program == 1) { /*OMP*/
 	                stkey = OMPDVM_DO; /*OMP*/