24 |
|
#include <stdio.h> |
25 |
|
#include <string.h> |
26 |
|
#include "BASS_parse.h" |
27 |
+ |
#include "../headers/simError.h" |
28 |
|
#ifdef IS_MPI |
29 |
|
#define __is_lex__ |
30 |
|
#include "../headers/mpiBASS.h" |
236 |
|
// shove the whole quoted string into the macro |
237 |
|
|
238 |
|
definition[def_ptr] = c; |
239 |
< |
fprintf( stderr, "%c", c ); |
239 |
> |
//fprintf( stderr, "%c", c ); |
240 |
|
def_ptr++; |
241 |
|
check_def_buff( yytext, def_ptr ); |
242 |
|
|
244 |
|
while( c != '\"' ){ |
245 |
|
|
246 |
|
definition[def_ptr] = c; |
247 |
< |
fprintf( stderr, "%c", c ); |
247 |
> |
//fprintf( stderr, "%c", c ); |
248 |
|
def_ptr++; |
249 |
|
check_def_buff( yytext, def_ptr ); |
250 |
|
|
251 |
|
c = input(); |
252 |
|
} |
253 |
|
definition[def_ptr] = c; |
254 |
< |
fprintf( stderr, "%c", c ); |
254 |
> |
//fprintf( stderr, "%c", c ); |
255 |
|
def_ptr++; |
256 |
|
check_def_buff( yytext, def_ptr ); |
257 |
|
c = input(); |
287 |
|
default: |
288 |
|
// the '/' char was a normal symbol |
289 |
|
definition[def_ptr] = '/'; |
290 |
< |
fprintf( stderr, "%c", c ); |
290 |
> |
//fprintf( stderr, "%c", c ); |
291 |
|
def_ptr++; |
292 |
|
check_def_buff( yytext, def_ptr ); |
293 |
|
break; |
318 |
|
// we now know the character is a good one |
319 |
|
|
320 |
|
definition[def_ptr] = c; |
321 |
< |
fprintf( stderr, "%c", c ); |
321 |
> |
//fprintf( stderr, "%c", c ); |
322 |
|
def_ptr++; |
323 |
|
check_def_buff( yytext, def_ptr ); |
324 |
|
} |
416 |
|
|
417 |
|
if( index >= DEFINED_BUFFER_SIZE ){ |
418 |
|
|
419 |
< |
fprintf( stderr, "Define buffer size exceeded for %s\n", defined ); |
420 |
< |
#ifdef IS_MPI |
421 |
< |
mpiInterfaceExit(); |
421 |
< |
#endif |
422 |
< |
exit(1); |
419 |
> |
sprintf( painCave.errMsg, "Define buffer size exceeded for %s\n", defined ); |
420 |
> |
painCave.isFatal = 1; |
421 |
> |
simError(); |
422 |
|
} |
423 |
|
} |
424 |
|
|