* Fix compilation

git-svn-id: trunk@47728 -

packages/pastojs/src/pas2jsfiler.pp

@@ -448,7 +448,8 @@ const
     'Varargs',
     'ReferenceTo',
     'Async',
-    'Far'
+    'Far',
+    'CBlock'
     );
 
   PCUProcedureMessageTypeNames: array[TProcedureMessageType] of string = (