43 lines
1.2 KiB
C
43 lines
1.2 KiB
C
/* $Header$ */
|
|
|
|
/* language-dependent routines and formats, together in one structure: */
|
|
|
|
struct langdep {
|
|
/* language info: */
|
|
int has_bool_type; /* set if language has a boolean type */
|
|
|
|
/* formats (for fprintf): */
|
|
char *decint_fmt; /* decimal ints (format for long) */
|
|
char *octint_fmt; /* octal ints (format for long) */
|
|
char *hexint_fmt; /* hexadecimal ints (format for long) */
|
|
char *uns_fmt; /* unsigneds (format for long) */
|
|
char *addr_fmt; /* address (format for long) */
|
|
char *real_fmt; /* real (format for double) */
|
|
|
|
/* display openers and closers: */
|
|
char *open_array_display;
|
|
char *close_array_display;
|
|
char *open_struct_display;
|
|
char *close_struct_display;
|
|
char *open_set_display;
|
|
char *close_set_display;
|
|
|
|
/* language dependant routines: */
|
|
int (*printstring)();
|
|
int (*printchar)();
|
|
long (*arrayelsize)();
|
|
int (*binop_prio)();
|
|
int (*unop_prio)();
|
|
int (*get_string)();
|
|
int (*get_name)();
|
|
int (*get_number)();
|
|
int (*get_token)();
|
|
int (*printop)();
|
|
int (*fix_bin_to_pref)();
|
|
};
|
|
|
|
extern struct langdep *m2_dep, *c_dep, *pascal_dep, *currlang;
|
|
|
|
extern int find_language();
|
|
|
|
extern int init_languages();
|