uses word startup in other context.
FUNCTION SYM { DBG( "Begining of function %s\n", $2->name ); cf_push_scope($2); } function_params function_body {
extern struct f_inst *startup_func;
cf_define_symbol($2, SYM_FUNCTION, $5);
- if (!strcasecmp($2->name, "startup"))
+ if (!strcasecmp($2->name, "__startup"))
startup_func = $5;
$2->aux = (int) $4;
$2->aux2 = $5;
p2 = prepend( p2, 5 );
print "Should be false: ", p2 ~ p;
print "Should be true: ", p2 ~ / * 4 3 2 1 /, p2, / * 4 3 2 1 /;
+ print "Should be true: ", p2 ~ / * 4 3 * 1 /, p2, / * 4 3 * 1 /;
print "5 = ", p2.len;
l = - empty -;
print "Should be false: ", (2,3) ~ l;
}
-function startup()
+function bla()
+{
+ print "fifteen called";
+ return 15;
+}
+
+function __startup()
int i;
prefix px;
ip p;