gehe zur Dokumentation dieser Datei00001
00044
00045
00046
00047
00048
00049 #ifndef GRAFKERN_H
00050 #define GRAFKERN_H
00051
00052 #include "Defs.h"
00053
00054
00055 #if defined(WX)
00056 #include "wx/wx.h"
00057 #endif
00058 #include "Errors.h"
00059
00060 void scanner_protokoll(int zeichen);
00061 void AktionenInit();
00062
00063 void AktionenMessage(int box, const char *meldung );
00064
00065 void fatal_error( int nummer, ... );
00066
00067 void compiler_warning( int nummer, ... );
00068
00069 void laufzeit_protokoll(const char * formatstring , ... );
00070
00071 void init_laufzeit_protokoll( void );
00072
00073 void exit_laufzeit_protokoll( void );
00074
00075 void protokoll_aktion(const char * name);
00076
00077 void clear_protokoll_screen( void );
00078
00079 void calc_declaration_numbers(char withNames = 0);
00080
00081 void show_line_number( int n );
00082
00083 #ifdef MUTWIN
00084 #ifdef WX
00085 #include "CompDlg.h"
00086 void InitCompDia(CompDlg *compDia, wxString filename);
00087
00088 #else
00089 void InitCompDia(HWND compDiaLine);
00090
00091 #endif
00092 #endif
00093
00094 void drucke_keyboard_liste( int instr );
00095
00096 void update_keyboard_liste( int instr );
00097
00098 void enable_protokoll_frame( void );
00099
00100 extern int scanner_echo;
00101
00102 #ifdef MUTWIN
00103 extern "C"
00104 {
00105 int pascal GetActString(unsigned char **box, int **l, char **s);
00106 char* pascal GetKeyString(int box, char asTS);
00107 char* pascal GetTSString(int box, char asTS);
00108 int pascal GetLineNumbers();
00109 int pascal GetErrorLine();
00110 }
00111
00112 #endif
00113
00114 #ifdef WX
00115 extern wxString sd1, sd2, sd3, sd4, sd5, sd6;
00116
00117 extern wxString Fmeldung;
00118
00119 #define LAUFZEIT_ERROR0(format) Fmeldung = format
00120 #define LAUFZEIT_ERROR1(format, a) Fmeldung = wxString::Format(format, a)
00121 #define LAUFZEIT_ERROR2(format, a, b) Fmeldung = wxString::Format(format, a, b)
00122 #else
00123 extern char sd1[100], sd2[100];
00124
00125 extern char Fmeldung[255];
00126
00127 #define LAUFZEIT_ERROR0(format, a) strcpy(Fmeldung, format)
00128 #define LAUFZEIT_ERROR1(format, a) sprintf(Fmeldung, format, a)
00129 #define LAUFZEIT_ERROR2(format, a, b) sprintf(Fmeldung, format, a, b)
00130 #endif
00131
00132 #endif
00133
00134
