30 #define fePutChar(c) fputc((unsigned char)(c),stdout)
34 #define INITIAL_PRINT_BUFFER 24*1024L
38 #define MAX_FILE_BUFFER 4*4096
70 more = ((more + (8*1024-1))/(8*1024))*(8*1024);
74 #if (!defined(SING_NDEBUG)) && (!defined(OM_NDEBUG))
117 more = ((more + (8*1024-1))/(8*1024))*(8*1024);
142 more = ((l + (4*1024-1))/(4*1024))*(4*1024);
170 void PrintTCLS(
const char c,
const char *
s)
173 if (l>0) PrintTCL(c,l,s);
194 strcat(
feErrors,
"Singular error: ");
204 vsprintf(s, fmt, ap);
212 #define warn_str "// ** "
225 fwrite(s,1,strlen(s),stdout);
226 fwrite(
"\n",1,1,stdout);
237 void Warn(
const char *fmt, ...)
242 #ifdef HAVE_VSNPRINTF
243 vsnprintf(s, 256, fmt, ap);
245 vsprintf(s, fmt, ap);
260 if (sprint_backup!=
NULL)
WerrorS(
"internal error: SPrintStart");
261 else sprint_backup=
sprint;
269 if ((s ==
NULL)||(*s ==
'\0'))
return;
273 int l = strlen(sprint);
274 ns = (
char*)
omAlloc((l + ls + 1)*
sizeof(char));
275 if (l > 0) strcpy(ns, sprint);
312 fwrite(s,1,strlen(s),stdout);
334 int ls = strlen(fmt);
335 if (fmt !=
NULL && ls > 0)
338 int l = strlen(sprint);
339 ns = (
char*)
omAlloc(
sizeof(
char)*(ls + l + 512));
340 if (l > 0) strcpy(ns, sprint);
342 #ifdef HAVE_VSNPRINTF
343 l = vsnprintf(&(ns[l]), ls+511, fmt, ap);
346 vsprintf(&(ns[l]), fmt, ap);
362 #ifdef HAVE_VSNPRINTF
363 l = vsnprintf(s, ls+511, fmt, ap);
364 if ((l==-1)||(s[l]!=
'\0')||(l!=(
int)strlen(s)))
366 printf(
"Print problem: l=%d, fmt=>>%s<<\n",l,fmt);
369 vsprintf(s, fmt, ap);
379 while(l>=0) {
PrintS(
" "); l--; }
389 if (*s >=
'0' && *s <=
'9')
392 while (*s >=
'0' && *s <=
'9')
400 Werror(
"`%s` greater than %d(max. integer representation)",
419 (r !=
NULL ? r :
""));
const CanonicalForm int s
#define omCheckAddrSize(addr, size)
void WerrorS_batch(const char *s)
void feStringAppendResources(int warn)
#define omreallocSize(addr, o_size, size)
static char * feResource(feResourceConfig config, int warn)
static char * feBufferStart
#define omFreeSize(addr, size)
const CanonicalForm CFMap CFMap int &both_non_zero int n
void Print(const char *fmt,...)
void WerrorS(const char *s)
#define INITIAL_PRINT_BUFFER
static char * feBuffer_save[8]
void WarnS(const char *s)
#define omReallocSize(addr, o_size, size)
static void SPrintS(const char *s)
void StringSetS(const char *st)
void StringAppendS(const char *st)
const char feNotImplemented[]
void Warn(const char *fmt,...)
void PrintS(const char *s)
static long feBufferLength
static char * sprint_backup
static long feBufferLength_save[8]
const char * eati(const char *s, int *i)
static char * feBufferStart_save[8]
void omMarkAsStaticAddr(void *addr)
#define omCheckAddr(addr)
feResourceConfig_s feResourceConfigs[]
void StringAppend(const char *fmt,...)
void Werror(const char *fmt,...)
void PrintNSpaces(const int n)