From 357583c1d17341b31e96ad06f88738aa0a75f38f Mon Sep 17 00:00:00 2001 From: Michael Beck Date: Sun, 7 Dec 2008 13:23:02 +0000 Subject: [PATCH] - fixed assertiton (used ENTIFY_PARAMETER yet) - add missing skip_typeref() [r24372] --- write_caml.c | 2 +- write_fluffy.c | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/write_caml.c b/write_caml.c index 64ec6a8..c226c3d 100644 --- a/write_caml.c +++ b/write_caml.c @@ -203,7 +203,7 @@ static void write_function(const entity_t *entity) entity_t *parameter = entity->function.parameters.entities; for( ; parameter != NULL; parameter = parameter->base.next) { - assert(parameter->kind == ENTITY_VARIABLE); + assert(parameter->kind == ENTITY_PARAMETER); write_type(parameter->declaration.type); fputs(" -> ", out); } diff --git a/write_fluffy.c b/write_fluffy.c index c57d51d..dadf943 100644 --- a/write_fluffy.c +++ b/write_fluffy.c @@ -281,7 +281,7 @@ static void write_function(const entity_t *entity) entity_t *parameter = entity->function.parameters.entities; int first = 1; for( ; parameter != NULL; parameter = parameter->base.next) { - assert(parameter->kind == ENTITY_VARIABLE); + assert(parameter->kind == ENTITY_PARAMETER); if(!first) { fprintf(out, ", "); } else { @@ -304,7 +304,7 @@ static void write_function(const entity_t *entity) } fprintf(out, ")"); - const type_t *return_type = function_type->return_type; + const type_t *return_type = skip_typeref(function_type->return_type); if(!is_type_atomic(return_type, ATOMIC_TYPE_VOID)) { fprintf(out, " : "); write_type(return_type); -- 2.20.1