gambas-source-code/main/share/gbc_trans_common.h
Benoît Minisini c9ca5ab982 [CONFIGURATION]
* NEW: Update copyright year to 2013.

[GB.FORM]
* NEW: ImageView is a new control that allows to view an image inside a 
  scrolled view, at different zoom levels.
* BUG: FileProperties now works correctly if 'gb.desktop' is not used.
* NEW: The FileProperties preview tab now uses an ImageView control and has
  a toolbar to zoom the preview.
* BUG: Add the 'linux' and 'gnu' icon in the stock icon list.


git-svn-id: svn://localhost/gambas/trunk@5770 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2013-08-03 15:38:01 +00:00

174 lines
3.2 KiB
C

/***************************************************************************
gbc_trans_common.h
(c) 2000-2013 Benoît Minisini <gambas@users.sourceforge.net>
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 __GBC_TRANS_COMMMON_H
#define __GBC_TRANS_COMMMON_H
typedef
struct {
TYPE type;
int index;
PATTERN *optional;
short value;
unsigned ignore : 1;
}
TRANS_PARAM; /* must be the same as PARAM in class.h */
typedef
PATTERN TRANS_TREE;
typedef
struct {
int type;
int ival;
int64_t lval;
double dval;
bool complex;
}
TRANS_NUMBER;
typedef
struct {
TYPE type;
int ndim;
int dim[MAX_ARRAY_DIM];
}
TRANS_ARRAY;
typedef
struct {
int index; /* index in symbol table */
TYPE type; /* data type */
int value; /* value */
TRANS_ARRAY array; /* array dimensions */
PATTERN *init; /* initialization code */
int64_t lvalue; /* The value of a LONG constant */
unsigned is_new : 1; /* if something must be instanciated */
unsigned is_integer : 1; /* if the constant is an integer */
unsigned is_embedded : 1; /* if it is an embedded array */
}
PACKED
TRANS_DECL;
typedef
struct {
int index;
TYPE type;
short nparam;
unsigned vararg : 1;
unsigned _reserved : 15;
TRANS_PARAM param[MAX_PARAM_FUNC];
PATTERN *start;
int line;
uint64_t byref;
unsigned fast : 1;
}
PACKED
TRANS_FUNC;
typedef
struct {
int index;
TYPE type;
short nparam;
short _reserved;
TRANS_PARAM param[MAX_PARAM_FUNC];
}
PACKED
TRANS_EVENT;
typedef
struct {
int index;
TYPE type;
short nparam;
unsigned vararg : 1;
unsigned _reserved : 15;
TRANS_PARAM param[MAX_PARAM_FUNC];
int library;
int alias;
}
PACKED
TRANS_EXTERN;
typedef
struct {
int index;
TYPE type;
int line;
int comment;
int synonymous[3];
bool read;
unsigned char nsynonymous;
bool _reserved[2];
}
PACKED
TRANS_PROPERTY;
typedef
struct {
int type;
int value;
int state;
short local;
short id;
ushort *pos;
ushort *pos_break;
ushort *pos_continue;
short loop_var;
}
PACKED
TRANS_CTRL;
typedef
struct {
int index;
int line;
ushort pos;
short ctrl_id;
unsigned gosub : 1;
unsigned on_goto : 1;
unsigned _reserved : 30;
}
PACKED
TRANS_GOTO;
typedef
struct {
int index;
ushort pos;
short ctrl_id;
}
PACKED
TRANS_LABEL;
typedef
struct {
RESERVED_ID id;
void (*func)();
bool no_try;
}
TRANS_STATEMENT;
#endif