From 8fd3beb35bf6747eee5b7b913f39d60eee534d96 Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Tue, 8 Dec 2020 20:35:41 +0000
Subject: [PATCH] * Fix compilation

git-svn-id: trunk@47728 -
---
 packages/pastojs/src/pas2jsfiler.pp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/packages/pastojs/src/pas2jsfiler.pp b/packages/pastojs/src/pas2jsfiler.pp
index dae06986c9..0212805619 100644
--- a/packages/pastojs/src/pas2jsfiler.pp
+++ b/packages/pastojs/src/pas2jsfiler.pp
@@ -448,7 +448,8 @@ const
     'Varargs',
     'ReferenceTo',
     'Async',
-    'Far'
+    'Far',
+    'CBlock'
     );
 
   PCUProcedureMessageTypeNames: array[TProcedureMessageType] of string = (