OpenCOBOL .cob .cbl .cpy ^(identification|id|environment|data|procedure|division| program-id|author| configuration|source-computer|object-computer| special-names|repository| input-output|file-control|io-control| file|working-storage|local-storage|linkage| communication|report|screen| section|declaratives| end| perform|end-perform|until|times|varying| add|subtract|multiply|divide|compute| end-add|end-subtract|end-multiply|end-divide|end-compute| accept|display|read|write|rewrite|sort| end-accept|end-display|end-read|end-write|end-rewrite| move|evaluate|end-evaluate|if|end-if|when| (un)?string|end-(un)?string|call|end-call| goback|stop[\s]+run| filler|low-value[s]?|high-value[s]?|space[s]?|zero[es]?[s]?)\b \*>|[ ]{6}\* " ' True True False procedure ^[0-9a-z]+\. 1 subprogram_xpm prog *>OC<* *>>SOURCE FORMAT IS FIXED *> *************************************************************** *> Author: Your Name Here *> Date: %D *> Purpose: %_ *> Tectonics: make *> *************************************************************** identification division. program-id %(pid). environment division. configuration section. repository. special-names. input-output section. data division. file section. working-storage section. local-storage section. linkage section. screen section. procedure division. declaratives. end declaratives. 00-main. . 00-finish. goback. *> *************************************************************** end program %(pid). Vala .vala ^(bool|char|constpointer|double|float|size_t|ssize_t|string|unichar|void| int|int8|int16|int32|int64|long|short| uint|uint8|uint16|uint32|uint64|ulong|ushort| class|delegate|enum|errordomain|interface|namespace|struct| break|continue|do|for|foreach|return|while| else|if|switch| case|default| abstract|const|dynamic|ensures|extern|inline|internal|override| private|protected|public|requires|signal|static|virtual|volatile|weak| false|null|true| try|catch|finally|throw| as|base|construct|delete|get|in|is|lock|new|out|params|ref| sizeof|set|this|throws|typeof|using|value|var|yield|yields)\b // /* */ " ' True True True procedure ^[0-9a-z]+\. 1 subprogram_xpm OpenCOBOL -x make cobc -x %f cobcrun %p valac --pkg gtk+-2.0 %f