Fix #strict regression, adding Any and Type_Info

2022-06-18 15:24:54 +02:00
parent 8ead876d90
commit 0ed4f62557
5 changed files with 62 additions and 41 deletions
--- a/programs/main.kl
+++ b/programs/main.kl
@@ -14,6 +14,59 @@ Windows_Bitmap :: struct
  hdc: HDC
  dib: HBITMAP

+Type_ID :: U64
+Type_Info_Kind :: enum
+  TYPE_NONE
+  TYPE_S64 // FIRST_NUMERIC
+  TYPE_S32
+  TYPE_S16
+  TYPE_S8
+  TYPE_INT
+  TYPE_CHAR
+  TYPE_U64
+  TYPE_U32
+  TYPE_U16
+  TYPE_U8
+  TYPE_F32
+  TYPE_F64
+  TYPE_POINTER
+  TYPE_BOOL // LAST_NUMERIC
+  TYPE_STRING
+  TYPE_VOID
+  TYPE_ARRAY
+  TYPE_LAMBDA
+  TYPE_STRUCT
+  TYPE_UNION
+  TYPE_ENUM
+  TYPE_TYPE
+  TYPE_SLICE
+  TYPE_TUPLE
+  TYPE_ANY
+
+Any :: struct
+  data: *void
+  type: Type_ID
+
+Type_Info_Struct_Field :: struct
+  name: String
+  type: Type_ID
+  offset: S32
+
+Type_Info :: struct
+  kind: Type_Info_Kind
+  size: S32
+  align: S32
+  is_unsigned: Bool
+  type_id: Type_ID
+
+  base_type: Type_ID
+  array_size: S32
+  struct_member_count: S32
+  fields: *Type_Info_Struct_Field
+
+type_infos: []*Type_Info
+
+
 Bitmap :: struct
  size: Vec2I
  data: *U32