{dicts,syntax}: add missing 'int2enum' function

dicts/ttcn.dict

@@ -19,6 +19,7 @@ catch
 char
 char
 char2int
+char2oct
 charstring
 check
 clear
@@ -29,6 +30,7 @@ const
 control
 create
 deactivate
+decvalue
 default
 disconnect
 display
@@ -36,6 +38,8 @@ do
 done
 else
 encode
+encvalue
+enum2int
 enumerated
 error
 except
@@ -60,6 +64,7 @@ hex2int
 hex2oct
 hex2str
 hexstring
+hostId
 if
 ifpresent
 import
@@ -69,6 +74,7 @@ infinity
 inout
 int2bit
 int2char
+int2enum
 int2float
 int2hex
 int2oct
@@ -76,16 +82,20 @@ int2str
 int2unichar
 integer
 interleave
+isbound
 ischosen
 ispresent
 istemplatekind
+isvalue
 label
 language
 length
 lengthof
 log
+log2str
 map
 match
+decmatch
 message
 mixed
 mod
@@ -101,6 +111,8 @@ nowait
 null
 objid
 oct2bit
+oct2char
+oct2hex
 oct2int
 oct2str
 octetstring
@@ -125,6 +137,7 @@ recursive
 regexp
 rem
 repeat
+replace
 reply
 return
 rnd
@@ -139,6 +152,7 @@ signature
 sizeof
 start
 stop
+str2float
 str2int
 str2oct
 subset
@@ -147,6 +161,7 @@ superset
 system
 template
 testcase
+testcasename
 timeout
 timer
 to

syntax/ttcn.vim

@@ -80,7 +80,7 @@ syn keyword ttcnAttrib  with display encode extension variant optional
 
 " Operators
 syn keyword ttcnOper    mod rem not and or xor not4b and4b or4b xor4b
-syn keyword ttcnOper    complement pattern match valueof subset superset permutation
+syn keyword ttcnOper    complement pattern match decmatch valueof subset superset permutation
 syn match   ttcnOper    "[-+*/?]"
 syn match   ttcnOper    "[<>]"
 syn match   ttcnError   "="
@@ -145,11 +145,11 @@ syn keyword ttcnFunc    int2str int2float float2int char2int char2oct
 syn keyword ttcnFunc    unichar2int bit2int bit2hex bit2oct bit2str
 syn keyword ttcnFunc    hex2int hex2bit hex2oct hex2str
 syn keyword ttcnFunc    oct2int oct2bit oct2hex oct2str oct2char
-syn keyword ttcnFunc    str2int str2oct str2float enum2int
+syn keyword ttcnFunc    str2int str2oct str2float enum2int int2enum
 syn keyword ttcnFunc    lengthof sizeof ispresent ischosen
 syn keyword ttcnFunc    isvalue regexp substr replace encvalue
 syn keyword ttcnFunc    decvalue rnd isbound log2str
-syn keyword ttcnFunc    istemplatekind
+syn keyword ttcnFunc    istemplatekind testcasename hostId
 
 " Various keywords
 syn keyword ttcnKeyw    in out inout any all sender to value modifies
@@ -169,10 +169,13 @@ syn match   ttcnNumber  "-infinity\>"
 syn keyword ttcnBool    true false
 syn keyword ttcnConst   omit null pass fail inconc none error
 syn region  ttcnString  start=/"/ end=/"/ skip=/\\"/ oneline
-syn match   ttcnString  /'[01]*'B/
+" In binary strings strings '?' matches one bit
-syn match   ttcnString  /'\x*'H/
+syn match   ttcnString  /'[01?]*'B/
-syn match   ttcnString  /'\(\x\x\)*'O/
+" In hexstrings '?' matches one nibble (4 bits)
-syn match   ttcnError   /'\x\(\x\x\)*'O/
+syn match   ttcnString  /'\(\x\|?\)*'H/
+" In octetstings '?' matches one octet (8 bits)
+syn match   ttcnString  /'\(\(\x\x\)\|?\)*'O/
+syn match   ttcnError   /'\x\(\(\x\x\)\|?\)*'O/
 
 " Comments
 if version < 700