diff options
Diffstat (limited to 'src/analysis/type.c')
-rw-r--r-- | src/analysis/type.c | 82 |
1 files changed, 79 insertions, 3 deletions
diff --git a/src/analysis/type.c b/src/analysis/type.c index d16917f..0cd021e 100644 --- a/src/analysis/type.c +++ b/src/analysis/type.c @@ -888,6 +888,7 @@ static char *g_encapsulated_type_to_string(const GEncapsulatedType *type) result = stradd(result, " imaginary"); break; + case ECT_ROUTINE: /* Pour GCC */ default: break; @@ -898,6 +899,65 @@ static char *g_encapsulated_type_to_string(const GEncapsulatedType *type) } +/****************************************************************************** +* * +* Paramètres : type = type à consulter. * +* * +* Description : Fournit le type d'encapsulation gérée par le type. * +* * +* Retour : Type d'encapsulation gérée. * +* * +* Remarques : - * +* * +******************************************************************************/ + +EncapsulationType g_encapsulated_type_get_etype(const GEncapsulatedType *type) +{ + return type->type; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type à consulter. * +* ... = sous-type ou routine encapsulée dans le type. [OUT] * +* * +* Description : Fournit la routine encapsulée dans le type. * +* * +* Retour : - * +* * +* Remarques : - * +* * +******************************************************************************/ + +void g_encapsulated_type_get_item(const GEncapsulatedType *type, ...) +{ + va_list ap; /* Liste variable d'arguments */ + GOpenidaType **child; /* Adresse pour sous-type */ + GBinRoutine **routine; /* Adresse pour routine */ + + va_start(ap, type); + + switch (type->type) + { + case ECT_ROUTINE: + routine = va_arg(ap, GBinRoutine **); + *routine = type->routine; + break; + + default: + child = va_arg(ap, GOpenidaType **); + *child = type->child; + break; + + } + + va_end(ap); + +} + + /* ---------------------------------------------------------------------------------- */ /* CLASSES / STRUCTURES ET ENUMERATIONS */ @@ -1125,8 +1185,6 @@ static GOpenidaType *g_template_type_dup(const GTemplateType *type) result = g_template_type_new(G_CLASS_ENUM_TYPE(type)->name, list); - g_slist_free(list); - return G_OPENIDA_TYPE(result); } @@ -1171,7 +1229,6 @@ static char *g_template_type_to_string(const GTemplateType *type) } - /****************************************************************************** * * * Paramètres : type = type à mettre à jour. * @@ -1204,6 +1261,25 @@ void g_template_type_add_params(GTemplateType *type, GSList *list) /****************************************************************************** * * +* Paramètres : type = type à consulter. * +* * +* Description : Indique le nombre de paramètres associés du gabarit. * +* * +* Retour : Nombre de paramètres inclus dans le gabarit. * +* * +* Remarques : - * +* * +******************************************************************************/ + +size_t g_template_type_count_param(const GTemplateType *type) +{ + return type->models_count; + +} + + +/****************************************************************************** +* * * Paramètres : type = type à consulter. * * index = indice du paramètre à retourner. * * * |