From f42d7f4562ea2e5c9ef634665952e38630f17ae4 Mon Sep 17 00:00:00 2001 From: Tom Smeding Date: Wed, 22 Sep 2021 21:13:53 +0200 Subject: No more errors, but lots unimplemented --- SC/Defs.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'SC/Defs.hs') diff --git a/SC/Defs.hs b/SC/Defs.hs index 685d408..bb8e03f 100644 --- a/SC/Defs.hs +++ b/SC/Defs.hs @@ -59,7 +59,7 @@ type ANames = ITup TypedAName type Exprs = ITup C.Expr --- Type is a pointer type +-- Type is the pointer type of the type that this name is supposed to be according to the type index. data TypedAName = TypedAName C.Type Name data TupANames t where -- cgit v1.2.3-70-g09d2