Browse Source

Fix the test. It's mode Delphi, but does not compile in Delphi, because "TSomeRecord" and "TSomeRecord<T>" are different identifiers.

git-svn-id: branches/svenbarth/generics@19720 -
svenbarth 13 years ago
parent
commit
d94a55604e
1 changed files with 3 additions and 3 deletions
  1. 3 3
      tests/webtbs/tw18567.pp

+ 3 - 3
tests/webtbs/tw18567.pp

@@ -5,13 +5,13 @@ program tw18567;
 type
   TSomeRecord <TData> = record
     data: TData;
-    class operator Explicit(a: TData) : TSomeRecord;
+    class operator Explicit(a: TData) : TSomeRecord <TData>;
   end;
 
-  class operator TSomeRecord <TData>.Explicit (a: TData): TSomeRecord;
+  class operator TSomeRecord <TData>.Explicit (a: TData): TSomeRecord <TData>;
   begin
 
   end;
 
 begin
-end.
+end.