Rework generics for parameters to be plain types

1 files changed, 7 insertions, 7 deletions

diff --git a/testsuite/runnable/generic_base.elna b/testsuite/runnable/generic_base.elna
index 63737e0..161c59d 100644
--- a/testsuite/runnable/generic_base.elna
+++ b/testsuite/runnable/generic_base.elna
@@ -5,26 +5,26 @@ type
   end
 
   List#[T] = record
-    head: T;
+    head: ^T;
     count: Word
   end
 
   Queue#[T] = record(List#[T])
-    tail: T
+    tail: ^T
   end
 
 var
-  jobs: Queue#[^File]
-  seen: ^List#[^File]
+  jobs: Queue#[File]
+  seen: ^List#[File]
   f: File
 
-proc push#[T](target: ^List#[T]; value: T)
+proc push#[T](target: ^List#[T]; value: ^T)
 begin
   target^.head := value;
   target^.count := target^.count + 1u
 return
 
-proc enqueue#[T](target: ^Queue#[T]; value: T)
+proc enqueue#[T](target: ^Queue#[T]; value: ^T)
 begin
   push(target, value);
   target^.tail := value
@@ -36,5 +36,5 @@ begin
   assert(jobs.count = 1u);
   assert(jobs.head = @f);
   assert(jobs.tail = @f);
-  assert(#size(Queue#[^File]) = #size(Pointer) * 3u)
+  assert(#size(Queue#[File]) = #size(Pointer) * 3u)
 end.