2007-12-30 17:41:49 +01:00
|
|
|
/***************************************************************************
|
|
|
|
|
2009-08-17 12:41:51 +02:00
|
|
|
gbx_expression.h
|
2007-12-30 17:41:49 +01:00
|
|
|
|
2009-08-17 12:41:51 +02:00
|
|
|
(c) 2000-2009 Benoît Minisini <gambas@users.sourceforge.net>
|
2007-12-30 17:41:49 +01:00
|
|
|
|
|
|
|
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
|
2009-08-17 12:41:51 +02:00
|
|
|
the Free Software Foundation; either version 2, or (at your option)
|
2007-12-30 17:41:49 +01:00
|
|
|
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., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
|
|
|
|
|
|
***************************************************************************/
|
|
|
|
|
|
|
|
#ifndef __GBX_EXPRESSION_H
|
|
|
|
#define __GBX_EXPRESSION_H
|
|
|
|
|
|
|
|
#include "gb_table.h"
|
|
|
|
#include "gbx_class.h"
|
|
|
|
|
|
|
|
typedef
|
|
|
|
struct {
|
|
|
|
char *source;
|
|
|
|
int len;
|
|
|
|
PATTERN *pattern;
|
|
|
|
int pattern_count;
|
|
|
|
PATTERN *current;
|
|
|
|
PATTERN *tree;
|
|
|
|
CLASS exec_class;
|
|
|
|
CLASS_LOAD class_load;
|
|
|
|
FUNCTION func;
|
|
|
|
CLASS_CONST *cst;
|
|
|
|
ushort *code;
|
|
|
|
ushort ncode;
|
[DEVELOPMENT ENVIRONMENT]
* BUG: Use TextEdit.RichText insted of TextEdit.Text.
* BUG: END SUB can be the end of a method. The class analyze now takes
that into account.
[HELP]
* BUG: Fixed the generated treeview.
[COMPILER]
* OPT: The NOT operator used just at the beginning of a conditional
expression is optimized. Consequently, an expression like 'IF NOT 2' is
now equivalent to 'IF 2 = 0' and not to 'IF (NOT 2) <> 0' as before. In
other words, the boolean conversion is now done before the NOT, and not
after. The following instructions are concerned: IF, WHILE, UNTIL.
* NEW: BYREF is new keyword that is a more readable synonymous of '@'.
[GB.DB.FORM]
* BUG: Correctly manage data controls inside TabStrip-like containers.
* BUG: Setting the focus on a non-initialized DataControl does not raise
an error anymore.
[GB.GTK]
* BUG: HSplitter.Layout and VSplitter.Layout now work correctly. It is a
list of children widths, hidden children having a zero width.
* BUG: Window arrangement is done before the Open event is raised, as in
gb.qt.
* BUG: Keyboard, focus and mouse events now work correctly on Window and
DrawingArea controls.
[GB.QT]
* BUG: HSplitter.Layout and VSplitter.Layout now work correctly. It is a
list of children widths, hidden children having a zero width.
* BUG: Many warning fixes.
* BUG: Now the Control.Visible property works like in gb.gtk, i.e. it
returns if the control was not explicitely hidden.
git-svn-id: svn://localhost/gambas/trunk@1060 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2008-02-06 01:25:48 +01:00
|
|
|
ushort ncode_max;
|
2007-12-30 17:41:49 +01:00
|
|
|
TABLE *table;
|
|
|
|
TABLE *string;
|
|
|
|
/*TABLE *variable;*/
|
|
|
|
CLASS **class;
|
|
|
|
char **unknown;
|
|
|
|
int *var;
|
|
|
|
short nvar;
|
|
|
|
short last_code;
|
2008-03-17 15:54:17 +01:00
|
|
|
short last_code2;
|
2009-08-24 16:19:32 +02:00
|
|
|
short assign_code;
|
|
|
|
int stack_usage;
|
|
|
|
void *op;
|
2008-03-17 15:54:17 +01:00
|
|
|
unsigned analyze : 1;
|
2008-03-27 17:27:24 +01:00
|
|
|
unsigned rewrite : 1;
|
2009-07-14 04:24:54 +02:00
|
|
|
unsigned comment : 1;
|
2009-08-24 16:19:32 +02:00
|
|
|
//unsigned _reserved : 12;
|
2007-12-30 17:41:49 +01:00
|
|
|
}
|
2009-08-24 16:19:32 +02:00
|
|
|
//PACKED
|
2007-12-30 17:41:49 +01:00
|
|
|
EXPRESSION;
|
|
|
|
|
|
|
|
typedef
|
|
|
|
struct {
|
|
|
|
SYMBOL sym;
|
|
|
|
int local;
|
|
|
|
}
|
|
|
|
EVAL_SYMBOL;
|
|
|
|
|
|
|
|
#endif
|