oberon.h

   1 #ifndef EMBEDED_OBERON_SCRIPT_H
   2 #define EMBEDED_OBERON_SCRIPT_H
   3
   4 enum {
   5         OBERON_TYPE_INTEGER,
   6         OBERON_TYPE_BOOLEAN,
   7 };
   8
   9 typedef struct oberon_var_s oberon_var_t;
  10 typedef struct oberon_type_s oberon_type_t;
  11 typedef struct oberon_module_s oberon_module_t;
  12 typedef struct oberon_context_s oberon_context_t;
  13
  14 struct oberon_type_s
  15 {
  16         char * name;
  17         int class;
  18         int size;
  19         oberon_type_t * next;
  20 };
  21
  22 struct oberon_var_s
  23 {
  24         char * name;
  25         oberon_type_t * type;
  26         oberon_var_t * next;
  27 };
  28
  29 struct oberon_module_s
  30 {
  31         char * name;
  32         oberon_var_t * vars;
  33 };
  34
  35 struct oberon_context_s
  36 {
  37         const char * code;
  38         int code_index;
  39
  40         char c;
  41         int token;
  42         char * string;
  43         int integer;
  44
  45         oberon_module_t * mod;
  46
  47         oberon_type_t * types;
  48 };
  49
  50 oberon_context_t * oberon_create_context();
  51 void oberon_register_global_type(oberon_context_t * ctx, oberon_type_t * type);
  52 oberon_module_t * oberon_compile_module(oberon_context_t * ctx, const char * code);
  53
  54 #endif // EMBEDED_OBERON_SCRIPT_H