/*************************************************************************/
/*                                                                       */
/*                 Declarations specifiques GP                           */
/*                                                                       */
/*************************************************************************/
/* $Id: gp.h,v 2.0.0.2 1997/12/14 20:11:49 karim Exp karim $ */

long   marklist(void);
void   pari_addfunctions(module **modlist_p, entree *func, char **help);

extern long try_to_recover;
extern ulong init_opts;

extern char current_logfile[128];
extern jmp_buf environnement;


/* for do_time() */
enum { ti_NOPRINT, ti_REGULAR, ti_LAST, ti_INTERRUPT };

/* for gp_main_loop() */
enum { MAIN, REGULAR, SILENT };

/* GP printing format */
typedef struct gp_format {
  char format; /* f, g or h */
  long field;  /* (0 = ignore) */
  long nb;     /* significant digits for reals (-1 = all) */
} gp_format;

/* default functions (i.e setd*) */
enum { d_ACKNOWLEDGE, d_INITRC, d_SILENT };

/* output format */
enum { f_RAW, f_PRETTYMAT, f_PRETTY, f_TEX };

#define NBFORMATS 4

/* aide() */
enum { h_REGULAR, h_LONG, h_RL };
