OpenXM_contrib2/asir2000/parse/glob.c - diff

Return to glob.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / parse

version 1.34, 2003/04/02 09:43:33

version 1.37, 2003/09/12 01:12:41

Line 45

* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2000/parse/glob.c,v 1.33 2003/03/07 06:39:59 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2000/parse/glob.c,v 1.36 2003/05/16 07:56:16 noro Exp $

#include "ca.h"

#include "al.h"

Line 128 struct oVS oGPVS,oAPVS,oEPVS;

VS GPVS = &oGPVS;

VS APVS = &oAPVS;

VS EPVS = &oEPVS;

VS CPVS;

VS CPVS,MPVS;

NODE MODULE_LIST;

MODULE CUR_MODULE;

char *CUR_FUNC;

struct oF oF_TRUE,oF_FALSE;

F F_TRUE = &oF_TRUE;

F F_FALSE = &oF_FALSE;

Line 627 SNODE error_snode;

Line 631 SNODE error_snode;

void error(char *s)

{

SNODE *snp;

SNODE *snp=0;

#if !defined(VISUAL)

if ( timer_is_set )

Line 636 void error(char *s)

Line 640 void error(char *s)

fprintf(stderr,"%s\n",s);

set_lasterror(s);

if ( CPVS != GPVS ) {

if ( CPVS->usrf && CPVS->usrf && CPVS->usrf->f.usrf )

if ( CPVS && CPVS->usrf && CPVS->usrf->f.usrf )

searchsn(&BDY(CPVS->usrf->f.usrf),evalstatline,&snp);

if ( snp )

error_snode = *snp;