[OpenSPARC-T2-SAM] / sam-t2 / devtools / amd64 / share / swig / 1.3.26 / ruby / fragments.i

// Helper function for Array output

%fragment("output_helper", "header") %{
static VALUE output_helper(VALUE target, VALUE o) {
    if (NIL_P(target)) {
	target = o;
    } else {
	if (TYPE(target) != T_ARRAY) {
	    VALUE o2 = target;
	    target = rb_ary_new();
	    rb_ary_push(target, o2);
	}
	rb_ary_push(target, o);
    }
    return target;
}
%}
Commit	Line	Data
920dae64 AT	1	// Helper function for Array output
	2
	3	%fragment("output_helper", "header") %{
	4	static VALUE output_helper(VALUE target, VALUE o) {
	5	if (NIL_P(target)) {
	6	target = o;
	7	} else {
	8	if (TYPE(target) != T_ARRAY) {
	9	VALUE o2 = target;
	10	target = rb_ary_new();
	11	rb_ary_push(target, o2);
	12	}
	13	rb_ary_push(target, o);
	14	}
	15	return target;
	16	}
	17	%}