* more delphi incompatibilities

tests/tbf/tb0101.pp

@@ -0,0 +1,14 @@
+{ %FAIL }
+
+{$mode delphi}
+
+type
+  tmcl=class
+    l : integer;
+  end;
+
+var
+  cmcl : class of tmcl;
+begin
+end.
+

tests/tbf/tb0102.pp

@@ -0,0 +1,12 @@
+{ %FAIL }
+
+procedure p(var c:cardinal);
+begin
+end;
+
+var
+  l : longint;
+begin
+  p(l);
+end.
+