version 1.62, 2006/02/08 02:11:19 |
version 1.63, 2006/02/08 04:33:50 |
|
|
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* |
* |
* $OpenXM: OpenXM_contrib2/asir2000/parse/glob.c,v 1.61 2006/02/03 03:55:18 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/parse/glob.c,v 1.62 2006/02/08 02:11:19 noro Exp $ |
*/ |
*/ |
#include "ca.h" |
#include "ca.h" |
#include "al.h" |
#include "al.h" |
Line 214 void ExitAsir() { |
|
Line 214 void ExitAsir() { |
|
/* |
/* |
* status = 1 abnormal termination (error() etc.) |
* status = 1 abnormal termination (error() etc.) |
* status = 2 normal termination (end(), quit() etc.) |
* status = 2 normal termination (end(), quit() etc.) |
|
* status = 3 absolute termination |
*/ |
*/ |
|
|
void asir_terminate(int status) |
void asir_terminate(int status) |
{ |
{ |
int t; |
int t; |
NODE n; |
NODE n; |
|
|
|
/* called from engine in Windows */ |
|
if ( status == 3 ) asir_infile = 0; |
|
|
if ( asir_infile && asir_infile->ready_for_longjmp ) |
if ( asir_infile && asir_infile->ready_for_longjmp ) |
LONGJMP(asir_infile->jmpbuf,status); |
LONGJMP(asir_infile->jmpbuf,status); |