Function var_parse_file_compile

src/engine/function.cpp:2033–2079

    struct dynamic_array * out );

static void var_parse_file_compile( VAR_PARSE_VAR const * parse, compiler * c )
{
    std::string var = var_parse_to_string( parse, true );
    int32_t empty_mod_index = var_parse_var_mod_index( parse, 'E' );
    int32_t grist_mod_index = var_parse_var_mod_index( parse, 'G' );
    int32_t modifier_count = 0;
    // Push the contents, aka the edit modifier value.
    {
        assert( empty_mod_index >= 0 );
        // We reparse the edit modifier as we do teh expansion differently than
        // regular var expansion.
        std::string contents_val = var_parse_to_string(
            dynamic_array_at(
                VAR_PARSE_GROUP *, parse->modifiers, empty_mod_index ), false );
        dynamic_array contents_dyn_array;
        dynamic_array_init( &contents_dyn_array );
        parse_var_string(
            contents_val.c_str() + 2, contents_val.c_str() + contents_val.size(),
            &contents_dyn_array );
        for ( int32_t i = contents_dyn_array.size - 1; i >= 0; --i )
        {
            auto group = dynamic_array_at(
                VAR_PARSE_GROUP *, ( &contents_dyn_array ), i );
            var_parse_group_compile( group, c );
            var_parse_group_free( group );
        }
        dynamic_array_free( &contents_dyn_array );
        compile_emit( c, INSTR_APPEND_STRINGS, contents_dyn_array.size );
    }
    // If there are modifiers, emit them in reverse order.
    if ( parse->modifiers->size > 0 )
    {
        for ( int32_t i = parse->modifiers->size - 1; i >= 0; --i )
        {
            // Skip special modifiers.
            if ( i == empty_mod_index || i == grist_mod_index ) continue;
            modifier_count += 1;
            var_parse_group_compile(
                dynamic_array_at( VAR_PARSE_GROUP *, parse->modifiers, i ), c );
        }
    }
    // Push the filename, aka var name.
    var_parse_group_compile( parse->name, c );
    // This instruction applies the modifiers and writes out the file and fills
    // in the file name.
    compile_emit( c, INSTR_WRITE_FILE, modifier_count );
}

static void var_parse_compile( VAR_PARSE const * parse, compiler * c )
{