Преглед на файлове

+ test for published class with abstract methods

Jonas Maebe преди 20 години
родител
ревизия
0b79e441ab
променени са 2 файла, в които са добавени 19 реда и са изтрити 0 реда
  1. 4 0
      tests/test/tabstrcl.pp
  2. 15 0
      tests/test/uabstrcl.pp

+ 4 - 0
tests/test/tabstrcl.pp

@@ -0,0 +1,4 @@
+uses uabstrcl;
+
+begin
+end.

+ 15 - 0
tests/test/uabstrcl.pp

@@ -0,0 +1,15 @@
+unit uabstrcl;    
+
+{$m+}
+{$mode delphi}
+
+interface
+
+type
+  tc = class
+    constructor create; virtual; abstract;
+  end;
+
+implementation
+
+end.