array<integer> F_nextFree856
integer F_firstFree170
integer F_maxIndex746
array<integer> F_typeId114


integer F_firstFree170 = 0
integer F_maxIndex746 = 0


function initGlobals424() { 
    F_firstFree_170 = 0;
    F_maxIndex_746 = 0;
}


function main683() { 
    initGlobals424();
    init_A477();
}


function config260() { 
}


function init_A477() { 
    local integer x214
    local integer clVar789
    clVar_789 = alloc_F_blub_A192();
    x_214 = blub500(5, clVar_789);
    if (x_214 == 6) {
        testSuccess137();
    } else {
    };
}


function blub500(integer x879, integer f316) returns integer { 
    return dispatch_F_A_F_apply729(f_316, x_879);
}


IS_NATIVE function testSuccess137() { 
}


function apply_blub_A198(integer this138, integer x178) returns integer { 
    return (x_178 + 1);
}


function alloc_F_blub_A192() returns integer { 
    local integer this461
    if (F_firstFree_170 == 0) {
        if (F_maxIndex_746 < 32768) {
            F_maxIndex_746 = (F_maxIndex_746 + 1);
            this_461 = F_maxIndex_746;
            F_typeId_114[this_461] = 2;
        } else {
            error162("Out of memory: Could not create F_blub_A.");
            this_461 = 0;
        };
    } else {
        F_firstFree_170 = (F_firstFree_170 - 1);
        this_461 = F_nextFree_856[F_firstFree_170];
        F_typeId_114[this_461] = 2;
    };
    return this_461;
}


function error162(string msg105) { 
    $debugPrint186((msg_105 + ("
" + #getStackTrace())));
}


function dispatch_F_A_F_apply729(integer this172, integer x168) returns integer { 
    local integer A_F_apply_result454
    if (F_typeId_114[this_172] == 0) {
        if (this_172 == 0) {
            error162("Nullpointer exception when calling F.apply");
        } else {
            error162("Called F.apply on invalid object.");
        };
    } else {
    };
    A_F_apply_result_454 = apply_blub_A198(this_172, x_168);
    return A_F_apply_result_454;
}