diff --git a/oberon.h b/oberon.h
index 53693a79629e8b772c38497cfc0c00046891cbed..189369b9c0cb324564b82aca21b21000a416e944 100644 (file)
--- a/oberon.h
+++ b/oberon.h
OBERON_TYPE_PROCEDURE,
OBERON_TYPE_ARRAY,
OBERON_TYPE_RECORD,
- OBERON_TYPE_POINTER
+ OBERON_TYPE_POINTER,
+ OBERON_TYPE_REAL
};
/*
char c;
int token;
char * string;
- int integer;
+ long integer;
+ double real;
/*** END SCANER DATA ***/
/*** PARSER DATA ***/
oberon_type_t * int_type;
oberon_type_t * bool_type;
+ oberon_type_t * real_type;
oberon_type_t * void_type;
oberon_type_t * void_ptr_type;
oberon_scope_t * world_scope;
MODE_FIELD,
MODE_DEREF,
MODE_NIL,
- MODE_NEW
+ MODE_NEW,
+ MODE_REAL
};
enum
int read_only;
int mode;
- int integer;
+ long integer;
+ double real;
int boolean;
oberon_object_t * var;