ed/metadesk
1
0
Fork 0
mirror of https://github.com/Ed94/metadesk.git synced 2026-06-12 23:51:37 -07:00
Code Issues Packages Projects Releases Wiki Activity

[examples] implement default & auto map features

Browse Source
This commit is contained in:
Allen Webster
2021-09-26 10:57:28 -07:00
parent 64b2075038
commit fcb61541a9
3 changed files with 78 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files
examples/type_metadata/generated/meta_types.c
+13 -2
View File
@@ -35,9 +35,12 @@ TypeInfo*
type_info_from_shape(Shape v)
{
TypeInfo* result;
memset(&result, 0, sizeof(result));
switch (v)
{
default:
{
result = 0;
}break;
case Shape_Circle:
{
result = &Circle_type_info;
@@ -57,13 +60,21 @@ U32
max_slot_from_shape(Shape v)
{
U32 result;
memset(&result, 0, sizeof(result));
switch (v)
{
default:
{
result = 0;
}break;
case Shape_Polygon:
{
result = 12;
}break;
case Shape_Circle:
case Shape_Segment:
{
result = 64;
}break;
}
return(result);
}
examples/type_metadata/type_info_final_program.c
-1
View File
@@ -8,7 +8,6 @@
//~ setup base types //////////////////////////////////////////////////////////
#include <stdint.h>
#include <string.h>
typedef uint32_t U32;
typedef float F32;
typedef struct V2F32 V2F32;
examples/type_metadata/type_metadata.c
+65 -3
View File
@@ -928,12 +928,73 @@ gen_function_definitions_from_maps(FILE *out)
fprintf(out, "%.*s\n", MD_S8VArg(out_type));
fprintf(out, "%.*s(%.*s v)\n", MD_S8VArg(map->node->string), MD_S8VArg(in_type));
fprintf(out, "{\n");
// TODO implement default
// TODO implement auto
fprintf(out, "%.*s result;\n", MD_S8VArg(out_type));
fprintf(out, "memset(&result, 0, sizeof(result));\n");
fprintf(out, "switch (v)\n");
fprintf(out, "{\n");
// default
fprintf(out, "default:\n");
fprintf(out, "{\n");
if (!MD_NodeIsNil(map->default_val))
{
MD_String8 default_expr = map->default_val->string;
MD_String8 val_expr = default_expr;
if (map->out_is_type_info_ptr)
{
val_expr = MD_S8Fmt(scratch.arena, "&%.*s_type_info", MD_S8VArg(default_expr));
}
fprintf(out, "result = %.*s;\n", MD_S8VArg(val_expr));
}
else if (map->out_is_type_info_ptr)
{
fprintf(out, "result = 0;\n");
}
fprintf(out, "}break;\n");
// auto cases
if (!MD_NodeIsNil(map->auto_val))
{
int map_has_an_implicit_case = 0;
for (GEN_TypeEnumerant *enumerant = map->in->first_enumerant;
enumerant != 0;
enumerant = enumerant->next)
{
int enumerant_has_explicit_case = 0;
for (GEN_MapCase *map_case = map->first_case;
map_case != 0;
map_case = map_case->next)
{
if (map_case->in_enumerant == enumerant)
{
enumerant_has_explicit_case = 1;
break;
}
}
if (!enumerant_has_explicit_case)
{
map_has_an_implicit_case = 1;
MD_String8 in_expr = enumerant->node->string;
fprintf(out, "case %.*s_%.*s:\n", MD_S8VArg(in_type), MD_S8VArg(in_expr));
}
}
if (map_has_an_implicit_case)
{
MD_String8 auto_expr = map->auto_val->string;
MD_String8 val_expr = auto_expr;
if (map->out_is_type_info_ptr)
{
val_expr = MD_S8Fmt(scratch.arena, "&%.*s_type_info", MD_S8VArg(auto_expr));
}
fprintf(out, "{\n");
fprintf(out, "result = %.*s;\n", MD_S8VArg(val_expr));
fprintf(out, "}break;\n");
}
}
// explicit cases
for (GEN_MapCase *map_case = map->first_case;
map_case != 0;
map_case = map_case->next)
@@ -951,6 +1012,7 @@ gen_function_definitions_from_maps(FILE *out)
fprintf(out, "result = %.*s;\n", MD_S8VArg(val_expr));
fprintf(out, "}break;\n");
}
fprintf(out, "}\n");
fprintf(out, "return(result);\n");
fprintf(out, "}\n");