Commit 3de207ca authored by mtabriz's avatar mtabriz

add extra octopus types

parent 197c4480
Pipeline #67965 passed with stage
in 37 seconds
......@@ -39,7 +39,7 @@ bool Docs::print(int todo)
usage(0);
return 1;
case Flags::DO_VERSION:
std::cout << "findent version "<<VERSION<<std::endl;
std::cout << "findent+octo version "<<VERSION<<std::endl;
return 1;
case Flags::DO_VIM_FINDENT:
vim_findent();
......
......@@ -142,6 +142,13 @@ ckey call|close|common|continue|case|contains|cycle|class|codimension|contiguou
}
<state_esope,state_keyword>{
/* Octopus extra types */
FLOAT { D(O("FLOAT");Y;); return BASICTYPE; }
TYPE2 { D(O("TYPE");Y;); return BASICTYPE; }
TYPE1 { D(O("TYPE");Y;); return BASICTYPE; }
CMPLX { D(O("CMPLX");Y;); return BASICTYPE; }
R_TYPE { D(O("R_TYPE");Y;); return BASICTYPE; }
abstractinterface { D(O("ABSTRACTINTERFACE");Y;); return ABSTRACTINTERFACE; }
associate { D(O("ASSOCIATE");Y;); return ASSOCIATE; }
assign { D(O("ASSIGN");Y;); return ASSIGN; }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment