| 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 |
|
|