hyung-hwan/qse
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
hyung-hwan 2007-02-12 03:10:48 +00:00
parent 2ad86aded7
commit c61933deb2
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
ase/awk/run.c
View File

@ -1,5 +1,5 @@
/* /*
* $Id: run.c,v 1.326 2007-02-11 14:07:28 bacon Exp $ * $Id: run.c,v 1.327 2007-02-12 03:10:48 bacon Exp $
* *
* {License} * {License}
*/ */
@ -1507,14 +1507,14 @@ static int run_main (
} }
v = STACK_RETVAL(run); v = STACK_RETVAL(run);
if (n == 0)
if (runcbs != ASE_NULL && runcbs->on_return != ASE_NULL)
{ {
runcbs->on_return (run, v, runcbs->custom_data); if (runcbs != ASE_NULL && runcbs->on_return != ASE_NULL)
{
runcbs->on_return (run, v, runcbs->custom_data);
}
} }
/* end the life of the global return value */
/* the life of the global return value is over here
* unlike the return value of each function */
ase_awk_refdownval (run, v); ase_awk_refdownval (run, v);
run->stack_top = run->stack_top =
@ -1532,7 +1532,7 @@ static int run_main (
__raw_pop (run); __raw_pop (run);
} }
/* just reset the exit level */ /* reset the exit level */
run->exit_level = EXIT_NONE; run->exit_level = EXIT_NONE;
return n; return n;