gambas-source-code/main/gbx/gbx_debug.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

82 lines
2.5 KiB
C

/***************************************************************************
gbx_debug.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 __GBX_DEBUG_H
#define __GBX_DEBUG_H
#include "gbx_class.h"
#include "gbx_stack.h"
#include "gb_pcode.h"
#include "../lib/debug/gb.debug.h"
/* Object referencement debugging */
#define DEBUG_REF 0
/* String referencement debugging */
#define DEBUG_STRING 0
/* Bytecode debugging */
#define DEBUG_PCODE 0
/* Class loading debugging */
#define DEBUG_LOAD 0
/* Event debugging */
#define DEBUG_EVENT 0
/* Component management debugging */
#define DEBUG_COMP 0
/* Stream opening debugging */
#define DEBUG_STREAM 0
#ifndef __GBX_DEBUG_C
EXTERN DEBUG_INTERFACE DEBUG;
EXTERN DEBUG_INFO *DEBUG_info;
#endif
void DEBUG_init(void);
void DEBUG_exit(void);
void DEBUG_enter_event_loop(void);
void DEBUG_leave_event_loop(void);
const char *DEBUG_get_position(CLASS *cp, FUNCTION *fp, PCODE *pc);
const char *DEBUG_get_current_position(void);
void DEBUG_where(void);
bool DEBUG_get_value(const char *sym, int len, GB_VARIANT *ret);
int DEBUG_set_value(const char *sym, int len, VALUE *value);
int DEBUG_get_object_access_type(void *object, CLASS *class, int *count);
GB_CLASS DEBUG_find_class(const char *name);
void DEBUG_enum_keys(void *object, char **key);
void DEBUG_print_backtrace(STACK_BACKTRACE *bt);
void DEBUG_print_current_backtrace(void);
GB_ARRAY DEBUG_get_string_array_from_backtrace(STACK_BACKTRACE *bt);
#define PROFILE_ENTER_FUNCTION() \
if (EXEC_profile && CP && CP->component == COMPONENT_main) \
DEBUG.Profile.Begin(CP, FP); \
#define PROFILE_LEAVE_FUNCTION() \
if (EXEC_profile && CP && CP->component == COMPONENT_main) \
DEBUG.Profile.End(CP, FP); \
#endif