New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 14431 for vendors/AGRIF/dev/LEX – NEMO

Ignore:
Timestamp:
2021-02-11T08:57:24+01:00 (3 years ago)
Author:
smasson
Message:

agrif: merge AGRIF/dev_r14312_MPI_Interface into AGRIF/dev, ticket:2598#comment:21

Location:
vendors/AGRIF/dev/LEX
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • vendors/AGRIF/dev/LEX/fortran.lex

    r14107 r14431  
    164164complex                     { strcpy(yylval.na,fortran_text); return TOK_COMPLEX; } 
    165165allocatable                 { return TOK_ALLOCATABLE; } 
     166contiguous                  { return TOK_CONTIGUOUS; } 
    166167close                       { return TOK_CLOSE; } 
    167168inquire                     { return TOK_INQUIRE; } 

  • vendors/AGRIF/dev/LEX/fortran.y

    r14107 r14431  
    190190%token TOK_PRIVATE 
    191191%token TOK_ALLOCATABLE 
     192%token TOK_CONTIGUOUS 
    192193%token TOK_RETURN 
    193194%token TOK_THEN 
    … …  
    10191020                            { strcpy(IntentSpec,$3); intent_spec = 0;} 
    10201021      | TOK_INTRINSIC 
     1022      | TOK_CONTIGUOUS      { contiguousdeclare = 1 ; } 
    10211023      | TOK_OPTIONAL        { optionaldeclare = 1 ; } 
    10221024      | TOK_POINTER         { pointerdeclare = 1 ; } 
    … …  
    18061808component-attr-spec: access-spec 
    18071809     | TOK_ALLOCATABLE 
     1810     | TOK_CONTIGUOUS 
    18081811     | TOK_DIMENSION '(' {in_complex_literal=0;} component-array-spec ')' 
    18091812     | TOK_POINTER 
    … …  
    18291832            SaveDeclare = 0; 
    18301833            pointerdeclare = 0; 
     1834            contiguousdeclare = 0 ; 
    18311835            optionaldeclare = 0 ; 
    18321836            dimsgiven=0; 
    … …  
    20112015            SaveDeclare = 0; 
    20122016            pointerdeclare = 0; 
     2017            contiguousdeclare = 0 ; 
    20132018            optionaldeclare = 0 ; 
    20142019            dimsgiven=0; 
    … …  
    20392044     | TOK_ALLOCATABLE 
    20402045     { Allocatabledeclare = 1; } 
     2046     | TOK_CONTIGUOUS 
     2047     { contiguousdeclare = 1 ; } 
    20412048     | TOK_DIMENSION '(' {in_complex_literal=0;} array-spec ')' 
    20422049     { dimsgiven = 1; curdim = $4; } 
    … …  
    25182525            SaveDeclare = 0; 
    25192526            pointerdeclare = 0; 
     2527            contiguousdeclare = 0 ; 
    25202528            optionaldeclare = 0 ; 
    25212529            dimsgiven=0; 
    … …  
    49174925    SaveDeclare = 0; 
    49184926    pointerdeclare = 0; 
     4927    contiguousdeclare = 0; 
    49194928    optionaldeclare = 0; 
    49204929    incalldeclare = 0; 
Note: See TracChangeset for help on using the changeset viewer.