Select Code to Download

int one_variable = 32;
int another_variable = 35;
float some_float;

typedef struct { 
    float one;
    float two;
    int   three;
    bool  potato;
} struct_name;

verify("foobar.one = 0.0", foobar.one, (float)0.0);
verify("foobar.two = 0.0", foobar.two, (float)0.0);
verify("foobar.three = 0", foobar.three, (int)0);
verify("foobar.potato = false", foobar.potato, (bool)false);

my %default_values = ( 'int' => '0',
                       'float' => '0.0',
                       'bool' => 'false' );
...
        print $output "           (@{$object_ref}[0])@{$object_ref}[2]
+);\n";
    }
}