17 #include "factory/factory.h" 39 #include <NTL/config.h> 48 #if defined(OMALLOC_USES_MALLOC) 73 #if NTL_MAJOR_VERSION>=10 74 #ifdef NTL_THREAD_BOOST 81 int optc, option_index;
87 if (optc ==
'?' || optc == 0)
89 fprintf(stderr,
"Use '%s --help' for a complete list of options\n",
feArgv0);
108 fprintf(stderr,
"Error: Option '--%s' %s\n",
111 fprintf(stderr,
"Error: Option '--%s=%s' %s\n",
113 fprintf(stderr,
"Use '%s --help' for a complete list of options\n",
feArgv0);
116 if (optc ==
'h') exit(0);
119 case FE_OPT_DUMP_VERSIONTUPLE:
132 #ifndef MAKE_DISTRIBUTION
136 " A Computer Algebra System for Polynomial Computations / version %s\n" 138 " by: W. Decker, G.-M. Greuel, G. Pfister, H. Schoenemann \\ %s\n" 139 "FB Mathematik der Universitaet, D-67653 Kaiserslautern \\ Debian " DEB_PKG_VERSION
"\n" 142 " shell invocation and links are disallowed");
153 #ifdef SINGULAR_PYOBJECT_SETUP_H 156 #ifdef SI_COUNTEDREF_AUTOLOAD 177 Warn(
"Can not open %s", argv[i]);
203 if (rc ==
NULL) rc =
feFopen(
".singularrc",
"r", buf);
208 Print(
"// ** executing %s\n", buf);
218 char *linkname=(
char*)
feOptValue(FE_OPT_LINK);
219 if((linkname!=
NULL)&&(strcmp(linkname,
"ssi")==0))
227 Print(
"** missing arguments: -b requires --link/--MPhost/--MPport\n");
#define optional_argument
void omFreeSizeFunc(void *addr, size_t size)
char *(* fe_fgets_stdin)(const char *pr, char *s, int size)
void pyobject_setup()
initialize blackbox support for pyobject; functionilty os autoloaded on demand
static void * feOptValue(feOptIndex opt)
int main(int argc, char **argv)
#define omInitGetBackTrace()
void omInitRet_2_Info(const char *argv0)
char * fe_fgets_dummy(const char *, char *, int)
BOOLEAN newFile(char *fname)
static const int SW_USE_NTL_SORT
set to 1 to sort factors in a factorization
const char * feSetOptValue(feOptIndex opt, char *optarg)
This file defines reusable classes supporting reference counted interpreter objects and initiates the...
int fe_getopt_long(int argc, char *const *argv, const char *options, const struct fe_option *long_options, int *opt_index)
void * omReallocSizeFunc(void *old_addr, size_t old_size, size_t new_size)
BOOLEAN singular_in_batchmode
int ssiBatch(const char *host, const char *port)
Voice * feInitStdin(Voice *pp)
int status int void * buf
void * malloc(size_t size)
struct fe_option feOptSpec[]
FILE * feFopen(const char *path, const char *mode, char *where, short useWerror, short path_only)
char name(const Variable &v)
#define LONG_OPTION_RETURN
void init_signals()
init signal handlers and error handling for libraries: NTL, factory
void * omMallocFunc(size_t size)
void newBuffer(char *s, feBufferTypes t, procinfo *pi, int lineno)
feOptIndex feGetOptIndex(const char *name)
const char SHORT_OPTS_STRING[]