Signed-off-by: Tomek Grabiec <tgrab...@gmail.com> --- jit/tree-printer.c | 22 ++++++++++++++++++++++ 1 files changed, 22 insertions(+), 0 deletions(-)
diff --git a/jit/tree-printer.c b/jit/tree-printer.c index b20d80a..7783f55 100644 --- a/jit/tree-printer.c +++ b/jit/tree-printer.c @@ -608,6 +608,27 @@ out: return err; } +static int print_truncation_expr(int lvl, struct string *str, + struct expression *expr) +{ + int err; + + err = append_formatted(lvl, str, "TRUNCATION:\n"); + if (err) + goto out; + + err = append_simple_attr(lvl + 1, str, "to_type", + type_names[expr->to_type]); + if (err) + goto out; + + err = append_tree_attr(lvl + 1, str, "from_expression", + expr->unary_expression); + +out: + return err; +} + static int print_class_field_expr(int lvl, struct string *str, struct expression *expr) { @@ -1053,6 +1074,7 @@ static print_expr_fn expr_printers[] = { [EXPR_ARRAY_DEREF] = print_array_deref_expr, [EXPR_BINOP] = print_binop_expr, [EXPR_UNARY_OP] = print_unary_op_expr, + [EXPR_TRUNCATION] = print_truncation_expr, [EXPR_CONVERSION] = print_conversion_expr, [EXPR_CONVERSION_FLOAT_TO_DOUBLE] = print_conversion_expr, [EXPR_CONVERSION_DOUBLE_TO_FLOAT] = print_conversion_expr, -- 1.6.0.6 ------------------------------------------------------------------------------ Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day trial. Simplify your report design, integration and deployment - and focus on what you do best, core application coding. Discover what's new with Crystal Reports now. http://p.sf.net/sfu/bobj-july _______________________________________________ Jatovm-devel mailing list Jatovm-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/jatovm-devel