BEGINEXTERN
void changevalue(entree *ep, GEN val);
void freeep(entree *ep);
void pari_fill_hashtable(entree **table, entree *ep);
void compile_err(const char *msg, const char *str);
void compile_varerr(const char *str);
#ifdef STACK_CHECK
extern THREAD void *PARI_stack_limit;
#endif
extern entree **varentries;
struct node_loc
{
const char *start,*end;
};
union token_value { long val; };
int pari_lex(union token_value *yylval, struct node_loc *yylloc, char **lex);
int pari_parse(char **lex);
entree* fetch_entry_raw(const char *s, long len);
entree* fetch_entry(const char *s);
void optimizenode(long n);
void push_frame(GEN C, long lpc, long flag);
GEN gp_closure(long n);
long eval_mnemonic(GEN str, const char *tmplate);
ENDEXTERN