* mode delphi

tests/webtbf/tw3480.pp

@@ -5,6 +5,8 @@
 { e-mail: [email protected] }
 program z;
 
+{$mode delphi}
+
 type
   IBla = interface
   class function X: Boolean;