9 lines
381 B
Tcl
9 lines
381 B
Tcl
|
#---------------------------------------------------
|
||
|
# TCL/TK
|
||
|
dict set lexers TCL procFindString {proc }
|
||
|
dict set lexers TCL procRegexpCommand {regexp -nocase -all -- {^\s*?(proc) (::|_|)(\w+)(::|:|_|)(\w+)\s*?(\{|\()(.*)(\}|\)) \{} $line match v1 v2 v3 v4 v5 v6 params v8}
|
||
|
|
||
|
#--------------------------------------------------
|
||
|
# Go lang
|
||
|
dict set lexers GO procFindString {func.*?}
|