@@ -4,7 +4,7 @@
program something;
{$mode Delphi}
-Uses altunit;
+Uses uw2956;
type
localclassfields = class(aclasswithfields)
@@ -0,0 +1,12 @@
+unit uw2956;
+{$mode Delphi}
+
+interface
+type
+ aclasswithfields = class
+ protected
+ field1:integer;
+ end;
+implementation
+end.