fileTypes p i w name Progress 4gl patterns begin /\* end \*/ name comment.block.source.regexp patterns match . comment A comment starting with '#' match #.*$ name comment.number-sign.source.regexp comment Single quoted string match ('(?:\\'|.)*?') name string.single.source.regexp comment Double quoted string match (\"(?:\\"|.)*?\") name string.double.source.regexp comment Operators match (?i)(=|!=|\+|-|/|<|>|,|(\s(or|and|is|mod|not|initialize)(?=(\s|$)))|((\s|^)set(?=\s))) name keyword.operator.source.regexp comment Constants provided by de language match (?i)(dirty read|null|true|false|notfound) name constant.language.source.regexp comment Variables provided by de language match (?i)(isolation|today|\sstatus|pageno) name variable.language.source.regexp comment Control match (?i)((\s|^)case(\s*|$)|continue (.*)|when |otherwise|end|do|\.|end case|assign|&SCOPED-DEFINE|while |end while|(\s|^)for(\s|$)|foreach | into |end for(each)?|(\s|^)if(?=\s+|$)|(\s+|^)then(\s+|$)|(\s+|^)else(\s+|$)|end if|return(\s+|$)|exit (.*)) name keyword.control.source.regexp comment Keywords match (?i)( between |call(?=\s+|$)| clipped|(\s|^)close\s+(form|window)*|(\s|^)create\s+(temp\s+)?(table|index)(?=\s+|$)|database |\sreturning |declare |delete(?=\s|$)|display\s+|((\s|^)drop\s+(table|index)(\s|$))|((\s|^)fetch((\s+|$)|(\s+(first|last)\s+)))|(\s|^)from(\s+|$)|(\s+|^)free\s+|group by\s|(\s+|^)(desc|asc)(\s+|$)|(\s|^)insert\s+into(\s+|$)|((scroll)* cursor(?=\s)(\swith hold)*)|((top|right|bottom|left)\s+margin)|page length|(\s|^)open\s+(form|window)*|(\s|^)prepare |(^|\s)prompt\s|(^|\s)input by name(\s|$)|((start|finish)\s+report)|(\s|^)select(\s+|$)| spaces|(\s|^)update(\s+|$)|(\s|^)where(\s+|$)|(\s|^)output(?=\s|$)|(?<=\s)to(?=\s|$)|order by|format( |$)|(first\s+)*page header|before group of|on (every|last) row|after group of| using |begin\s+work|commit\s+work|rollback\s+work|(\s+|^)values(\s+|$)|((\s|^)whenever\s+(any\s+)?error\s+(continue|stop)(\s|$))|(\s|^)run\s+|end input) name keyword.other.source.regexp comment Constant numeric match (?<!\w)((0(x|X)[0-9a-fA-F]+)|([0-9]+(\.[0-9]+)?)) name constant.numeric.source.regexp captures 1 name storage.type.function.source.regexp 2 name entity.name.function.source.regexp 3 name variable.parameter.function.source.regexp comment Functions definitions match (?i)(?<!\w\s)(function|report)\s+(.*)\s*\((.*)\) name meta.function.source.regexp captures 1 name storage.type.function.source.regexp comment Main function definition match (?i)(main)(\s*|$) name meta.function.source.regexp comment Functions definitions match (?i)(end function|end main|end report)(\s*|$) name storage.type.function.source.regexp comment Storage types match (?i)(\schar(?=[\s\(,$]))|(\sdate(\s+|$)|decimal|define |variable |as |extent | smallint|integer | float|let |no-undo| like |(end)* record|(((^|\s+)|(end\s+))globals)) name storage.type.source.regexp comment Some functions match (?i)((?<=\s)(length|day|month|year|p_open|p_close)(?=\s*\(.*?\))) name support.function.source.regexp scopeName source.regexp uuid 92ff564a-23b6-471d-8a26-831d4dec08c9