/*************************************************************************** gbc_compile.h (c) 2000-2017 BenoƮt Minisini This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. ***************************************************************************/ #ifndef _COMPILE_H #define _COMPILE_H #include #include "gb_array.h" #include "gb_buffer.h" #include "gb_table.h" #include "gb_alloc.h" #include "gb_limit.h" #include "gb_reserved.h" #include "gbc_read.h" #include "gbc_form.h" #include "gbc_class.h" enum { MSG_ERROR = 0, MSG_WARNING = 1 }; typedef struct { char *name; // source file name int line; // current line number int first_line; // first line to compile int max_line; // maximum line number char *source; // source file contents unsigned verbose : 1; // verbose compilation unsigned debug : 1; // if debugging information must be generated unsigned trans : 1; // if translation files must be generated unsigned is_module : 1; // if the source file is a module unsigned is_form : 1; // if the source is a class form unsigned declared : 1; // ? unsigned nobreak : 1; // no breakpoint unsigned exported : 1; // there are some exported class unsigned all : 1; // compile everything unsigned swap : 1; // endianness must be swapped unsigned public_module : 1; // modules symbols are public by default unsigned trans_error : 1; // display error messages in a translatable form unsigned no_old_read_syntax : 1; // do not compile the old read syntax unsigned column : 1; // search column where there is an error unsigned exec : 1; // we are compiling for an executable unsigned warnings : 1; // if warnings must be printed unsigned no_jit : 1; // if jit is disabled unsigned _reserved : 15; // reserved char *output; // output file PATTERN *pattern; // lexical analyze int pattern_count; // number of patterns PATTERN *current; // current pattern PATTERN *end; // last pattern FUNCTION *func; // current function being compiled CLASS *class; // current class being compiled char *form; // form file name const FORM_FAMILY *family; // form file family char *tname; // translation file name int default_library; // default library name for extern declarations const char **help; // help comments array int help_first_line; // line of the first help comment char *hname; // help file name } COMPILE; #ifndef __GBC_COMPILE_C EXTERN COMPILE COMP_current; EXTERN char *COMP_root; EXTERN char *COMP_project; EXTERN char *COMP_project_name; EXTERN char *COMP_info_path; EXTERN FORM_FAMILY COMP_form_families[]; EXTERN uint COMPILE_version; #endif #define JOB (&COMP_current) void COMPILE_init(void); void COMPILE_load(void); void COMPILE_exit(void); void COMPILE_begin(const char *file, bool trans, bool debug); void COMPILE_end(void); void COMPILE_export_class(char *name); void COMPILE_add_class(const char *name, int len); void COMPILE_end_class(); void COMPILE_enum_class(char **name, int *len); void COMPILE_print(int type, int line, const char *msg, ...); #endif