summaryrefslogtreecommitdiff
path: root/xinput_ivy.h
diff options
context:
space:
mode:
authorguez2008-04-08 13:43:01 +0000
committerguez2008-04-08 13:43:01 +0000
commit8f1e0435cca1d97caba2da1e306432ace45d0bbd (patch)
tree55a65c1ccd8c1f8401f6bb204b656f451fcf97e8 /xinput_ivy.h
downloadxinput-ivy-8f1e0435cca1d97caba2da1e306432ace45d0bbd.zip
xinput-ivy-8f1e0435cca1d97caba2da1e306432ace45d0bbd.tar.gz
xinput-ivy-8f1e0435cca1d97caba2da1e306432ace45d0bbd.tar.bz2
xinput-ivy-8f1e0435cca1d97caba2da1e306432ace45d0bbd.tar.xz
Version 1.1 de xinput-ivy, auteur Philippe Ribet
Diffstat (limited to 'xinput_ivy.h')
-rw-r--r--xinput_ivy.h3249
1 files changed, 3249 insertions, 0 deletions
diff --git a/xinput_ivy.h b/xinput_ivy.h
new file mode 100644
index 0000000..c0d71a5
--- /dev/null
+++ b/xinput_ivy.h
@@ -0,0 +1,3249 @@
+#ifdef __cplusplus
+extern "C" {
+#endif
+/*
+ANSI C code generated by SmartEiffel The GNU Eiffel Compiler, Eiffel tools and libraries
+Release 2.4 (??? September ??th 2007) [????]
+Copyright (C), 1994-2002 - INRIA - LORIA - ESIAL UHP Nancy 1 - FRANCE
+Copyright (C), 2003-2005 - INRIA - LORIA - IUT Charlemagne Nancy 2 - FRANCE
+D.COLNET, P.RIBET, C.ADRIAN, V.CROIZIER F.MERIZEN - SmartEiffel@loria.fr
+http://SmartEiffel.loria.fr
+C Compiler options used: -pipe -O3 -fomit-frame-pointer
+*/
+
+/*
+-- ------------------------------------------------------------------------------------------------------------
+-- Copyright notice below. Please read.
+--
+-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P. - University of Nancy 1 - FRANCE
+-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
+--
+-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
+-- documentation files (the "Software"), to deal in the Software without restriction, including without
+-- limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so, subject to the following
+-- conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial
+-- portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
+-- LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO
+-- EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+-- AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
+-- OR OTHER DEALINGS IN THE SOFTWARE.
+--
+-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
+-- ------------------------------------------------------------------------------------------------------------
+*/
+/*
+ This file (SmartEiffel/sys/runtime/base.h) contains all basic Eiffel
+ type definitions.
+ This file is automatically included in the header for all modes of
+ compilation: -boost, -no_check, -require_check, -ensure_check, ...
+ This file is also included in the header of any cecil file (when the
+ -cecil option is used).
+ This file is also included in the header file of C++ wrappers (when
+ using the external "C++" clause).
+*/
+
+#ifndef _BASE_H
+#define _BASE_H
+
+#if defined(_MSC_VER) && (_MSC_VER >= 1400) /* VC8+ */
+# ifndef _CRT_SECURE_NO_DEPRECATE
+# define _CRT_SECURE_NO_DEPRECATE
+# endif
+# ifndef _CRT_NONSTDC_NO_DEPRECATE
+# define _CRT_NONSTDC_NO_DEPRECATE
+# endif
+#endif /* VC8+ */
+
+#include <stdio.h>
+#include <string.h>
+#include <math.h>
+#include <stdlib.h>
+#include <signal.h>
+#include <stddef.h>
+#include <stdarg.h>
+#include <limits.h>
+#include <float.h>
+#include <setjmp.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
+#if defined __USE_POSIX || defined __unix__ || defined _POSIX_C_SOURCE
+# include <unistd.h>
+#endif
+#if !defined(WIN32) && \
+ (defined(WINVER) || defined(_WIN32_WINNT) || defined(_WIN32) || \
+ defined(__WIN32__) || defined(__TOS_WIN__) || defined(_MSC_VER))
+# define WIN32 1
+#endif
+#ifdef WIN32
+# include <windows.h>
+#else
+# ifndef O_RDONLY
+# include <sys/file.h>
+# endif
+# ifndef O_RDONLY
+# define O_RDONLY 0000
+# endif
+#endif
+
+#if defined(_MSC_VER) && (_MSC_VER < 1600) /* MSVC older than v10 */
+typedef signed char int8_t;
+typedef signed short int16_t;
+typedef signed int int32_t;
+typedef signed __int64 int64_t;
+typedef unsigned char uint8_t;
+typedef unsigned short uint16_t;
+typedef unsigned int uint32_t;
+typedef unsigned __int64 uint64_t;
+# define PRId8 "d"
+# define PRId16 "d"
+# define PRId32 "d"
+# define PRId64 "I64d"
+# define INT8_C(c) c
+# define INT16_C(c) c
+# define INT32_C(c) c
+# define INT64_C(c) c ## i64
+#elif defined(__WATCOMC__) && (__WATCOMC__ <= 1220) /* WATCOM 12.2 or lower */
+typedef signed char int8_t;
+typedef signed short int16_t;
+typedef signed long int int32_t;
+typedef signed __int64 int64_t;
+typedef unsigned char uint8_t;
+typedef unsigned short uint16_t;
+typedef unsigned long int uint32_t;
+typedef unsigned __int64 uint64_t;
+# define PRId8 "d"
+# define PRId16 "d"
+# define PRId32 "d"
+# define PRId64 "Ld"
+# define INT8_C(c) c
+# define INT16_C(c) c
+# define INT32_C(c) c ## L
+# define INT64_C(c) c ## i64
+#elif defined(__BORLANDC__) && (__BORLANDC__ < 0x600) /* Borland before 6.0 */
+typedef signed char int8_t;
+typedef signed short int16_t;
+typedef signed long int int32_t;
+typedef signed __int64 int64_t;
+typedef unsigned char uint8_t;
+typedef unsigned short uint16_t;
+typedef unsigned long int uint32_t;
+typedef unsigned __int64 uint64_t;
+# define PRId8 "d"
+# define PRId16 "d"
+# define PRId32 "ld"
+# define PRId64 "I64Ld"
+# define INT8_C(c) c
+# define INT16_C(c) c
+# define INT32_C(c) c ## L
+# define INT64_C(c) c ## i64
+#elif defined(__FreeBSD__) && (__FreeBSD__ < 5) /* FreeBSD before 5.0 */ && !defined (_SYS_INTTYPES_H_)
+typedef signed char int8_t;
+typedef signed short int16_t;
+typedef signed long int int32_t;
+typedef signed long long int int64_t;
+typedef unsigned char uint8_t;
+typedef unsigned short uint16_t;
+typedef unsigned long int uint32_t;
+typedef unsigned long long int uint64_t;
+#elif defined(__CYGWIN__) && defined(__BIT_TYPES_DEFINED__) /* Cygwin defines intxx_t in sys/types.h instead of inttypes.h */
+# include <cygwin/version.h>
+# if defined(CYGWIN_VERSION_DLL_MAJOR) && (CYGWIN_VERSION_DLL_MAJOR<1005)
+typedef unsigned char uint8_t;
+typedef __uint16_t uint16_t;
+typedef __uint32_t uint32_t;
+typedef __uint64_t uint64_t;
+# endif
+#elif defined(SASC)
+# error("Too old SAS/C compiler, sorry.");
+#elif defined(__SASC__)
+# if (__SASC__ < 750 ) /* SAS/C before 7.50 */
+typedef signed char int8_t;
+typedef signed short int16_t;
+typedef signed long int int32_t;
+typedef signed long long int int64_t;
+typedef unsigned char uint8_t;
+typedef unsigned short uint16_t;
+typedef unsigned long int uint32_t;
+typedef unsigned long long int uint64_t;
+# endif
+#else
+# include <inttypes.h>
+# if !defined(INT8_MAX) && defined(INT16_MAX)
+/* int8_t is not mandatory */
+typedef int_least8_t int8_t;
+# endif
+#endif
+
+#if !defined(PRId16)
+# define PRId8 "d"
+# define PRId16 "d"
+# define PRId32 "ld"
+# define PRId64 "lld"
+#elif !defined(PRId8)
+# define PRId8 "d"
+#endif
+#if !defined(INT16_C)
+# define INT8_C(c) c
+# define INT16_C(c) c
+# define INT32_C(c) c ## L
+# define INT64_C(c) c ## LL
+#elif !defined(INT8_C)
+# define INT8_C(c) c
+#endif
+#if !defined(INT16_MIN)
+# define INT8_MIN (-INT8_C(127)-1)
+# define INT8_MAX (INT8_C(127))
+# define INT16_MIN (-INT16_C(32767)-1)
+# define INT16_MAX (INT16_C(32767))
+# define INT32_MIN (-INT32_C(2147483647)-1)
+# define INT32_MAX (INT32_C(2147483647))
+# define INT64_MIN (-INT64_C(9223372036854775807)-1)
+# define INT64_MAX (INT64_C(9223372036854775807))
+#elif !defined(INT8_MIN)
+# define INT8_MIN (-INT8_C(127)-1)
+#endif
+
+
+/*
+ Endian stuff
+*/
+#if defined(BSD) && (BSD >= 199103)
+# include <machine/endian.h>
+#elif defined(__alpha__) || defined(__alpha) || defined(_M_ALPHA)
+/* bi-endian processor, current mode should be find in machine/endian.h file */
+# include <machine/endian.h>
+#elif defined(linux)
+# include <endian.h>
+#endif
+
+
+
+#if !defined(BYTE_ORDER) && defined(__BYTE_ORDER)
+# define BYTE_ORDER __BYTE_ORDER
+#endif
+
+#if !defined(LITTLE_ENDIAN) && defined(__LITTLE_ENDIAN)
+# define LITTLE_ENDIAN __LITTLE_ENDIAN
+#endif
+
+#if !defined(BIG_ENDIAN) && defined(__BIG_ENDIAN)
+# define BIG_ENDIAN __BIG_ENDIAN
+#endif
+
+#if !defined(LITTLE_ENDIAN)
+# define LITTLE_ENDIAN 1234 /* LSB first (vax, pc) */
+#endif
+#if !defined(BIG_ENDIAN)
+# define BIG_ENDIAN 4321 /* MSB first (IBM, net) */
+#endif
+#if !defined(PDP_ENDIAN)
+# define PDP_ENDIAN 3412 /* LSB first in word, MSW first in long */
+#endif
+
+#if !defined(BYTE_ORDER) && defined(BIT_ZERO_ON_RIGHT)
+# define BYTE_ORDER LITTLE_ENDIAN
+#elif !defined(BYTE_ORDER) && defined(BIT_ZERO_ON_LEFT)
+# define BYTE_ORDER BIG_ENDIAN
+#elif !defined(BYTE_ORDER)
+
+/* ARM */
+# if defined(__ARMEL__)
+# define BYTE_ORDER LITTLE_ENDIAN
+# elif defined(__ARMEB__)
+# define BYTE_ORDER BIG_ENDIAN
+# elif defined(__arm__)
+# error "ARMs are bi-endian processors. Endianness is unknown for this system, please drop an e-mail to SmartEiffel@loria.fr"
+# endif
+
+/* HP RISC */
+# if defined(__hppa__) || defined(__hppa) || defined(__hp9000) || \
+ defined(__hp9000s300) || defined(hp9000s300) || \
+ defined(__hp9000s700) || defined(hp9000s700) || \
+ defined(__hp9000s800) || defined(hp9000s800) || defined(hp9000s820)
+# define BYTE_ORDER BIG_ENDIAN
+# endif
+
+/* IBM */
+# if defined(ibm032) || defined(ibm370) || defined(_IBMR2) || \
+ defined(IBM370) || defined(__MVS__)
+# define BYTE_ORDER BIG_ENDIAN
+# endif
+
+/* Intel x86 */
+# if defined(i386) || defined(__i386__) || defined(__i386) || \
+ defined(_M_IX86) || defined(_X86_) || defined(__THW_INTEL) || \
+ defined(sun386)
+# define BYTE_ORDER LITTLE_ENDIAN
+# endif
+
+/* Intel Itanium */
+# if defined(__ia64__) || defined(_IA64) || defined(__IA64__) || \
+ defined(_M_IA64)
+# define BYTE_ORDER LITTLE_ENDIAN
+# endif
+
+/* Nationnal Semiconductor 32000 serie */
+# if defined(ns32000)
+# define BYTE_ORDER LITTLE_ENDIAN
+# endif
+
+/* Motorola 68000 */
+# if defined(mc68000) || defined(is68k) || defined(macII) || defined(m68k)
+# define BYTE_ORDER BIG_ENDIAN
+# endif
+
+/* MIPS */
+# if defined(MIPSEL) || defined(_MIPSEL)
+# define BYTE_ORDER LITTLE_ENDIAN
+# elif defined(MIPSEB) || defined(_MIPSEB)
+# define BYTE_ORDER BIG_ENDIAN
+# elif defined(__mips__) || defined(__mips) || defined(__MIPS__)
+# error "MIPS are bi-endian processors. Endianness is unknown for this system, please drop an e-mail to SmartEiffel@loria.fr"
+# endif
+
+/* Power PC */
+/* this processor is bi-endian, how to know if little-endian is set? */
+# if defined(__powerpc) || defined(__powerpc__) || defined(__POWERPC__) || \
+ defined(__ppc__) || defined(__ppc) || defined(_M_PPC) || \
+ defined(__PPC) || defined(__PPC__)
+# define BYTE_ORDER BIG_ENDIAN
+# endif
+
+/* Pyramid 9810 */
+# if defined(pyr)
+# define BYTE_ORDER BIG_ENDIAN
+# endif
+
+/* RS/6000 */
+# if defined(__THW_RS6000) || defined(_IBMR2) || defined(_POWER) || \
+ defined(_ARCH_PWR) || defined(_ARCH_PWR2)
+# define BYTE_ORDER BIG_ENDIAN
+# endif
+
+/* SPARC */
+# if defined(__sparc__) || defined(sparc) || defined(__sparc)
+# define BYTE_ORDER BIG_ENDIAN
+# endif
+
+/* CCI Tahoe */
+# if defined(tahoe)
+# define BYTE_ORDER BIG_ENDIAN
+# endif
+
+/* VAX */
+# if defined(vax) || defined(VAX) || defined(__vax__) || defined(_vax_) || \
+ defined(__vax) || defined(__VAX)
+# define BYTE_ORDER LITTLE_ENDIAN
+# endif
+
+/* ELATE is a virtual OS with a little endian Virtual Processor */
+# if defined(__ELATE__)
+# define BYTE_ORDER LITTLE_ENDIAN
+# endif
+
+/* Miscellaneous little endian */
+# if defined(wrltitan)
+# define BYTE_ORDER LITTLE_ENDIAN
+# endif
+
+/* Miscellaneous big endian */
+# if defined(apollo) || defined(__convex__) || defined(_CRAY) || defined(sel)
+# define BYTE_ORDER BIG_ENDIAN
+# endif
+#endif
+
+
+#if !defined(BYTE_ORDER)
+# error "Unknown byte order. Add your system in above macros once you know your system type. Please drop an e-mail to SmartEiffel@loria.fr"
+#endif
+#if (BYTE_ORDER != BIG_ENDIAN && BYTE_ORDER != LITTLE_ENDIAN)
+# error "Only little-endian and big-endian are valid at this time. Please drop an e-mail to SmartEiffel@loria.fr"
+#endif
+
+
+/*
+ Byte swapping stuff
+*/
+extern void copy_swap_16(const uint16_t *src, uint16_t *dest, int count);
+
+
+/* Because ANSI C EXIT_* are not always defined: */
+#ifndef EXIT_FAILURE
+# define EXIT_FAILURE 1
+#endif
+#ifndef EXIT_SUCCESS
+# define EXIT_SUCCESS 0
+#endif
+
+/*
+ On Linux glibc systems, we need to use sig.* versions of jmp_buf,
+ setjmp and longjmp to preserve the signal handling context.
+ Currently, the way I figured to detect this is if _SIGSET_H_types has
+ been defined in /usr/include/setjmp.h.
+
+ NOTE: with gcc, -ansi is used for SmartEiffel generated files EXCEPT in
+ -no_split mode. ANSI only recognizes the non-sig versions.
+*/
+#if (defined(_SIGSET_H_types) && !defined(__STRICT_ANSI__))
+# define JMP_BUF sigjmp_buf
+# define SETJMP(x) sigsetjmp( (x), 1)
+# define LONGJMP siglongjmp
+#else
+# define JMP_BUF jmp_buf
+# define SETJMP(x) setjmp( (x) )
+# define LONGJMP longjmp
+#endif
+
+/*
+ Type to store reference objects Id:
+ */
+typedef int Tid;
+typedef struct S0 T0;
+struct S0{Tid id;};
+
+/*
+ The default channel used to print runtime error messages:
+*/
+#define SE_ERR stderr
+
+/*
+ Eiffel type INTEGER_8 is #1:
+*/
+typedef int8_t T1;
+#define EIF_INTEGER_8 T1
+#define M1 (INT8_C(0))
+#define EIF_INTEGER_8_BITS (CHAR_BIT)
+#define EIF_MINIMUM_INTEGER_8 (INT8_MIN)
+#define EIF_MAXIMUM_INTEGER_8 (INT8_MAX)
+
+/*
+ Eiffel type INTEGER_16 is #10:
+*/
+typedef int16_t T10;
+#define EIF_INTEGER_16 T10
+#define M10 (INT16_C(0))
+#define EIF_INTEGER_16_BITS (CHAR_BIT*sizeof(T10t))
+#define EIF_MINIMUM_INTEGER_16 (INT16_MIN) /*-32768*/
+#define EIF_MAXIMUM_INTEGER_16 (INT16_MAX) /*+32767*/
+
+/*
+ Eiffel type INTEGER or INTEGER_32 is #2:
+*/
+typedef int32_t T2;
+#define EIF_INTEGER T2
+#define EIF_INTEGER_32 T2
+#define M2 (INT32_C(0))
+#define EIF_INTEGER_BITS ((T2)(CHAR_BIT*sizeof(T2)))
+#define EIF_INTEGER_32_BITS EIF_INTEGER_BITS
+#define EIF_MINIMUM_INTEGER (INT32_MIN)
+#define EIF_MAXIMUM_INTEGER (INT32_MAX)
+
+/*
+ Eiffel type INTEGER_64 is #11:
+*/
+typedef int64_t T11;
+#define EIF_INTEGER_64 T11
+#define M11 (INT64_C(0))
+#define EIF_INTEGER_64_BITS (CHAR_BIT*sizeof(T11))
+#define EIF_MINIMUM_INTEGER_64 (INT64_MIN)
+#define EIF_MAXIMUM_INTEGER_64 (INT64_MAX)
+
+/*
+ Eiffel type CHARACTER is #3:
+*/
+typedef unsigned char T3;
+#define EIF_CHARACTER T3
+#define M3 (0)
+#define EIF_CHARACTER_BITS (CHAR_BIT)
+#define EIF_MINIMUM_CHARACTER_CODE (0)
+#define EIF_MAXIMUM_CHARACTER_CODE (255)
+#define T3code(x) ((T10)(x))
+#define T3to_integer(x) ((signed char)(x))
+#define T3to_integer_8(x) ((signed char)(x))
+#define T3to_bit(x) (x)
+
+/*
+ Eiffel type REAL_32 is #4:
+*/
+typedef float T4;
+typedef T4 real32_t;
+#define EIF_REAL_32 T4
+#define M4 (0.0)
+#define EIF_MINIMUM_REAL_32 (-(FLT_MAX))
+#define EIF_MAXIMUM_REAL_32 (FLT_MAX)
+
+/*
+ Eiffel type REAL or REAL_64 is #5:
+*/
+typedef double T5;
+typedef T5 real64_t;
+#define EIF_REAL_64 T5
+#define M5 (0.0)
+#define EIF_MINIMUM_REAL_64 (-(DBL_MAX))
+#define EIF_MINIMUM_REAL (EIF_MINIMUM_REAL_64)
+#define EIF_MAXIMUM_REAL_64 (DBL_MAX)
+#define EIF_MAXIMUM_REAL (EIF_MAXIMUM_REAL_64)
+
+/*
+ Eiffel type REAL_EXTENDED is #12:
+*/
+typedef long double T12;
+typedef T12 real_extended_t;
+#define EIF_REAL_EXTENDED T12
+#define M12 (0.0)
+#define EIF_MINIMUM_REAL_EXTENDED (-(DBL_MAX))
+#define EIF_MAXIMUM_REAL_EXTENDED (DBL_MAX)
+
+/*
+ Eiffel type BOOLEAN is #6:
+*/
+typedef char T6;
+#define EIF_BOOLEAN T6
+#define M6 (0)
+#define EIF_BOOLEAN_BITS (CHAR_BIT)
+
+/*
+ Eiffel type POINTER is #8:
+*/
+typedef void* T8;
+#define EIF_POINTER T8
+/* Sometimes, NULL is defined as 0 */
+#define M8 ((void*)NULL)
+#define EIF_POINTER_BITS (CHAR_BIT*sizeof(void*))
+
+/*
+ To use type STRING on the C side:
+*/
+#define EIF_STRING T7*
+
+/*
+ Some Other EIF_* defined in ETL:
+*/
+#define eif_access(x) ((char*)(x))
+#define EIF_REFERENCE T0*
+#define EIF_OBJ T0*
+#define EIF_OBJECT EIF_OBJ
+
+/*
+ Wrappers for `malloc' and `calloc':
+*/
+void* se_malloc(size_t size);
+void* se_calloc(size_t nmemb, size_t size);
+void* se_realloc(void* src, size_t size);
+
+/*
+ die method.
+ */
+void se_die(int code);
+
+/*
+ Runtime hooks. They allow different runtime modules to be quite independant. In time, they will also allow
+ thread-safe operations.
+
+ Currently known modules:
+ - boost
+ - no_check
+ - sedb
+ - gc
+ - print stack
+ - profile
+ - plugins
+
+ However, currently only profile uses this method. It will be extended to other modules later.
+
+ The currently defined hooks are described in the enum below (the names should be self-explanatory).
+ */
+typedef enum {
+ SE_HANDLE_EXCEPTION_SET, /* called when an exception handler is set, prior to SETJMP */
+ SE_HANDLE_EXCEPTION_CLEAR, /* called when a feature with an exception handler normally returns */
+ SE_HANDLE_EXCEPTION_THROWN, /* called when an exception is thrown, prior to the LONGJMP */
+ SE_HANDLE_ENTER_GC, /* called when gc_start() begins */
+ SE_HANDLE_EXIT_GC, /* called when gc_start() ends */
+ SE_HANDLE_ENTER_PRINT_STACK, /* called when se_print_run_time_stack() begins */
+ SE_HANDLE_EXIT_PRINT_STACK, /* called when se_print_run_time_stack() ends */
+ SE_HANDLE_NO_MORE_MEMORY, /* called by se_alloc() and co */
+ SE_HANDLE_SEDB_BREAK, /* called when sedb stops the program */
+ SE_HANDLE_SEDB_CONTINUE, /* called when sedb continues the program */
+ SE_HANDLE_RUNTIME_ERROR, /* called when a runtime error is raised and not caught by an exception. Cannot be raised in boost mode. */
+ SE_HANDLE_DIE_WITH_CODE, /* called when the program is stopped by the die_with_code feature. The data points to the int code. */
+ SE_HANDLE_NORMAL_EXIT /* called when the program correctly terminates. The data is null. */
+} se_handler_action_t;
+
+extern int handlers_count;
+typedef void se_runtime_handler_t(se_handler_action_t action, void*data);
+void register_handler(se_runtime_handler_t*handler);
+void _handle(se_handler_action_t action, void*data);
+
+#define handle(action,data) do{if(handlers_count>0)_handle(action,data);}while(0)
+
+#endif /* #ifndef _BASE_H */
+#define SE_BOOST 1
+#define SE_GC_LIB 1
+/* C Header Pass 1: */
+typedef union _se_agent se_agent;
+typedef struct _se_agent0 se_agent0;
+typedef struct S110 T110;
+typedef struct S120 T120;
+typedef struct S189 T189;
+typedef T0 T202;
+typedef struct S246 T246;
+typedef struct S176 T176;
+typedef struct S128 T128;
+typedef struct S286 T286;
+typedef struct S277 T277;
+typedef struct S271 T271;
+typedef struct S268 T268;
+typedef struct S266 T266;
+typedef struct S265 T265;
+typedef struct S264 T264;
+typedef struct S139 T139;
+typedef struct S142 T142;
+typedef struct S141 T141;
+typedef struct S258 T258;
+typedef struct S256 T256;
+typedef struct S216 T216;
+typedef struct S254 T254;
+typedef struct S253 T253;
+typedef struct S252 T252;
+typedef struct S249 T249;
+typedef struct S245 T245;
+typedef struct S244 T244;
+typedef struct S243 T243;
+typedef struct S146 T146;
+typedef struct S148 T148;
+typedef struct S147 T147;
+typedef struct S236 T236;
+typedef struct S235 T235;
+typedef struct S234 T234;
+typedef struct S232 T232;
+typedef struct S230 T230;
+typedef struct S228 T228;
+typedef struct S227 T227;
+typedef struct S226 T226;
+typedef struct S225 T225;
+typedef struct S158 T158;
+typedef struct S54 T54;
+typedef struct S223 T223;
+typedef struct S222 T222;
+typedef struct S221 T221;
+typedef struct S67 T67;
+typedef struct S7 T7;
+typedef struct S218 T218;
+typedef struct S217 T217;
+typedef struct S215 T215;
+typedef struct S214 T214;
+typedef struct S213 T213;
+typedef struct S211 T211;
+typedef struct S208 T208;
+typedef struct S207 T207;
+typedef struct S206 T206;
+typedef struct S131 T131;
+typedef struct S130 T130;
+typedef struct S72 T72;
+typedef struct S53 T53;
+typedef void*T46;
+typedef struct S175 T175;
+typedef struct S205 T205;
+typedef int T143;
+typedef struct S204 T204;
+typedef struct S43 T43;
+typedef struct S69 T69;
+typedef struct S70 T70;
+typedef struct S64 T64;
+typedef struct S25 T25;
+/* C Header Pass 2: */
+typedef T0**T293;
+#define M293 NULL
+typedef T0**T292;
+#define M292 NULL
+typedef T0**T291;
+#define M291 NULL
+typedef T0**T290;
+#define M290 NULL
+typedef T0**T289;
+#define M289 NULL
+typedef T0**T288;
+#define M288 NULL
+typedef T0**T287;
+#define M287 NULL
+typedef T0**T284;
+#define M284 NULL
+typedef T0**T281;
+#define M281 NULL
+typedef T0**T276;
+#define M276 NULL
+typedef T0**T270;
+#define M270 NULL
+typedef T0**T267;
+#define M267 NULL
+typedef T0**T263;
+#define M263 NULL
+typedef T0**T262;
+#define M262 NULL
+typedef T0**T261;
+#define M261 NULL
+typedef T0**T260;
+#define M260 NULL
+typedef T0**T259;
+#define M259 NULL
+typedef T0**T257;
+#define M257 NULL
+typedef T0**T255;
+#define M255 NULL
+typedef T0**T251;
+#define M251 NULL
+typedef T2*T250;
+#define M250 NULL
+typedef T0**T247;
+#define M247 NULL
+typedef T0**T239;
+#define M239 NULL
+typedef T0**T238;
+#define M238 NULL
+typedef T0**T237;
+#define M237 NULL
+typedef T0**T220;
+#define M220 NULL
+typedef T0**T219;
+#define M219 NULL
+typedef T8*T212;
+#define M212 NULL
+typedef T3*T9;
+#define M9 NULL
+/* C Header Pass 3: */
+struct S189{T11 _time_memory;};
+int se_cmpT189(T189 o1,T189 o2);
+struct S176{T189 _time;T2 _microsecond;};
+int se_cmpT176(T176 o1,T176 o2);
+/* C Header Pass 4: */
+struct S110{Tid id;T0* _stream;};
+extern T110 M110;
+struct S120{Tid id;T0* _input_stream;};
+extern T120 M120;
+extern T189 M189;
+extern T176 M176;
+struct S286{Tid id;T0* _item;};
+extern T286 M286;
+struct S277{Tid id;T0* _item;};
+extern T277 M277;
+struct S271{Tid id;T0* _item;};
+extern T271 M271;
+struct S268{Tid id;T0* _item;};
+extern T268 M268;
+struct S266{T0* _item;T8 _key;T0* _next;};
+extern T266 M266;
+struct S265{Tid id;T0* _item;};
+extern T265 M265;
+struct S264{T0* _item;T2 _key;T0* _next;};
+extern T264 M264;
+struct S258{Tid id;T0* _item;};
+extern T258 M258;
+struct S256{T0* _item;T0* _key;T0* _next;};
+extern T256 M256;
+struct S254{T290 _storage;T2 _capacity;T2 _upper;};
+extern T254 M254;
+struct S253{Tid id;T0* _item;};
+extern T253 M253;
+struct S252{T2 _item;T2 _key;T0* _next;};
+extern T252 M252;
+struct S249{Tid id;T0* _item;};
+extern T249 M249;
+struct S246{T0* _item;T0* _key;T0* _next;};
+extern T246 M246;
+struct S245{Tid id;T0* _item;};
+extern T245 M245;
+struct S244{T289 _buckets;T2 _capacity;T2 _count;T2 _cache_user;T0* _free_nodes;};
+extern T244 M244;
+struct S243{Tid id;T0* _item;};
+extern T243 M243;
+struct S147{T6 _queryable;T2 _timeout;T176 _expiration;T6 _expiration_valid;T6 _current_time_valid;T8 _read_set;T2 _read_size;T8 _write_set;T2 _write_size;T8 _exception_set;T2 _exception_size;T2 _highest;};
+extern T147 M147;
+struct S236{T288 _storage;T2 _capacity;T2 _upper;};
+extern T236 M236;
+struct S235{T287 _storage;T2 _capacity;T2 _upper;};
+extern T235 M235;
+struct S234{T284 _buckets;T2 _capacity;T2 _count;T2 _cache_user;T0* _free_nodes;};
+extern T234 M234;
+struct S232{T281 _storage;T2 _capacity;T2 _upper;};
+extern T232 M232;
+struct S230{T276 _buckets;T2 _capacity;T2 _count;T2 _cache_user;T0* _free_nodes;};
+extern T230 M230;
+struct S228{T270 _buckets;T2 _capacity;T2 _count;T2 _cache_user;T0* _free_nodes;};
+extern T228 M228;
+struct S227{T267 _buckets;T2 _capacity;T2 _count;T2 _cache_user;T0* _free_nodes;};
+extern T227 M227;
+struct S226{T263 _buckets;T2 _capacity;T2 _count;T2 _cache_user;T0* _free_nodes;};
+extern T226 M226;
+struct S225{T262 _storage;T2 _capacity;T2 _upper;};
+extern T225 M225;
+struct S158{T0* _container;};
+extern T158 M158;
+struct S54{T0* _filter;T9 _buffer;T2 _capacity;};
+extern T54 M54;
+struct S139{T2 _key_count;T2 _minimum_code;T2 _maximum_code;};
+extern T139 M139;
+struct S223{T261 _storage;T2 _capacity;T2 _upper;};
+extern T223 M223;
+struct S142{T2 _buttons_count;};
+extern T142 M142;
+struct S222{T260 _storage;T2 _capacity;T2 _upper;};
+extern T222 M222;
+struct S141{T6 _absolute;T2 _motion_buffer_size;T0* _minimums;T0* _maximums;T0* _resolutions;};
+extern T141 M141;
+struct S221{T259 _storage;T2 _capacity;T2 _upper;};
+extern T221 M221;
+struct S218{T257 _buckets;T2 _capacity;T2 _count;T2 _cache_user;T0* _free_nodes;};
+extern T218 M218;
+struct S217{T255 _storage;T2 _capacity;T2 _upper;};
+extern T217 M217;
+struct S216{T0* _callbacks;T2 _last;T2 _index;};
+extern T216 M216;
+struct S215{T251 _buckets;T2 _capacity;T2 _count;T2 _cache_user;T0* _free_nodes;};
+extern T215 M215;
+struct S214{T250 _storage;T2 _capacity;T2 _upper;};
+extern T214 M214;
+struct S213{T250 _storage;T2 _capacity;T2 _upper;T2 _lower;T2 _storage_lower;};
+extern T213 M213;
+struct S211{T247 _buckets;T2 _capacity;T2 _count;T2 _cache_user;T0* _free_nodes;};
+extern T211 M211;
+struct S208{T239 _buckets;T2 _capacity;T2 _count;T2 _cache_user;T0* _free_nodes;};
+extern T208 M208;
+struct S146{Tid id;T0* _stream_exception;T0* _can_read;T6 _is_connected;T2 _filtered_descriptor;T8 _delete_function;T8 _read_function;T8 _data;};
+extern T146 M146;
+struct S207{T238 _storage;T2 _capacity;T2 _upper;};
+extern T207 M207;
+struct S206{T237 _storage;T2 _capacity;T2 _upper;};
+extern T206 M206;
+struct S148{T0* _job_list;T0* _finished_jobs;T0* _ready_jobs;T0* _events;T6 _pause;T6 _break;};
+extern T148 M148;
+struct S131{Tid id;T0* _can_read;T2 _descriptor;};
+extern T131 M131;
+struct S130{T0* _loop_stack;T6 _stop;T0* _vision;T0* _event_catcher_stack;};
+extern T130 M130;
+struct S128{Tid id;T2 _priority;T6 _done;T2 _current_event_type;T0* _widget;T0* _event;T0* _pointer_move_event;T0* _geometry_change_event;T0* _extension_devices;T0* _graphic_connection;T6 _suspend;T0* _event_catcher_found;};
+extern T128 M128;
+struct S72{T8 _widget;T2 _pos_y;T2 _pos_x;T0* _layout;T2 _width;T2 _height;T2 _min_height;T2 _min_width;T2 _std_width;T2 _std_height;T0* _child;};
+extern T72 M72;
+struct S53{T0* _filter;T2 _buffer_position;T9 _buffer;T2 _capacity;};
+extern T53 M53;
+extern T46 M46;
+struct S175{T0* _devices;};
+extern T175 M175;
+struct S205{T220 _storage;T2 _capacity;T2 _upper;};
+extern T205 M205;
+extern T143 M143;
+struct S204{T219 _storage;T2 _capacity;T2 _upper;};
+extern T204 M204;
+struct S67{T2 _device_id;T0* _name;T0* _type;T6 _is_current_pointer;T6 _is_current_keyboard;T6 _is_available_extension;T0* _key_capabilities;T0* _button_capabilities;T0* _axes_capabilities;T8 _x_device;T0* _actions;T0* _events_indexes;T0* _events_id;T8 _events_classes;};
+extern T67 M67;
+struct S43{T0* _filter;};
+extern T43 M43;
+struct S69{T0* _xinput_ivy;T2 _y_offset;T2 _x_offset;T5 _prediction_time;T2 _ignored_counter;T2 _ignore_rate;T0* _button_message_header;T0* _pointer_message_header;T2 _old_presure;T0* _y_history;T0* _x_history;T0* _time_history;T2 _predicted_y;T2 _predicted_x;T5 _a2y;T5 _a2x;T5 _t0;T5 _y2;T5 _x2;T5 _s2y;T5 _s2x;T5 _s2yn;T5 _s2xn;T5 _t1;T5 _t2;};
+extern T69 M69;
+struct S7{T9 _storage;T2 _count;T2 _capacity;};
+extern T7 M7;
+struct S70{Tid id;T2 _priority;T6 _started;T0* _pattern_list;T0* _callback_list;T2 _destination_count;T0* _tmp_client_list;T6 _done;T0* _events_set;T0* _ivy_clients;T0* _application_name_;T0* _ready_message_;};
+extern T70 M70;
+struct S64{T2 _display_width;T2 _display_height;T0* _loop_stack;T0* _event_catcher;T0* _graphic_connection;T0* _widget;};
+extern T64 M64;
+struct S25{T0* _ivy_bus;T0* _application_name;T0* _device_id;T0* _screen;int _x11;T2 _left_pad_position;T2 _right_pad_position;T0* _ivy;};
+extern T25 M25;
+extern char*s25_0;
+extern char*s25_21190322;
+extern char*s25_314746909;
+extern char*s69_190991;
+extern char*s69_475;
+extern char*s13_1432888418;
+extern char*s69_697;
+extern char*s69_1961093439;
+extern char*s69_104371129;
+extern char*s25_44143;
+extern char*s69_104371267;
+extern char*s69_1699147265;
+extern char*s13_1210;
+extern char*s69_1756148648;
+extern char*s69_1756148653;
+extern char*s25_1948078333;
+extern char*s69_1461;
+extern char*s69_1466;
+extern char*s69_23436791;
+extern char*s25_1666922512;
+extern char*s69_56246305;
+extern char*s25_1957581;
+extern char*s25_1403610646;
+extern char*s69_4725661;
+extern char*s69_4725666;
+extern char*s69_4738061;
+extern char*s25_1213754110;
+extern char*s25_765567725;
+extern char*s69_2179769;
+extern char*s25_751291742;
+extern char*s25_1554692325;
+extern char*s25_357338863;
+extern char*s69_2676;
+extern char*s69_1874520032;
+extern char*s69_1619665677;
+extern char*s25_1491411490;
+extern char*s25_4487261;
+extern char*s69_1940108584;
+extern char*s25_694149733;
+extern char*s64_1686724329;
+extern char*s69_586741066;
+extern char*s25_703548632;
+extern char*s25_89639;
+extern char*s69_15980;
+extern char*s69_397440;
+extern char*s25_69208946;
+extern char*s69_188916;
+extern char*s25_447643634;
+extern char*s69_2057747851;
+extern char*s25_3479972;
+extern char*s25_557679246;
+extern char*s25_1638797568;
+extern char*s25_1260406502;
+extern char*s69_22702411;
+extern char*s69_22702416;
+extern char*s25_946366;
+extern char*s69_1501987274;
+extern char*s25_382517595;
+extern char*s69_952626;
+extern char*s69_2112369621;
+extern char*s69_10739017;
+extern char*s69_10739024;
+extern char*s69_10739030;
+extern char*s70_202554;
+extern char*s143_1472358418;
+extern char*s25_1959886733;
+extern char*s69_1257860908;
+/*
+-- ------------------------------------------------------------------------------------------------------------
+-- Copyright notice below. Please read.
+--
+-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P. - University of Nancy 1 - FRANCE
+-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
+--
+-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
+-- documentation files (the "Software"), to deal in the Software without restriction, including without
+-- limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so, subject to the following
+-- conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial
+-- portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
+-- LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO
+-- EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+-- AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
+-- OR OTHER DEALINGS IN THE SOFTWARE.
+--
+-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
+-- ------------------------------------------------------------------------------------------------------------
+*/
+#define SE_BOOST 1
+void se_print_run_time_stack (void);
+void se_signal_handler(int sig);
+#define FSOC_SIZE 8192
+#define RSOC_SIZE 32768
+/*
+-- ------------------------------------------------------------------------------------------------------------
+-- Copyright notice below. Please read.
+--
+-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P. - University of Nancy 1 - FRANCE
+-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
+--
+-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
+-- documentation files (the "Software"), to deal in the Software without restriction, including without
+-- limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so, subject to the following
+-- conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial
+-- portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
+-- LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO
+-- EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+-- AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
+-- OR OTHER DEALINGS IN THE SOFTWARE.
+--
+-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
+-- ------------------------------------------------------------------------------------------------------------
+*/
+/*
+ This file (SmartEiffel/sys/runtime/gc_lib.h) is automatically included
+ when the Garbage Collector is used (default, unless option -no_gc has
+ been selected).
+*/
+
+#define SE_GC_LIB 1
+
+#define SE_GC_LOW_MEMORY_STRATEGY 0
+#define SE_GC_HIGH_MEMORY_STRATEGY 1
+#define SE_GC_DEFAULT_MEMORY_STRATEGY 2
+extern int se_gc_strategy;
+
+
+#define RSOH_UNMARKED 15253
+#define RSOH_FREE 1
+#define RSOH_MARKED 2
+
+
+#define FSOH_UNMARKED ((void *) 1)
+#define FSOH_MARKED ((void *) 2)
+
+/* To codify the state and the type of some Memory Chunk, we are
+ using the following definitions :
+*/
+#define FSO_FREE_CHUNK (-2)
+#define RSO_FREE_CHUNK (-1)
+#define RSO_USED_CHUNK ( 0)
+#define FSO_STORE_CHUNK ( 1)
+#define FSO_USED_CHUNK ( 2)
+#define FREE_CHUNK(x) ((x)<0)
+
+/* Minimum size for a store area in a ReSizable Objects Chunk :
+ */
+#define RSOC_MIN_STORE 512
+
+/* The default channel used to print -gc_info flag information :
+*/
+#define SE_GCINFO SE_ERR
+
+extern int collector_counter; /* MEMORY.collector_counter */
+
+typedef struct s_mch mch; /* Memory Chunk Header. */
+typedef struct s_fsoc fsoc; /* Fixed Size Objects Chunk. */
+typedef union u_rsoh rsoh; /* ReSizable Object Header. */
+typedef struct s_fll_rsoh fll_rsoh;
+typedef struct s_rsoc rsoc; /* ReSizable Objects Chunk. */
+typedef struct s_na_env na_env; /* Native Array ENVironment. */
+
+
+struct s_mch{
+ unsigned int size; /* In number of bytes (actual argument of malloc).*/
+ int state_type; /* One value in : RSO_USED_CHUNK,
+ FREE_CHUNK, FSO_STORE_CHUNK, FSO_USED_CHUNK */
+ void(*amfp)(mch*,void*); /* Align Mark Function Pointer. */
+ void(*swfp)(mch*); /* SWeep Function Pointer. */
+};
+
+struct s_fsoc{
+ mch header; /* Common header for fsoc and rsoc. */
+ fsoc* next; /* The next one when in free list (fsocfl). */
+ int count_minus_one;
+ double first_object;
+};
+
+typedef struct _rso_header rso_header;
+
+struct _rso_header{
+ unsigned int size;
+ int magic_flag; /* RSOH_MARKED when used,
+ RSOH_FREE when free,
+ else RSOH_UNMARKED */
+};
+
+typedef union u_fso_header fso_header;
+
+union u_fso_header{
+ void* flag;
+ void* next;/* accurately typed as gcXX* in actual fso headers */
+};
+
+union u_rsoh{
+ rso_header header;
+ double padding;
+};
+
+struct s_fll_rsoh {
+ rso_header rsoh_field;
+ fll_rsoh* nextflol;
+};
+
+struct s_rsoc{
+ mch header; /* Common header for fsoc and rsoc. */
+ unsigned int isize; /* Initial size (at malloc time) to detect split chunks. */
+ rsoc* next; /* Next one when in free list (rsocfl) or in na_env->chunk_list. */
+ fll_rsoh*free_list_of_large; /* Intra. free list. */
+ na_env*nae;
+ rsoh first_header;
+};
+
+struct s_na_env{
+ unsigned int store_left;
+ rsoh* store;
+ rsoc*store_chunk;
+ rsoc*chunk_list; /*List of chunks of that type that have a non-null free_list_of_large*/
+ void (*gc_mark)(T0*);
+ int space_used;
+};
+
+extern void**stack_bottom;
+extern mch**gcmt;
+extern int gcmt_max;
+extern int gcmt_used;
+extern int gc_is_off;
+extern fsoc* fsocfl;
+extern unsigned int fsoc_count;
+extern unsigned int rsoc_count;
+extern void*gcmt_tail_addr;
+
+void gc_sweep(void);
+void gc_mark(void* p);
+mch* gc_find_chunk(void* p);
+int gc_stack_size(void);
+int garbage_delayed(void);
+void gc_update_ceils(void);
+char*new_na(na_env*nae,unsigned int size);
+unsigned int fsocfl_count(void);
+unsigned int rsocfl_count(void);
+void gc_dispose_before_exit(void);
+void mark_stack_and_registers (void);
+fsoc* gc_fsoc_get1(void);
+fsoc* gc_fsoc_get2(void);
+
+int gc_memory_used(void);
+/*The generic se_agent0 definition:*/
+struct _se_agent0{
+Tid id;
+Tid creation_mold_id;
+void(*afp)(se_agent*);void(*gc_mark_agent_mold)(se_agent*);
+int(*eq)(se_agent*,se_agent*);
+};
+#include "X11/extensions/XInput.h"
+
+#define x_list_input_devices(list_size) (XListInputDevices(dpy, list_size))
+// XDeviceInfo * XListInputDevices(Display * display, int * returned_list_size);
+
+
+#define x_device_info_id(device_list, index) (((XDeviceInfo *)device_list)[index].id)
+//XID x_device_info_id(XDeviceInfo * device_list, int index)
+
+#define x_device_info_type(device_list, index) (((XDeviceInfo *)device_list)[index].type)
+//Atom x_device_info_type(XDeviceInfo * device_list, int index)
+
+#define x_device_info_name(device_list, index) (((XDeviceInfo *)device_list)[index].name)
+//char * x_device_info_name(XDeviceInfo * device_list, int index)
+
+#define x_device_info_num_classes(device_list, index) (((XDeviceInfo *)device_list)[index].num_classes)
+//int x_device_info_num_classes(XDeviceInfo * device_list, int index)
+
+#define x_device_info_class_info(device_list, index) (((XDeviceInfo *)device_list)[index].inputclassinfo)
+//XAnyClassPtr x_device_info_class_info(XDeviceInfo * device_list, int index)
+
+#define x_next_class_info(class_info) ((XAnyClassPtr)((char *)class_info + ((XAnyClassPtr)class_info)->length))
+//XAnyClassPtr x_next_class_info(XAnyClassPtr class_info)
+
+#define x_is_key_class_info(class_info) (((XAnyClassPtr)class_info)->class == KeyClass)
+//bool x_is_key_class_info(XAnyClassPtr class_info)
+
+#define x_is_button_class_info(class_info) (((XAnyClassPtr)class_info)->class == ButtonClass)
+//bool x_is_button_class_info(XAnyClassPtr class_info)
+
+#define x_is_valuator_class_info(class_info) (((XAnyClassPtr)class_info)->class == ValuatorClass)
+//bool x_is_valuator_class_info(XAnyClassPtr class_info)
+
+#define x_device_info_is_pointer(device_list, index) (((XDeviceInfo *)device_list)[index].use == IsXPointer)
+//bool x_device_info_is_pointer(XDeviceInfo * device_list, int index)
+
+#define x_device_info_is_keyboard(device_list, index) (((XDeviceInfo *)device_list)[index].use == IsXKeyboard)
+//bool x_device_info_is_keyboard(XDeviceInfo * device_list, int index)
+
+#define x_device_info_is_available_extension(device_list, index) (((XDeviceInfo *)device_list)[index].use == IsXExtensionDevice)
+//bool x_device_info_is_available_extension(XDeviceInfo * device_list, int index)
+
+#define x_button_info_num_buttons(info) (((XButtonInfo *)info)->num_buttons)
+//short x_button_info_num_buttons(XButtonInfo * info)
+
+#define x_valuator_info_minimum(info, index) (((XValuatorInfo *)info)->axes[index].min_value)
+//int x_valuator_info_minimum(XValuatorInfo * info, int index)
+
+#define x_valuator_info_maximum(info, index) (((XValuatorInfo *)info)->axes[index].max_value)
+//int x_valuator_info_maximum(XValuatorInfo * info, int index)
+
+#define x_valuator_info_resolution(info, index) (((XValuatorInfo *)info)->axes[index].resolution)
+//int x_valuator_info_resolution(XValuatorInfo * info, int index)
+
+#define x_open_device(device_id) XOpenDevice(dpy, device_id)
+//XDevice * x_open_device(XID device_id)
+
+#define x_close_device(device) XCloseDevice(dpy, device)
+//void x_close_device(XDevice * device)
+
+#define x_device_motion_event_data(index) (((XDeviceMotionEvent*)&last_event)->axis_data[index])
+//int x_device_motion_event_data(int index)
+
+#define x_device_proximity_event_data(index) (((XProximityNotifyEvent*)&last_event)->axis_data[index])
+//int x_device_proximity_event_data(int index)
+
+#define x_device_button_event_number (((XDeviceButtonEvent*)&last_event)->button)
+//int x_device_button_event_number
+
+#define x_device_event_time (((XDeviceButtonEvent*)&last_event)->time)
+//int x_device_event_time
+
+extern void x_key_info_init(XKeyInfo *info, int *min_k, int *max_k, int *num_k);
+
+extern void x_valuator_info_init(XValuatorInfo *info, int *nb_axes, int *is_absolute, int *buf_size);
+
+extern void * x_device_init_events(XDevice * device, int * events_id);
+// Result is XEventClass *
+
+void x_device_select_events(void * window, XEventClass * events_classes);
+/*
+-- ------------------------------------------------------------------------------------------------------------
+-- Copyright notice below. Please read.
+--
+-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P. - University of Nancy 1 - FRANCE
+-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
+--
+-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
+-- documentation files (the "Software"), to deal in the Software without restriction, including without
+-- limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so, subject to the following
+-- conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial
+-- portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
+-- LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO
+-- EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+-- AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
+-- OR OTHER DEALINGS IN THE SOFTWARE.
+--
+-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
+-- ------------------------------------------------------------------------------------------------------------
+*/
+#ifdef WIN32
+# include <winuser.h>
+# include <mmsystem.h> /* needed for timeGetTime() */
+void vision_init(void);
+# ifndef WM_MOUSEWHEEL
+# define WM_MOUSEWHEEL 0x20A
+# endif
+#else
+# include <X11/Xlib.h>
+# include <X11/Xutil.h>
+# include <X11/Xatom.h>
+#endif
+
+#ifndef VISION_DEBUG
+# define vision_check_call(x) (x)
+# define vision_check(x)
+#else
+
+/* Executes x; if it returns zero, exits. */
+#define vision_check_call(x) \
+ do { \
+ if (!(x)) { \
+ fprintf(stderr, "Call failed line %d in %s (call was: \"%s\")\n", __LINE__, __FILE__, #x); exit(1); \
+ } \
+ } while (0)
+
+/* If x is non-zero, exits. */
+#define vision_check(x) \
+ do { \
+ if (!(x)) { \
+ fprintf(stderr, "Check failed line %d in %s (test was: \"%s\")\n", __LINE__, __FILE__, #x); exit(1); \
+ } \
+ } while (0)
+
+#endif
+
+
+#define basic_vision_init _basic_vision_init()
+#define basic_vision_next_event _basic_vision_next_event()
+#define basic_vision_character _basic_vision_character()
+#define basic_vision_key _basic_vision_key()
+extern int _basic_vision_init(void);
+extern int _basic_vision_next_event(void);
+extern int _basic_vision_character(void);
+extern int basic_vision_get_keysym(char*);
+extern void *basic_vision_get_color(int *r, int *g, int *b);
+
+#ifdef WIN32
+ extern HDC hdc;
+ extern const char *CLASSNAME;
+ extern HINSTANCE main_hInstance;
+ extern int main_nCmdShow;
+ extern MSG last_message;
+ extern HANDLE sem_thread_finished_work;
+ extern HANDLE sem_new_window;
+ extern void display_error(int num);
+ enum commands {CREATE_WINDOW = 1, SET_TITLE, CLEAR_AREA, MAP_WINDOW, MOVE_WINDOW, SET_FOCUS};
+ struct cmd_list {struct cmd_list * next; enum commands cmd_type; int param1; int param2; int param3; int param4; int param5; int param6;};
+ extern volatile struct cmd_list *first_cmd;
+ extern volatile struct cmd_list *first_free_cmd;
+ extern HANDLE sem_cmd_ready;
+
+ /* paint message informations */
+ extern PAINTSTRUCT paintstruct;
+
+ extern RECT windowRect; /* new window size definition */
+ extern DWORD message_thread_id;
+ extern int decorated_window_x_offset;
+ extern int decorated_window_y_offset;
+ extern int decorated_window_width_offset;
+ extern int decorated_window_height_offset;
+
+# define basic_vision_real_event (last_message.message)
+# define basic_vision_flush ((void)0)
+# define basic_vision_display_width (GetSystemMetrics(SM_CXSCREEN))
+# define basic_vision_display_height (GetSystemMetrics(SM_CYSCREEN))
+# define basic_vision_event_widget ((void *)(last_message.hwnd))
+# define basic_vision_pointer_x ((short)LOWORD(last_message.lParam))
+# define basic_vision_pointer_y ((short)HIWORD(last_message.lParam))
+# define basic_vision_pointer_x_root (last_message.pt.x)
+# define basic_vision_pointer_y_root (last_message.pt.y)
+# define basic_vision_event_time (last_message.time)
+# define basic_vision_expose_x (paintstruct.rcPaint.left)
+# define basic_vision_expose_y (paintstruct.rcPaint.top)
+# define basic_vision_expose_width (paintstruct.rcPaint.right-paintstruct.rcPaint.left)
+# define basic_vision_expose_height (paintstruct.rcPaint.bottom-paintstruct.rcPaint.top)
+# define basic_vision_geometry_x (windowRect.left)
+# define basic_vision_geometry_y (windowRect.top)
+# define basic_vision_geometry_width (windowRect.right)
+# define basic_vision_geometry_height (windowRect.bottom)
+# define basic_vision_geometry_border (GetSystemMetrics(SM_CXBORDER)) /* --TODO: X and Y may have different values */
+# define basic_vision_is_left_down (GetAsyncKeyState(button_swapped?VK_RBUTTON:VK_LBUTTON)>>15)
+# define basic_vision_is_middle_down (GetAsyncKeyState(VK_MBUTTON)>>15)
+# define basic_vision_is_right_down (GetAsyncKeyState(button_swapped?VK_LBUTTON:VK_RBUTTON)>>15)
+
+# define basic_vision_extension_device_id (fprintf(stderr, "No extension currently available for Windows.\n"))
+
+extern int button_swapped;
+
+#else
+ extern Display *dpy; /* X server connection */
+ extern XEvent last_event;
+
+ extern Atom atom_DELWIN;
+ extern Atom atom_PROTOCOLS;
+
+# define basic_vision_real_event (last_event.type)
+# define basic_vision_flush XFlush(dpy)
+# define basic_vision_display_width (DisplayWidth(dpy,DefaultScreen(dpy)))
+# define basic_vision_display_height (DisplayHeight(dpy,DefaultScreen(dpy)))
+# define basic_vision_event_widget ((void *)(last_event.xany.window))
+# define basic_vision_pointer_x (((XButtonEvent*)&last_event)->x)
+# define basic_vision_pointer_y (((XButtonEvent*)&last_event)->y)
+# define basic_vision_pointer_x_root (((XButtonEvent*)&last_event)->x_root)
+# define basic_vision_pointer_y_root (((XButtonEvent*)&last_event)->y_root)
+# define basic_vision_event_time (((XButtonEvent*)&last_event)->time)
+# define basic_vision_expose_x (((XExposeEvent*)&last_event)->x)
+# define basic_vision_expose_y (((XExposeEvent*)&last_event)->y)
+# define basic_vision_expose_width (((XExposeEvent*)&last_event)->width)
+# define basic_vision_expose_height (((XExposeEvent*)&last_event)->height)
+# define basic_vision_geometry_x (((XConfigureEvent*)&last_event)->x)
+# define basic_vision_geometry_y (((XConfigureEvent*)&last_event)->y)
+# define basic_vision_geometry_width (((XConfigureEvent*)&last_event)->width)
+# define basic_vision_geometry_height (((XConfigureEvent*)&last_event)->height)
+# define basic_vision_geometry_border (((XConfigureEvent*)&last_event)->border_width)
+# define basic_vision_is_left_down ((((XCrossingEvent*)&last_event)->state & Button1Mask) != 0 )
+# define basic_vision_is_middle_down ((((XCrossingEvent*)&last_event)->state & Button2Mask) != 0 )
+# define basic_vision_is_right_down ((((XCrossingEvent*)&last_event)->state & Button3Mask) != 0 )
+
+/* For X Input extension */
+# define basic_vision_extension_device_id (((XMotionEvent*)&last_event)->root) /* TRICK (should be deviceid of Device Events */
+
+#endif
+
+int vision_available(void);
+/*
+-- ------------------------------------------------------------------------------------------------------------
+-- Copyright notice below. Please read.
+--
+-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P. - University of Nancy 1 - FRANCE
+-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
+--
+-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
+-- documentation files (the "Software"), to deal in the Software without restriction, including without
+-- limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so, subject to the following
+-- conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial
+-- portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
+-- LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO
+-- EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+-- AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
+-- OR OTHER DEALINGS IN THE SOFTWARE.
+--
+-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
+-- ------------------------------------------------------------------------------------------------------------
+*/
+#include <errno.h>
+
+#define text_file_read_open(p) (fopen(((char*)(p)),"r"))
+#define text_file_write_open(p) (fopen(((char*)(p)),"w"))
+#define text_file_write_append(p) (fopen(((char*)(p)),"a"))
+#define text_file_read_write_open(p) (fopen(((char*)(p)),"r+"))
+#define text_file_read_write_append(p) (fopen(((char*)(p)),"a+"))
+#define binary_file_read_open(p) (fopen(((char*)(p)),"rb"))
+#define binary_file_write_open(p) (fopen(((char*)(p)),"wb"))
+#define binary_file_write_append(p) (fopen(((char*)(p)),"ab"))
+#define io_fclose(p) (fclose((FILE*)(p)))
+#define io_flush(p) (fflush((FILE*)(p)))
+#define io_getc(f) (getc(((FILE*)(f))))
+#define io_putc(b, f) (putc((b),((FILE*)(f))))
+#define io_ungetc(b, f) (ungetc((b), (FILE*)(f)))
+#define io_fread(b, n, f) (fread((void *)(b),(size_t)(1), (size_t)(n),(FILE*)(f)))
+#define io_fwrite(b, n, f) (fwrite((void *)(b),(size_t)(1), (size_t)(n),(FILE*)(f)))
+#define io_feof(f) (feof(((FILE*)(f))))
+#define io_rename(o, n) (rename(((char*)(o)),((char*)(n))))
+#define io_remove(f) (remove(((char*)(f))))
+#define io_fseek(f, o) (fseek((FILE*)(f),(o),SEEK_SET))
+#define io_ftell(f) ((EIF_INTEGER_64)ftell((FILE*)(f)))
+
+#if defined __USE_POSIX || defined __unix__ || defined _POSIX_C_SOURCE
+# define read_stdin(b, s) (read(STDIN_FILENO, b, s))
+#else
+ extern int read_stdin(EIF_CHARACTER *buffer, int size);
+#endif
+
+extern void io_copy(char*source, char*target);
+extern int io_file_exists(char*source);
+extern int io_same_physical_file(char*path1,char*path2);
+/*
+-- ------------------------------------------------------------------------------------------------------------
+-- Copyright notice below. Please read.
+--
+-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P. - University of Nancy 1 - FRANCE
+-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
+--
+-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
+-- documentation files (the "Software"), to deal in the Software without restriction, including without
+-- limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so, subject to the following
+-- conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial
+-- portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
+-- LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO
+-- EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+-- AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
+-- OR OTHER DEALINGS IN THE SOFTWARE.
+--
+-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
+-- ------------------------------------------------------------------------------------------------------------
+*/
+#include <time.h>
+
+#define basic_time ((EIF_INTEGER_64)time(NULL))
+EIF_REAL_64 time_difftime(time_t t2, time_t t1);
+EIF_INTEGER time_getyear(time_t t, EIF_INTEGER m);
+EIF_INTEGER time_getmonth(time_t t, EIF_INTEGER m);
+EIF_INTEGER time_getday(time_t t, EIF_INTEGER m);
+EIF_INTEGER time_gethour(time_t t, EIF_INTEGER m);
+EIF_INTEGER time_getminute(time_t t, EIF_INTEGER m);
+EIF_INTEGER time_getsecond(time_t t, EIF_INTEGER m);
+EIF_INTEGER time_getyday(time_t t, EIF_INTEGER m);
+EIF_INTEGER time_getwday(time_t t, EIF_INTEGER m);
+EIF_BOOLEAN time_is_summer_time_used(time_t t);
+EIF_INTEGER_64 time_mktime(EIF_INTEGER year, EIF_INTEGER mon,
+ EIF_INTEGER mday, EIF_INTEGER hour,
+ EIF_INTEGER min, EIF_INTEGER sec);
+void time_add_second(EIF_INTEGER_64 *t, EIF_INTEGER s);
+/*
+-- ------------------------------------------------------------------------------------------------------------
+-- Copyright notice below. Please read.
+--
+-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P. - University of Nancy 1 - FRANCE
+-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
+--
+-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
+-- documentation files (the "Software"), to deal in the Software without restriction, including without
+-- limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so, subject to the following
+-- conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial
+-- portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
+-- LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO
+-- EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+-- AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
+-- OR OTHER DEALINGS IN THE SOFTWARE.
+--
+-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
+-- ------------------------------------------------------------------------------------------------------------
+*/
+#define sprintf_pointer(buffer, pointer) sprintf((char*)(buffer),"%p",pointer)
+void sprintf_real_64(EIF_CHARACTER* b, EIF_CHARACTER m, int32_t f, real64_t r);
+void sprintf_real_extended(EIF_CHARACTER* b, EIF_CHARACTER m, int32_t f, real_extended_t r);
+/*
+-- ------------------------------------------------------------------------------------------------------------
+-- Copyright notice below. Please read.
+--
+-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P. - University of Nancy 1 - FRANCE
+-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
+--
+-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
+-- documentation files (the "Software"), to deal in the Software without restriction, including without
+-- limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so, subject to the following
+-- conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial
+-- portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
+-- LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO
+-- EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+-- AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
+-- OR OTHER DEALINGS IN THE SOFTWARE.
+--
+-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
+-- ------------------------------------------------------------------------------------------------------------
+*/
+#define pointer_hash_code(p) (((unsigned int)(unsigned long)(p))>>1)
+#define pointer_to_any(p) ((T0*)(p))
+#define pointer_plus(p, o) (((char*)(p))+o)
+
+#define x_get_atom_name(atom) XGetAtomName(dpy, (Atom)atom)
+
+extern int x_query_extension(char * extension_name);
+
+/*
+-- ------------------------------------------------------------------------------------------------------------
+-- Copyright notice below. Please read.
+--
+-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P. - University of Nancy 1 - FRANCE
+-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
+--
+-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
+-- documentation files (the "Software"), to deal in the Software without restriction, including without
+-- limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so, subject to the following
+-- conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial
+-- portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
+-- LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO
+-- EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+-- AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
+-- OR OTHER DEALINGS IN THE SOFTWARE.
+--
+-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
+-- ------------------------------------------------------------------------------------------------------------
+*/
+#ifdef WIN32
+/*# include <windows.h> done in base.h */
+# ifndef _MSC_VER
+# include <winsock2.h>
+# endif
+ extern int win32_msg;
+ extern int win32_msg_ready;
+ extern HANDLE sem_msg_ready;
+#else
+# include <sys/time.h>
+/*# include <unistd.h> done in base.h */
+/*# include <sys/types.h> done in base.h */
+#endif
+
+#ifdef WIN32
+# define sequencer_watch(set, fd) do { \
+ if ((fd)==-1) win32_msg=1; else FD_SET((SOCKET)fd, (fd_set*)(set)); \
+} while(0)
+#else
+# define sequencer_watch(set, fd) FD_SET(fd, (fd_set*)(set))
+#endif
+
+
+#ifdef WIN32
+/****TODO: fd evaluated twice. */
+# define sequencer_is_ready(set, fd) (EIF_BOOLEAN)(((fd)==-1)?win32_msg_ready:FD_ISSET(fd, (fd_set*)(set)))
+#else
+# define sequencer_is_ready(set, fd) FD_ISSET(fd, (fd_set*)(set))
+#endif
+
+
+#ifdef WIN32
+# define sequencer_reset(set) do{win32_msg=0;win32_msg_ready=FALSE;FD_ZERO((fd_set*)(set));}while(0)
+#else
+# define sequencer_reset(set) FD_ZERO((fd_set*)(set))
+#endif
+
+#define sequencer_create_set (_sequencer_create_set())
+EIF_POINTER _sequencer_create_set(void);
+int sequencer_wait(int n, fd_set *read_set, int read_size, fd_set *write_set, int write_size, fd_set *exception_set, int exception_size, int s, int us);
+
+#define sequencer_descriptor(file) (fileno((FILE *)(file)))
+#include "Ivy/ivy.h"
+#include "Ivy/ivyloop.h"
+#include "Ivy/ivysocket.h"
+
+extern void ivy_init(char * application_name, char * ready_text, void * eiffel_object, void * channel_up_callback, void * channel_down_callback, void * agent_call_callback);
+
+extern void * bind_message(char * pattern, void * agent);
+
+#define send_message(txt) IvySendMsg("%s", txt)
+#define IvyIdle IvyIdle()
+#define read_callback(read_func, channel, descriptor, data) ((void (*)(void *, int, void *))read_func)(channel, descriptor, data)
+#define delete_callback(delete_func, data) ((void (*)(void *))delete_func)(data)
+/*
+-- ------------------------------------------------------------------------------------------------------------
+-- Copyright notice below. Please read.
+--
+-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P. - University of Nancy 1 - FRANCE
+-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
+--
+-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
+-- documentation files (the "Software"), to deal in the Software without restriction, including without
+-- limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so, subject to the following
+-- conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial
+-- portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
+-- LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO
+-- EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+-- AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
+-- OR OTHER DEALINGS IN THE SOFTWARE.
+--
+-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
+-- ------------------------------------------------------------------------------------------------------------
+*/
+#ifndef WIN32
+# include <sys/time.h>
+#endif
+
+extern EIF_INTEGER basic_microsecond_microsecond;
+extern EIF_INTEGER_64 basic_microsecond_time;
+#define basic_microsecond_update (_basic_microsecond_update())
+void _basic_microsecond_update(void);
+/*
+-- ------------------------------------------------------------------------------------------------------------
+-- Copyright notice below. Please read.
+--
+-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P. - University of Nancy 1 - FRANCE
+-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
+--
+-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
+-- documentation files (the "Software"), to deal in the Software without restriction, including without
+-- limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so, subject to the following
+-- conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial
+-- portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
+-- LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO
+-- EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+-- AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
+-- OR OTHER DEALINGS IN THE SOFTWARE.
+--
+-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
+-- ------------------------------------------------------------------------------------------------------------
+*/
+#ifdef WIN32
+extern void new_window(void);
+
+typedef struct window_description_s window_description;
+struct window_description_s {
+ HWND Current;
+ HBRUSH background;
+ HBITMAP background_pixmap; /* if non-void, use this pixmap for background
+ painting. Useful for Win95 only */
+ struct window_description_s *parent;
+ int marked;
+ int min_width;
+ int max_width;
+ int min_height;
+ int max_height;
+ int decorated;
+};
+
+extern window_description screen_desc;
+
+# define basic_window_root_id NULL
+#else
+# define basic_window_root_id ((void*)DefaultRootWindow(dpy))
+#endif
+
+
+extern void * basic_window_create(int x, int y, int width, int height, void * parent, int decorate);
+
+extern void * basic_window_get_drawing_widget(void *window);
+
+extern char* basic_window_get_title(void *window);
+
+extern void basic_window_free_title(void *title);
+
+extern void basic_window_set_title(void *window, void *title);
+
+extern void basic_window_set_bg_color(void *window, void *color);
+
+extern void basic_window_set_bg_pixmap(void *window, void *pixmap);
+
+extern void basic_window_clear_no_expose(void *window);
+
+extern void basic_window_clear_area_no_expose(void *window, int x, int y, int w, int h);
+
+extern void basic_window_clear_area(void *window, int x, int y, int w, int h);
+
+extern void basic_window_set_kbd_focus(void *window);
+
+extern void basic_window_map(void *window);
+
+extern void basic_window_unmap(void *window);
+
+extern void basic_window_set_geometry(void *window,int x, int y, int w, int h);
+
+extern void basic_window_set_requisition(void *window, int min_w, int min_h, int max_w, int max_h);
+
+extern void basic_window_set_position(void *window, int x, int y);
+
+extern void basic_window_set_size(void *window, int x, int y, int width, int height);
+extern unsigned int fsoc_count_ceil;
+extern unsigned int rsoc_count_ceil;
+/*INTEGER_16*/T2 r10to_integer_32(T10 C);
+/*INTEGER_16*/T3 r10decimal_digit(T10 C);
+/*INTEGER_16*/void r10append_in(T10 C,T0* a1);
+extern T9 oBC101sprintf_buffer;
+/*REAL_64*/void r5append_in_format(T5 C,T0* a1,T2 a2);
+/*POINTER*/T2 r8hash_code(T8 C);
+/*INTEGER_32*/T6 r2in_range(T2 C,T2 a1,T2 a2);
+/*INTEGER_32*/T2 r2max(T2 C,T2 a1);
+/*INTEGER_32*/T3 r2decimal_digit(T2 C);
+/*INTEGER_32*/void r2append_in(T2 C,T0* a1);
+/*INTEGER_32*/T10 r2high_16(T2 C);
+/*CHARACTER*/T6 r3_ix_6261(T3 C,T3 a1);
+/*CHARACTER*/T6 r3_ix_6061(T3 C,T3 a1);
+/*CHARACTER*/T6 r3is_digit(T3 C);
+/*CHARACTER*/T1 r3value(T3 C);
+/*CHARACTER*/T6 r3is_separator(T3 C);
+/*CHARACTER*/T1 r3decimal_value(T3 C);
+/*BOOLEAN*/T6 r6_ix_or(T6 C,T6 a1);
+/*NATIVE_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r290clear_all(T290 C,T2 a1);
+/*NATIVE_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/T290 r290realloc(T290 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r290copy_from(T290 C,T290 a1,T2 a2);
+/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]]*/void r289clear_all(T289 C,T2 a1);
+/*NATIVE_ARRAY[JOB]*/void r288clear_all(T288 C,T2 a1);
+/*NATIVE_ARRAY[JOB]*/void r288remove(T288 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[JOB]*/T288 r288realloc(T288 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[JOB]*/void r288copy_from(T288 C,T288 a1,T2 a2);
+/*NATIVE_ARRAY[EVENT_CATCHER]*/void r287clear_all(T287 C,T2 a1);
+/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[SIGNAL_0,SENSITIVE]]*/void r284clear_all(T284 C,T2 a1);
+/*NATIVE_ARRAY[DICTIONARY[SIGNAL_0,SENSITIVE]]*/void r281clear_all(T281 C,T2 a1);
+/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[SIGNAL_2[INTEGER_32,INTEGER_32],SENSITIVE]]*/void r276clear_all(T276 C,T2 a1);
+/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[SIGNAL_4[INTEGER_32,INTEGER_32,INTEGER_32,INTEGER_32],SENSITIVE]]*/void r270clear_all(T270 C,T2 a1);
+/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[SENSITIVE,POINTER]]*/void r267clear_all(T267 C,T2 a1);
+/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[EXTENSION_DEVICE,INTEGER_32]]*/void r263clear_all(T263 C,T2 a1);
+/*NATIVE_ARRAY[TOPLEVEL_WINDOW]*/void r262clear_all(T262 C,T2 a1);
+/*NATIVE_ARRAY[KEY_RANGE]*/void r261clear_all(T261 C,T2 a1);
+/*NATIVE_ARRAY[KEY_RANGE]*/T261 r261realloc(T261 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[KEY_RANGE]*/void r261copy_from(T261 C,T261 a1,T2 a2);
+/*NATIVE_ARRAY[BUTTON_RANGE]*/void r260clear_all(T260 C,T2 a1);
+/*NATIVE_ARRAY[BUTTON_RANGE]*/T260 r260realloc(T260 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[BUTTON_RANGE]*/void r260copy_from(T260 C,T260 a1,T2 a2);
+/*NATIVE_ARRAY[AXES_RANGE]*/void r259clear_all(T259 C,T2 a1);
+/*NATIVE_ARRAY[AXES_RANGE]*/T259 r259realloc(T259 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[AXES_RANGE]*/void r259copy_from(T259 C,T259 a1,T2 a2);
+/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]]*/void r257clear_all(T257 C,T2 a1);
+/*NATIVE_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]*/void r255clear_all(T255 C,T2 a1);
+/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[INTEGER_32,INTEGER_32]]*/void r251clear_all(T251 C,T2 a1);
+/*NATIVE_ARRAY[INTEGER_32]*/void r250set_slice_with(T250 C,T2 a1,T2 a2,T2 a3);
+/*NATIVE_ARRAY[INTEGER_32]*/void r250clear_all(T250 C,T2 a1);
+/*NATIVE_ARRAY[INTEGER_32]*/void r250set_all_with(T250 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[INTEGER_32]*/T250 r250realloc(T250 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[INTEGER_32]*/void r250copy_from(T250 C,T250 a1,T2 a2);
+/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[POINTER,STRING]]*/void r247clear_all(T247 C,T2 a1);
+/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]]*/void r239clear_all(T239 C,T2 a1);
+/*NATIVE_ARRAY[IVY_CLIENT]*/void r238clear_all(T238 C,T2 a1);
+/*NATIVE_ARRAY[IVY_CLIENT]*/void r238clear(T238 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[IVY_CLIENT]*/void r238remove(T238 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[IVY_CLIENT]*/T238 r238realloc(T238 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[IVY_CLIENT]*/void r238copy_from(T238 C,T238 a1,T2 a2);
+/*NATIVE_ARRAY[IVY_CLIENT]*/T2 r238fast_index_of(T238 C,T0* a1,T2 a2,T2 a3);
+/*NATIVE_ARRAY[LOOP_ITEM]*/void r237clear_all(T237 C,T2 a1);
+/*NATIVE_ARRAY[LOOP_ITEM]*/T237 r237realloc(T237 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[LOOP_ITEM]*/void r237copy_from(T237 C,T237 a1,T2 a2);
+/*NATIVE_ARRAY[X_INPUT_DEVICE]*/void r220clear_all(T220 C,T2 a1);
+/*NATIVE_ARRAY[STRING]*/void r219clear_all(T219 C,T2 a1);
+/*NATIVE_ARRAY[STRING]*/void r219clear(T219 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[STRING]*/T219 r219realloc(T219 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[STRING]*/void r219copy_from(T219 C,T219 a1,T2 a2);
+/*NATIVE_ARRAY[CHARACTER]*/void r9clear_all(T9 C,T2 a1);
+/*NATIVE_ARRAY[CHARACTER]*/T9 r9realloc(T9 C,T2 a1,T2 a2);
+/*NATIVE_ARRAY[CHARACTER]*/void r9copy_from(T9 C,T9 a1,T2 a2);
+/*NATIVE_ARRAY[CHARACTER]*/T2 r9fast_index_of(T9 C,T3 a1,T2 a2,T2 a3);
+/*NATIVE_ARRAY[CHARACTER]*/void r9copy_at(T9 C,T2 a1,T9 a2,T2 a3);
+/*NATIVE_ARRAY[CHARACTER]*/T6 r9fast_memcmp(T9 C,T9 a1,T2 a2);
+T7*create7from_external(T8 a1);
+/*STRING*/void r7put(T7* C,T3 a1,T2 a2);
+/*STRING*/void r7remove_between(T7* C,T2 a1,T2 a2);
+/*STRING*/T6 r7is_equal(T7* C,T0* a1);
+/*STRING*/void r7append(T7* C,T0* a1);
+/*STRING*/void r7copy(T7* C,T0* a1);
+/*STRING*/T6 r7is_real(T7* C);
+/*STRING*/T2 r7index_of(T7* C,T3 a1,T2 a2);
+/*STRING*/T6 r7is_integer(T7* C);
+/*STRING*/void r7remove_tail(T7* C,T2 a1);
+/*STRING*/T0* r7twin(T7* C);
+/*STRING*/void r7extend(T7* C,T3 a1);
+/*STRING*/T2 r7hash_code(T7* C);
+/*STRING*/void r7remove_last(T7* C);
+/*STRING*/void r7add_last(T7* C,T3 a1);
+/*STRING*/void r7ensure_capacity(T7* C,T2 a1);
+/*STRING*/void r7from_external_copy(T7* C,T8 a1);
+/*STRING*/void r7from_external(T7* C,T8 a1);
+/*STRING*/T8 r7to_external(T7* C);
+/*STRING*/T2 r7to_integer(T7* C);
+/*STRING*/void r7remove_head(T7* C,T2 a1);
+/*STRING*/void r7swap(T7* C,T2 a1,T2 a2);
+/*STRING*/T2 r7first_index_of(T7* C,T3 a1);
+/*STRING*/T5 r7to_real(T7* C);
+/*FAST_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r254make(T254* C,T2 a1);
+/*FAST_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r254add_last(T254* C,T0* a1);
+/*FAST_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r254mark_native_arrays(T254* C);
+/*FAST_ARRAY[JOB]*/void r236remove(T236* C,T2 a1);
+/*FAST_ARRAY[JOB]*/void r236make(T236* C,T2 a1);
+/*FAST_ARRAY[JOB]*/void r236add_last(T236* C,T0* a1);
+/*FAST_ARRAY[JOB]*/T6 r236is_empty(T236* C);
+/*FAST_ARRAY[JOB]*/void r236mark_native_arrays(T236* C);
+/*FAST_ARRAY[JOB]*/void r236add(T236* C,T0* a1,T2 a2);
+/*FAST_ARRAY[JOB]*/void r236move(T236* C,T2 a1,T2 a2,T2 a3);
+/*FAST_ARRAY[EVENT_CATCHER]*/void r235make(T235* C,T2 a1);
+/*FAST_ARRAY[EVENT_CATCHER]*/void r235mark_native_arrays(T235* C);
+/*FAST_ARRAY[DICTIONARY[SIGNAL_0,SENSITIVE]]*/void r232make(T232* C,T2 a1);
+/*FAST_ARRAY[DICTIONARY[SIGNAL_0,SENSITIVE]]*/void r232mark_native_arrays(T232* C);
+/*FAST_ARRAY[TOPLEVEL_WINDOW]*/void r225make(T225* C,T2 a1);
+/*FAST_ARRAY[TOPLEVEL_WINDOW]*/void r225mark_native_arrays(T225* C);
+/*FAST_ARRAY[KEY_RANGE]*/void r223make(T223* C,T2 a1);
+/*FAST_ARRAY[KEY_RANGE]*/void r223add_last(T223* C,T0* a1);
+/*FAST_ARRAY[KEY_RANGE]*/void r223mark_native_arrays(T223* C);
+/*FAST_ARRAY[BUTTON_RANGE]*/void r222make(T222* C,T2 a1);
+/*FAST_ARRAY[BUTTON_RANGE]*/void r222add_last(T222* C,T0* a1);
+/*FAST_ARRAY[BUTTON_RANGE]*/void r222mark_native_arrays(T222* C);
+/*FAST_ARRAY[AXES_RANGE]*/void r221make(T221* C,T2 a1);
+/*FAST_ARRAY[AXES_RANGE]*/void r221add_last(T221* C,T0* a1);
+/*FAST_ARRAY[AXES_RANGE]*/void r221mark_native_arrays(T221* C);
+/*FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]*/void r217make(T217* C,T2 a1);
+/*FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]*/void r217mark_native_arrays(T217* C);
+/*FAST_ARRAY[INTEGER_32]*/void r214make(T214* C,T2 a1);
+/*FAST_ARRAY[INTEGER_32]*/T2 r214count(T214* C);
+/*FAST_ARRAY[IVY_CLIENT]*/void r207copy(T207* C,T0* a1);
+/*FAST_ARRAY[IVY_CLIENT]*/void r207remove(T207* C,T2 a1);
+/*FAST_ARRAY[IVY_CLIENT]*/void r207make(T207* C,T2 a1);
+/*FAST_ARRAY[IVY_CLIENT]*/void r207add_last(T207* C,T0* a1);
+/*FAST_ARRAY[IVY_CLIENT]*/void r207mark_native_arrays(T207* C);
+/*FAST_ARRAY[IVY_CLIENT]*/T2 r207fast_index_of(T207* C,T0* a1,T2 a2);
+/*FAST_ARRAY[LOOP_ITEM]*/void r206remove_last(T206* C);
+/*FAST_ARRAY[LOOP_ITEM]*/void r206make(T206* C,T2 a1);
+/*FAST_ARRAY[LOOP_ITEM]*/void r206add_last(T206* C,T0* a1);
+/*FAST_ARRAY[LOOP_ITEM]*/T0* r206last(T206* C);
+/*FAST_ARRAY[LOOP_ITEM]*/T6 r206is_empty(T206* C);
+/*FAST_ARRAY[LOOP_ITEM]*/void r206mark_native_arrays(T206* C);
+/*FAST_ARRAY[X_INPUT_DEVICE]*/void r205make(T205* C,T2 a1);
+/*FAST_ARRAY[X_INPUT_DEVICE]*/void r205mark_native_arrays(T205* C);
+/*FAST_ARRAY[STRING]*/void r204make(T204* C,T2 a1);
+/*FAST_ARRAY[STRING]*/void r204add_last(T204* C,T0* a1);
+/*FAST_ARRAY[STRING]*/void r204with_capacity(T204* C,T2 a1);
+/*FAST_ARRAY[STRING]*/void r204mark_native_arrays(T204* C);
+/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[SIGNAL_0,SENSITIVE]]*/void r286set_item(T286* C,T0* a1);
+/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[SIGNAL_2[INTEGER_32,INTEGER_32],SENSITIVE]]*/void r277set_item(T277* C,T0* a1);
+/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[SIGNAL_4[INTEGER_32,INTEGER_32,INTEGER_32,INTEGER_32],SENSITIVE]]*/void r271set_item(T271* C,T0* a1);
+/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[SENSITIVE,POINTER]]*/void r268set_item(T268* C,T0* a1);
+/*HASHED_DICTIONARY_NODE[SENSITIVE,POINTER]*/void r266make(T266* C,T0* a1,T8 a2,T0* a3);
+/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[EXTENSION_DEVICE,INTEGER_32]]*/void r265set_item(T265* C,T0* a1);
+/*HASHED_DICTIONARY_NODE[EXTENSION_DEVICE,INTEGER_32]*/void r264make(T264* C,T0* a1,T2 a2,T0* a3);
+/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]]*/void r258set_item(T258* C,T0* a1);
+/*HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r256make(T256* C,T0* a1,T0* a2,T0* a3);
+/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[INTEGER_32,INTEGER_32]]*/void r253set_item(T253* C,T0* a1);
+/*HASHED_DICTIONARY_NODE[INTEGER_32,INTEGER_32]*/void r252make(T252* C,T2 a1,T2 a2,T0* a3);
+/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[POINTER,STRING]]*/void r249set_item(T249* C,T0* a1);
+/*HASHED_DICTIONARY_NODE[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]*/void r246make(T246* C,T0* a1,T0* a2,T0* a3);
+/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]]*/void r245set_item(T245* C,T0* a1);
+/*HASHED_DICTIONARY[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]*/T2 r244prime_capacity(T2 a1);
+/*HASHED_DICTIONARY[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]*/T2 r244prime_number_ceiling(T2 a1);
+/*HASHED_DICTIONARY[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]*/T6 r244should_increase_capacity(T2 a1,T2 a2);
+/*HASHED_DICTIONARY[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]*/T0* r244new_node(T244* C,T0* a1,T0* a2,T0* a3);
+/*HASHED_DICTIONARY[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]*/void r244add(T244* C,T0* a1,T0* a2);
+/*HASHED_DICTIONARY[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]*/T0* r244fast_reference_at(T244* C,T0* a1);
+/*HASHED_DICTIONARY[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]*/void r244special_common_dictionary(T244* C,T0* a1);
+/*HASHED_DICTIONARY[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]*/void r244increase_capacity(T244* C);
+/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]]*/void r243set_item(T243* C,T0* a1);
+/*HASHED_DICTIONARY[SIGNAL_0,SENSITIVE]*/void r234make(T234* C);
+/*HASHED_DICTIONARY[SIGNAL_0,SENSITIVE]*/T0* r234reference_at(T234* C,T0* a1);
+/*HASHED_DICTIONARY[SIGNAL_0,SENSITIVE]*/T6 r234key_safe_equal(T0* a1,T0* a2);
+extern T0*oBC136common_free_nodes;
+extern int fBC136common_free_nodes;
+/*HASHED_DICTIONARY[SIGNAL_0,SENSITIVE]*/T0* r234common_free_nodes(void);
+/*HASHED_DICTIONARY[SIGNAL_0,SENSITIVE]*/void r234create_with_capacity(T234* C,T2 a1);
+/*HASHED_DICTIONARY[SIGNAL_2[INTEGER_32,INTEGER_32],SENSITIVE]*/void r230make(T230* C);
+/*HASHED_DICTIONARY[SIGNAL_2[INTEGER_32,INTEGER_32],SENSITIVE]*/T0* r230reference_at(T230* C,T0* a1);
+/*HASHED_DICTIONARY[SIGNAL_2[INTEGER_32,INTEGER_32],SENSITIVE]*/T6 r230key_safe_equal(T0* a1,T0* a2);
+/*HASHED_DICTIONARY[SIGNAL_2[INTEGER_32,INTEGER_32],SENSITIVE]*/T0* r230common_free_nodes(void);
+/*HASHED_DICTIONARY[SIGNAL_2[INTEGER_32,INTEGER_32],SENSITIVE]*/void r230create_with_capacity(T230* C,T2 a1);
+/*HASHED_DICTIONARY[SIGNAL_4[INTEGER_32,INTEGER_32,INTEGER_32,INTEGER_32],SENSITIVE]*/void r228make(T228* C);
+/*HASHED_DICTIONARY[SIGNAL_4[INTEGER_32,INTEGER_32,INTEGER_32,INTEGER_32],SENSITIVE]*/T0* r228reference_at(T228* C,T0* a1);
+/*HASHED_DICTIONARY[SIGNAL_4[INTEGER_32,INTEGER_32,INTEGER_32,INTEGER_32],SENSITIVE]*/T6 r228key_safe_equal(T0* a1,T0* a2);
+/*HASHED_DICTIONARY[SIGNAL_4[INTEGER_32,INTEGER_32,INTEGER_32,INTEGER_32],SENSITIVE]*/T0* r228common_free_nodes(void);
+/*HASHED_DICTIONARY[SIGNAL_4[INTEGER_32,INTEGER_32,INTEGER_32,INTEGER_32],SENSITIVE]*/void r228create_with_capacity(T228* C,T2 a1);
+/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/void r227make(T227* C);
+/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/T2 r227prime_capacity(T2 a1);
+/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/T2 r227prime_number_ceiling(T2 a1);
+/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/T6 r227should_increase_capacity(T2 a1,T2 a2);
+/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/T0* r227reference_at(T227* C,T8 a1);
+/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/T6 r227key_safe_equal(T8 a1,T8 a2);
+/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/T0* r227common_free_nodes(void);
+/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/T0* r227new_node(T227* C,T0* a1,T8 a2,T0* a3);
+/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/void r227add(T227* C,T0* a1,T8 a2);
+/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/void r227create_with_capacity(T227* C,T2 a1);
+/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/void r227increase_capacity(T227* C);
+/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/void r226put(T226* C,T0* a1,T2 a2);
+/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/void r226make(T226* C);
+/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/T2 r226prime_capacity(T2 a1);
+/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/T2 r226prime_number_ceiling(T2 a1);
+/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/T6 r226should_increase_capacity(T2 a1,T2 a2);
+/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/T0* r226reference_at(T226* C,T2 a1);
+/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/T6 r226key_safe_equal(T2 a1,T2 a2);
+/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/T0* r226common_free_nodes(void);
+/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/T0* r226new_node(T226* C,T0* a1,T2 a2,T0* a3);
+/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/void r226create_with_capacity(T226* C,T2 a1);
+/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/void r226increase_capacity(T226* C);
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r218make(T218* C);
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T2 r218prime_capacity(T2 a1);
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T2 r218prime_number_ceiling(T2 a1);
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T0* r218reference_at(T218* C,T0* a1);
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T6 r218should_increase_capacity(T2 a1,T2 a2);
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T0* r218common_free_nodes(void);
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T6 r218key_safe_equal(T0* a1,T0* a2);
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T0* r218new_node(T218* C,T0* a1,T0* a2,T0* a3);
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r218add(T218* C,T0* a1,T0* a2);
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r218create_with_capacity(T218* C,T2 a1);
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r218increase_capacity(T218* C);
+/*SIGNAL_1[X_INPUT_DEVICE]*/void r216make(T216* C);
+/*SIGNAL_1[X_INPUT_DEVICE]*/void r216emit(T216* C,T0* a1);
+/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/void r215put(T215* C,T2 a1,T2 a2);
+/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/void r215make(T215* C);
+/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/T2 r215at(T215* C,T2 a1);
+/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/T2 r215prime_capacity(T2 a1);
+/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/T2 r215prime_number_ceiling(T2 a1);
+/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/T6 r215should_increase_capacity(T2 a1,T2 a2);
+/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/T6 r215key_safe_equal(T2 a1,T2 a2);
+/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/T0* r215common_free_nodes(void);
+/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/T0* r215new_node(T215* C,T2 a1,T2 a2,T0* a3);
+/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/void r215create_with_capacity(T215* C,T2 a1);
+/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/void r215increase_capacity(T215* C);
+/*RING_ARRAY[INTEGER_32]*/void r213put(T213* C,T2 a1,T2 a2);
+/*RING_ARRAY[INTEGER_32]*/void r213clear_all(T213* C);
+/*RING_ARRAY[INTEGER_32]*/void r213set_all_with(T213* C,T2 a1);
+/*RING_ARRAY[INTEGER_32]*/T2 r213wrap_point(T213* C);
+/*RING_ARRAY[INTEGER_32]*/void r213make_space_for_one(T213* C);
+/*RING_ARRAY[INTEGER_32]*/void r213squeeze_bubble(T213* C,T2 a1,T2 a2,T2 a3,T2 a4);
+/*RING_ARRAY[INTEGER_32]*/T2 r213storage_upper(T213* C);
+/*RING_ARRAY[INTEGER_32]*/T2 r213storage_index(T213* C,T2 a1);
+/*RING_ARRAY[INTEGER_32]*/void r213make(T213* C,T2 a1,T2 a2);
+/*RING_ARRAY[INTEGER_32]*/void r213add_last(T213* C,T2 a1);
+/*RING_ARRAY[INTEGER_32]*/T2 r213count(T213* C);
+/*RING_ARRAY[INTEGER_32]*/T6 r213is_empty(T213* C);
+/*RING_ARRAY[INTEGER_32]*/T2 r213item(T213* C,T2 a1);
+/*RING_ARRAY[INTEGER_32]*/void r213remove_first(T213* C);
+/*RING_ARRAY[INTEGER_32]*/void r213move(T213* C,T2 a1,T2 a2,T2 a3);
+/*HASHED_DICTIONARY[POINTER,STRING]*/void r211make(T211* C);
+/*HASHED_DICTIONARY[POINTER,STRING]*/T0* r211common_free_nodes(void);
+/*HASHED_DICTIONARY[POINTER,STRING]*/void r211create_with_capacity(T211* C,T2 a1);
+/*HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/void r208make(T208* C);
+/*HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/T0* r208common_free_nodes(void);
+/*HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/void r208create_with_capacity(T208* C,T2 a1);
+/*STREAM_EXCEPTION*/void r110expect(T110* C,T0* a1);
+/*STREAM_EXCEPTION*/T6 r110occurred(T110* C,T0* a1);
+/*STREAM_EXCEPTION*/void r110make(T110* C,T0* a1);
+/*CAN_READ_DATA_FROM_STREAM*/void r120expect(T120* C,T0* a1);
+/*CAN_READ_DATA_FROM_STREAM*/T6 r120occurred(T120* C,T0* a1);
+/*CAN_READ_DATA_FROM_STREAM*/void r120make(T120* C,T0* a1);
+/*TIME*/T6 r189_ix_60(T189* C,T189 a1);
+/*TIME*/T5 r189elapsed_seconds(T189* C,T189 a1);
+/*MICROSECOND_TIME*/T6 r176_ix_60(T176* C,T176 a1);
+/*MICROSECOND_TIME*/T5 r176elapsed_seconds(T176* C,T176 a1);
+/*MICROSECOND_TIME*/void r176update(T176* C);
+/*EVENTS_SET*/void r147reset(T147* C);
+/*EVENTS_SET*/void r147expect(T147* C,T0* a1);
+/*EVENTS_SET*/void r147make(T147* C);
+/*EVENTS_SET*/void r147when_data(T147* C,T0* a1);
+/*EVENTS_SET*/T6 r147is_data(T147* C,T0* a1);
+/*EVENTS_SET*/void r147when_exception(T147* C,T0* a1);
+/*EVENTS_SET*/T6 r147event_occurred(T147* C,T0* a1);
+/*EVENTS_SET*/T6 r147is_exception(T147* C,T0* a1);
+/*EVENTS_SET*/void r147wait(T147* C);
+/*ROOT_LAYOUT*/void r158set_container(T158* C,T0* a1);
+/*STD_INPUT*/void r54make(T54* C);
+/*STD_INPUT*/void r54dispose(T54* C);
+/*KEY_RANGE*/void r139make(T139* C,T8 a1);
+/*BUTTON_RANGE*/void r142make(T142* C,T8 a1);
+/*AXES_RANGE*/void r141make(T141* C,T8 a1);
+/*IVY_CLIENT*/T2 r146descriptor(T146* C);
+/*IVY_CLIENT*/T0* r146event_can_read(T146* C);
+/*IVY_CLIENT*/void r146make(T146* C,T2 a1,T8 a2,T8 a3,T8 a4);
+/*IVY_CLIENT*/void r146process_incomming_data(T146* C);
+/*IVY_CLIENT*/void r146disconnect(T146* C);
+/*IVY_CLIENT*/void r146dispose(T146* C);
+/*IVY_CLIENT*/T0* r146event_exception(T146* C);
+T148*create148make(void);
+/*LOOP_ITEM*/void r148add_job(T148* C,T0* a1);
+/*LOOP_ITEM*/void r148run(T148* C);
+/*LOOP_ITEM*/void r148make(T148* C);
+/*GRAPHIC_CONNECTION*/T0* r131event_can_read(T131* C);
+/*GRAPHIC_CONNECTION*/void r131set_descriptor(T131* C,T2 a1);
+/*GRAPHIC_CONNECTION*/T2 r131filtered_descriptor(T131* C);
+/*GRAPHIC_CONNECTION*/void r131dispose(T131* C);
+/*VISION_LOOP_STACK*/T0* r130current_loop(T130* C);
+/*VISION_LOOP_STACK*/void r130add_job(T130* C,T0* a1);
+/*VISION_LOOP_STACK*/void r130run(T130* C);
+/*VISION_LOOP_STACK*/void r130make(T130* C);
+/*VISION_LOOP_STACK*/void r130_P_129_make(T130* C);
+/*EVENT_CATCHER*/void r128add_extension(T128* C,T0* a1);
+/*EVENT_CATCHER*/T0* r128search_widget(T128* C,T8 a1);
+/*EVENT_CATCHER*/void r128prepare(T128* C,T0* a1);
+/*EVENT_CATCHER*/void r128emit_event(T128* C,T0* a1,T2 a2);
+/*EVENT_CATCHER*/T6 r128is_ready(T128* C,T0* a1);
+/*EVENT_CATCHER*/void r128continue(T128* C);
+extern T0*oBC26vision;
+extern int fBC26vision;
+/*EVENT_CATCHER*/T0* r128vision(void);
+extern T0*oBC13io;
+/*EVENT_CATCHER*/void r128make(T128* C,T0* a1);
+/*ROOT_WINDOW*/void r72default_create(T72* C);
+/*ROOT_WINDOW*/T0* r72vision(void);
+/*ROOT_WINDOW*/T2 r72hash_code(T72* C);
+/*ROOT_WINDOW*/void r72container_init(T72* C);
+/*STD_OUTPUT*/void r53filtered_flush(T53* C);
+/*STD_OUTPUT*/void r53filtered_put_character(T53* C,T3 a1);
+extern T0*oBC13std_output;
+extern int fBC13std_output;
+/*STD_OUTPUT*/T0* r53std_output(void);
+/*STD_OUTPUT*/void r53se_atexit(void);
+/*STD_OUTPUT*/void r53make(T53* C);
+/*STD_OUTPUT*/void r53write_buffer(T53* C);
+/*STD_OUTPUT*/void r53flush(T53* C);
+/*STD_OUTPUT*/void r53put_string(T53* C,T0* a1);
+/*STD_OUTPUT*/void r53put_line(T53* C,T0* a1);
+/*STD_OUTPUT*/void r53dispose(T53* C);
+extern T0*oBC13std_input;
+extern int fBC13std_input;
+/*STD_INPUT_OUTPUT*/T0* r46std_input(void);
+/*STD_INPUT_OUTPUT*/T0* r46std_output(void);
+/*STD_INPUT_OUTPUT*/void r46disconnect(void);
+/*STD_INPUT_OUTPUT*/T6 r46is_connected(void);
+/*STD_INPUT_OUTPUT*/void r46put_string(T0* a1);
+/*STD_INPUT_OUTPUT*/void r46dispose(void);
+/*X_INPUT_EXTENSION*/void r175make(T175* C);
+/*X11*/void r143default_create(void);
+extern T0*oBC143x_input_extension;
+extern int fBC143x_input_extension;
+/*X11*/T0* r143x_input_extension(void);
+/*X11*/T6 r143has_x_input_extension(void);
+/*X11*/T0* r143get_atom_name(T2 a1);
+/*X11*/T0* r143vision(void);
+/*X_INPUT_DEVICE*/void r67handle_event(T67* C,T2 a1,T0* a2);
+/*X_INPUT_DEVICE*/T0* r67vision(void);
+/*X_INPUT_DEVICE*/void r67when_proximity_out(T67* C,T0* a1,T0* a2);
+/*X_INPUT_DEVICE*/void r67connect(T67* C);
+/*X_INPUT_DEVICE*/void r67when_button_released(T67* C,T0* a1,T0* a2);
+/*X_INPUT_DEVICE*/void r67when_event(T67* C,T2 a1,T0* a2,T0* a3);
+/*X_INPUT_DEVICE*/void r67make(T67* C,T8 a1,T2 a2);
+/*X_INPUT_DEVICE*/void r67when_moved(T67* C,T0* a1,T0* a2);
+/*X_INPUT_DEVICE*/T2 r67proximity_axis_data(T2 a1);
+/*X_INPUT_DEVICE*/void r67when_button_pressed(T67* C,T0* a1,T0* a2);
+/*X_INPUT_DEVICE*/T2 r67motion_axis_data(T2 a1);
+/*X_INPUT_DEVICE*/void r67when_proximity_in(T67* C,T0* a1,T0* a2);
+/*STD_ERROR*/void r43put_string(T0* a1);
+/*STD_ERROR*/void r43put_line(T0* a1);
+/*STD_ERROR*/void r43dispose(T43* C);
+/*WACOM_POINTER*/T0* r69type_to_name(T2 a1);
+/*WACOM_POINTER*/T5 r69mean(T0* a1);
+/*WACOM_POINTER*/void r69update_predicted_position(T69* C,T5 a1,T5 a2,T5 a3);
+/*WACOM_POINTER*/T0* r69twin(T69* C);
+/*WACOM_POINTER*/void r69make(T69* C,T0* a1);
+/*WACOM_POINTER*/void r69print_data_in(T69* C,T0* a1,T2 a2,T2 a3,T2 a4,T2 a5,T2 a6,T2 a7,T2 a8,T0* a9);
+/*WACOM_POINTER*/void r69set_message_header(T69* C,T0* a1);
+/*WACOM_POINTER*/void r69button(T69* C,T6 a1,T0* a2);
+/*WACOM_POINTER*/void r69proximity(T69* C,T6 a1,T0* a2);
+/*WACOM_POINTER*/T2 r69device_to_screen_y(T69* C,T2 a1);
+/*WACOM_POINTER*/T2 r69device_to_screen_x(T69* C,T2 a1);
+/*WACOM_POINTER*/void r69move(T69* C,T0* a1);
+/*IVY*/void r70prepare(T70* C,T0* a1);
+/*IVY*/T6 r70is_ready(T70* C,T0* a1);
+/*IVY*/void r70continue(T70* C);
+/*IVY*/void r70channel_down(T70* C,T0* a1);
+/*IVY*/void r70callback_runner(T0* a1,T2 a2,T212 a3);
+/*IVY*/T0* r70channel_up(T70* C,T2 a1,T8 a2,T8 a3,T8 a4);
+/*IVY*/void r70send_message(T70* C,T0* a1);
+/*IVY*/void r70make(T70* C,T0* a1);
+/*IVY*/void r70start(T70* C,T0* a1);
+extern T0*oBC64root_window;
+extern int fBC64root_window;
+/*VISION*/T0* r64root_window(void);
+extern T0*oBC13std_error;
+/*VISION*/void r64crash(T64* C);
+/*VISION*/void r64not_yet_implemented(T64* C);
+/*VISION*/void r64start(T64* C);
+/*VISION*/void r64register(T64* C,T0* a1);
+/*VISION*/void r64graphic_init(T64* C);
+typedef struct _se_agenT25C25l194c40 se_agenT25C25l194c40;
+struct _se_agenT25C25l194c40{Tid id;
+int creation_mold_id;
+void(*afp)(se_agenT25C25l194c40*,T0*);
+void(*gc_mark_agent_mold)(se_agenT25C25l194c40*);
+int (*eq)(se_agent*,se_agent*);
+T0* c0;T6 c1;};
+typedef struct _se_agent_eqC69C6_r69proximity se_agent_eqC69C6_r69proximity;
+struct _se_agent_eqC69C6_r69proximity{Tid id;
+int creation_mold_id;
+void*afp;
+void*gc_mark_agent_mold;
+void*eq;
+T0* c0;T6 c1;};
+/*agent creation*/T0*agenT25C25l194c40(T0* c0,T6 c1);
+void gc_mark_agenT25C25l194c40(se_agenT25C25l194c40*u);
+/*agent equality*/int eq_agent_eqC69C6_r69proximity(se_agent*u1, se_agent*u2);
+typedef struct _se_agenT25C25l193c39 se_agenT25C25l193c39;
+struct _se_agenT25C25l193c39{Tid id;
+int creation_mold_id;
+void(*afp)(se_agenT25C25l193c39*,T0*);
+void(*gc_mark_agent_mold)(se_agenT25C25l193c39*);
+int (*eq)(se_agent*,se_agent*);
+T0* c0;T6 c1;};
+/*agent creation*/T0*agenT25C25l193c39(T0* c0,T6 c1);
+void gc_mark_agenT25C25l193c39(se_agenT25C25l193c39*u);
+typedef struct _se_agenT25C25l192c42 se_agenT25C25l192c42;
+struct _se_agenT25C25l192c42{Tid id;
+int creation_mold_id;
+void(*afp)(se_agenT25C25l192c42*,T0*);
+void(*gc_mark_agent_mold)(se_agenT25C25l192c42*);
+int (*eq)(se_agent*,se_agent*);
+T0* c0;T6 c1;};
+typedef struct _se_agent_eqC69C6_r69button se_agent_eqC69C6_r69button;
+struct _se_agent_eqC69C6_r69button{Tid id;
+int creation_mold_id;
+void*afp;
+void*gc_mark_agent_mold;
+void*eq;
+T0* c0;T6 c1;};
+/*agent creation*/T0*agenT25C25l192c42(T0* c0,T6 c1);
+void gc_mark_agenT25C25l192c42(se_agenT25C25l192c42*u);
+/*agent equality*/int eq_agent_eqC69C6_r69button(se_agent*u1, se_agent*u2);
+typedef struct _se_agenT25C25l191c41 se_agenT25C25l191c41;
+struct _se_agenT25C25l191c41{Tid id;
+int creation_mold_id;
+void(*afp)(se_agenT25C25l191c41*,T0*);
+void(*gc_mark_agent_mold)(se_agenT25C25l191c41*);
+int (*eq)(se_agent*,se_agent*);
+T0* c0;T6 c1;};
+/*agent creation*/T0*agenT25C25l191c41(T0* c0,T6 c1);
+void gc_mark_agenT25C25l191c41(se_agenT25C25l191c41*u);
+typedef struct _se_agenT25C25l190c32 se_agenT25C25l190c32;
+struct _se_agenT25C25l190c32{Tid id;
+int creation_mold_id;
+void(*afp)(se_agenT25C25l190c32*,T0*);
+void(*gc_mark_agent_mold)(se_agenT25C25l190c32*);
+int (*eq)(se_agent*,se_agent*);
+T0* c0;};
+typedef struct _se_agent_eqC69_r69move se_agent_eqC69_r69move;
+struct _se_agent_eqC69_r69move{Tid id;
+int creation_mold_id;
+void*afp;
+void*gc_mark_agent_mold;
+void*eq;
+T0* c0;};
+/*agent creation*/T0*agenT25C25l190c32(T0* c0);
+void gc_mark_agenT25C25l190c32(se_agenT25C25l190c32*u);
+/*agent equality*/int eq_agent_eqC69_r69move(se_agent*u1, se_agent*u2);
+typedef struct _se_agenT25C25l173c38 se_agenT25C25l173c38;
+struct _se_agenT25C25l173c38{Tid id;
+int creation_mold_id;
+void(*afp)(se_agenT25C25l173c38*,T0*);
+void(*gc_mark_agent_mold)(se_agenT25C25l173c38*);
+int (*eq)(se_agent*,se_agent*);
+T0* c0;T0* c1;};
+typedef struct _se_agent_eqC25C7_r25pad_button_released se_agent_eqC25C7_r25pad_button_released;
+struct _se_agent_eqC25C7_r25pad_button_released{Tid id;
+int creation_mold_id;
+void*afp;
+void*gc_mark_agent_mold;
+void*eq;
+T0* c0;T0* c1;};
+/*agent creation*/T0*agenT25C25l173c38(T0* c0,T0* c1);
+void gc_mark_agenT25C25l173c38(se_agenT25C25l173c38*u);
+/*agent equality*/int eq_agent_eqC25C7_r25pad_button_released(se_agent*u1, se_agent*u2);
+typedef struct _se_agenT25C25l172c37 se_agenT25C25l172c37;
+struct _se_agenT25C25l172c37{Tid id;
+int creation_mold_id;
+void(*afp)(se_agenT25C25l172c37*,T0*);
+void(*gc_mark_agent_mold)(se_agenT25C25l172c37*);
+int (*eq)(se_agent*,se_agent*);
+T0* c0;T0* c1;};
+typedef struct _se_agent_eqC25C7_r25pad_button_pressed se_agent_eqC25C7_r25pad_button_pressed;
+struct _se_agent_eqC25C7_r25pad_button_pressed{Tid id;
+int creation_mold_id;
+void*afp;
+void*gc_mark_agent_mold;
+void*eq;
+T0* c0;T0* c1;};
+/*agent creation*/T0*agenT25C25l172c37(T0* c0,T0* c1);
+void gc_mark_agenT25C25l172c37(se_agenT25C25l172c37*u);
+/*agent equality*/int eq_agent_eqC25C7_r25pad_button_pressed(se_agent*u1, se_agent*u2);
+typedef struct _se_agenT25C25l167c36 se_agenT25C25l167c36;
+struct _se_agenT25C25l167c36{Tid id;
+int creation_mold_id;
+void(*afp)(se_agenT25C25l167c36*,T0*);
+void(*gc_mark_agent_mold)(se_agenT25C25l167c36*);
+int (*eq)(se_agent*,se_agent*);
+T0* c0;T0* c1;};
+typedef struct _se_agent_eqC25C7_r25left_slider_out se_agent_eqC25C7_r25left_slider_out;
+struct _se_agent_eqC25C7_r25left_slider_out{Tid id;
+int creation_mold_id;
+void*afp;
+void*gc_mark_agent_mold;
+void*eq;
+T0* c0;T0* c1;};
+/*agent creation*/T0*agenT25C25l167c36(T0* c0,T0* c1);
+void gc_mark_agenT25C25l167c36(se_agenT25C25l167c36*u);
+/*agent equality*/int eq_agent_eqC25C7_r25left_slider_out(se_agent*u1, se_agent*u2);
+typedef struct _se_agenT25C25l166c28 se_agenT25C25l166c28;
+struct _se_agenT25C25l166c28{Tid id;
+int creation_mold_id;
+void(*afp)(se_agenT25C25l166c28*,T0*);
+void(*gc_mark_agent_mold)(se_agenT25C25l166c28*);
+int (*eq)(se_agent*,se_agent*);
+T0* c0;T0* c1;};
+typedef struct _se_agent_eqC25C7_r25slider_event se_agent_eqC25C7_r25slider_event;
+struct _se_agent_eqC25C7_r25slider_event{Tid id;
+int creation_mold_id;
+void*afp;
+void*gc_mark_agent_mold;
+void*eq;
+T0* c0;T0* c1;};
+/*agent creation*/T0*agenT25C25l166c28(T0* c0,T0* c1);
+void gc_mark_agenT25C25l166c28(se_agenT25C25l166c28*u);
+/*agent equality*/int eq_agent_eqC25C7_r25slider_event(se_agent*u1, se_agent*u2);
+/*XINPUT_IVY*/T0* r25std_output(void);
+/*XINPUT_IVY*/T0* r25vision(void);
+/*XINPUT_IVY*/T6 r25decode_options(T25* C);
+/*XINPUT_IVY*/void r25list_devices(T25* C);
+/*XINPUT_IVY*/void r25print_help(void);
+/*XINPUT_IVY*/T6 r25init_pad(T25* C,T0* a1);
+/*XINPUT_IVY*/void r25left_slider_out(T25* C,T0* a1,T0* a2);
+/*XINPUT_IVY*/void r25pad_button_pressed(T25* C,T0* a1,T0* a2);
+/*XINPUT_IVY*/void r25pad_button_released(T25* C,T0* a1,T0* a2);
+/*XINPUT_IVY*/T2 r25argument_count(void);
+/*XINPUT_IVY*/void r25make(T25* C);
+/*XINPUT_IVY*/T0* r25subscribe_input(T25* C,T0* a1);
+/*XINPUT_IVY*/T6 r25init_wacom_pointer(T25* C,T0* a1,T0* a2);
+/*XINPUT_IVY*/void r25slider_event(T25* C,T0* a1,T0* a2);
+extern T0*oBC30command_arguments;
+extern int fBC30command_arguments;
+/*XINPUT_IVY*/T0* r25command_arguments(void);
+void agent_launcher(/*agent*/T0*a);
+void agent_launcher_FAST_ARRAY__STRING__(/*agent*/T0*a,T0* a1);
+void agent_launcher_INTEGER_32_INTEGER_32(/*agent*/T0*a,T2 a1,T2 a2);
+void agent_launcher_INTEGER_32_INTEGER_32_INTEGER_32_INTEGER_32(/*agent*/T0*a,T2 a1,T2 a2,T2 a3,T2 a4);
+void agent_launcher_X_INPUT_DEVICE(/*agent*/T0*a,T0* a1);
+union _se_agent{T0 s0;se_agent0 u0;
+se_agenT25C25l166c28 uagenT25C25l166c28;
+se_agenT25C25l167c36 uagenT25C25l167c36;
+se_agenT25C25l172c37 uagenT25C25l172c37;
+se_agenT25C25l173c38 uagenT25C25l173c38;
+se_agenT25C25l190c32 uagenT25C25l190c32;
+se_agenT25C25l191c41 uagenT25C25l191c41;
+se_agenT25C25l192c42 uagenT25C25l192c42;
+se_agenT25C25l193c39 uagenT25C25l193c39;
+se_agenT25C25l194c40 uagenT25C25l194c40;
+};
+/*
+-- ------------------------------------------------------------------------------------------------------------
+-- Copyright notice below. Please read.
+--
+-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P. - University of Nancy 1 - FRANCE
+-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
+--
+-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated
+-- documentation files (the "Software"), to deal in the Software without restriction, including without
+-- limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+-- the Software, and to permit persons to whom the Software is furnished to do so, subject to the following
+-- conditions:
+--
+-- The above copyright notice and this permission notice shall be included in all copies or substantial
+-- portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
+-- LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO
+-- EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+-- AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
+-- OR OTHER DEALINGS IN THE SOFTWARE.
+--
+-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
+-- ------------------------------------------------------------------------------------------------------------
+*/
+#define SE_AGENTS 1
+#define EIF_AGENT se_agent*
+
+se_agent* new_agent(Tid id);
+
+#ifdef SE_GC_LIB
+
+ typedef struct B_agent gc_agent;
+
+ struct B_agent {
+ se_agent object;
+ union {
+ void *flag;
+ gc_agent *next;
+ } header;
+ };
+
+ extern gc_agent *store_agent;
+ extern gc_agent *gc_free_agent;
+ extern int store_left_agent;
+ extern fsoc *store_chunk_agent;
+ extern fsoc H_agent;
+ extern int gc_info_nb_agent;
+
+ void gc_align_mark_agent(fsoc *c, gc_agent* a);
+ void gc_sweep_agent(fsoc *c);
+
+#endif
+extern T0*ms69_1874520032;
+extern T0*ms25_0bc25c15l360;
+extern T0*ms69_22702416;
+extern T0*ms69_22702411;
+extern T0*ms69_190991;
+extern T0*ms143_1472358418;
+extern T0*ms69_15980;
+extern T0*ms25_0bc25;
+extern T0*ms69_188916;
+extern T0*ms25_0bc69;
+extern T0*ms25_0bc69c15l93;
+extern T0*ms69_1501987274;
+extern T0*ms25_1403610646;
+extern T0*ms25_0;
+extern T0*ms69_10739030;
+extern T0*ms69_10739024;
+extern T0*ms69_10739017;
+extern T0*ms25_1959886733;
+extern T0*ms25_0bc25c15;
+extern T0*ms25_3479972;
+extern T0*ms25_21190322;
+extern T0*ms69_1756148648;
+extern T0*ms69_1756148653;
+extern T0*ms69_1619665677;
+extern T0*ms69_104371129;
+extern T0*ms69_104371267;
+extern T0*ms25_314746909;
+extern T0*ms25_1638797568;
+extern T0*ms69_1961093439;
+extern T0*ms69_1699147265;
+extern T0*ms69_23436791;
+extern T0*ms25_4487261bc69;
+extern T0*ms25_694149733;
+extern T0*ms69_4738061;
+extern T0*ms69_2112369621;
+extern T0*ms25_557679246;
+extern T0*ms69_1940108584;
+extern T0*ms69_952626;
+extern T0*ms69_1461;
+extern T0*ms69_1466;
+extern T0*ms69_4725666;
+extern T0*ms69_4725661;
+extern T0*ms69_56246305;
+extern T0*ms69_2676;
+extern T0*ms25_4487261;
+extern T0*ms69_1257860908;
+extern T0*ms69_56246305bc69;
+extern T0*ms25_1403610646bc25;
+extern T0*ms69_2057747851;
+extern T0*ms25_0bc69c16;
+extern T0*ms25_0bc69c15;
+extern T0*ms69_586741066;
+extern T0*ms25_946366;
+extern T0*ms69_475;
+extern T0*ms69_697;
+T0*se_ms(int c,char*e);
+T0*se_string(char*e);
+void se_msi1(void);
+void se_msi2(void);
+void W70callback_runner(void* C,void* a1,T2 a2,T212 a3);
+void manifest_string_mark1(void);
+void once_function_mark(void);
+void gc_start(void);
+typedef struct B110 gc110;
+struct B110{T110 object;union {void*flag;gc110*next;} header;};
+extern gc110*store110;
+extern int store_left110;
+extern fsoc*store_chunk110;
+extern gc110*gc_free110;
+typedef struct B120 gc120;
+struct B120{T120 object;union {void*flag;gc120*next;} header;};
+extern gc120*store120;
+extern int store_left120;
+extern fsoc*store_chunk120;
+extern gc120*gc_free120;
+extern na_env na_env293;
+extern na_env na_env292;
+extern na_env na_env291;
+extern na_env na_env290;
+extern na_env na_env289;
+extern na_env na_env288;
+extern na_env na_env287;
+typedef struct B286 gc286;
+struct B286{T286 object;union {void*flag;gc286*next;} header;};
+extern gc286*store286;
+extern int store_left286;
+extern fsoc*store_chunk286;
+extern gc286*gc_free286;
+extern na_env na_env284;
+extern na_env na_env281;
+typedef struct B277 gc277;
+struct B277{T277 object;union {void*flag;gc277*next;} header;};
+extern gc277*store277;
+extern int store_left277;
+extern fsoc*store_chunk277;
+extern gc277*gc_free277;
+extern na_env na_env276;
+typedef struct B271 gc271;
+struct B271{T271 object;union {void*flag;gc271*next;} header;};
+extern gc271*store271;
+extern int store_left271;
+extern fsoc*store_chunk271;
+extern gc271*gc_free271;
+extern na_env na_env270;
+typedef struct B268 gc268;
+struct B268{T268 object;union {void*flag;gc268*next;} header;};
+extern gc268*store268;
+extern int store_left268;
+extern fsoc*store_chunk268;
+extern gc268*gc_free268;
+extern na_env na_env267;
+typedef struct B266 gc266;
+struct B266{T266 object;union {void*flag;gc266*next;} header;};
+extern gc266*store266;
+extern int store_left266;
+extern fsoc*store_chunk266;
+extern gc266*gc_free266;
+typedef struct B265 gc265;
+struct B265{T265 object;union {void*flag;gc265*next;} header;};
+extern gc265*store265;
+extern int store_left265;
+extern fsoc*store_chunk265;
+extern gc265*gc_free265;
+typedef struct B264 gc264;
+struct B264{T264 object;union {void*flag;gc264*next;} header;};
+extern gc264*store264;
+extern int store_left264;
+extern fsoc*store_chunk264;
+extern gc264*gc_free264;
+extern na_env na_env263;
+extern na_env na_env262;
+extern na_env na_env261;
+extern na_env na_env260;
+extern na_env na_env259;
+typedef struct B258 gc258;
+struct B258{T258 object;union {void*flag;gc258*next;} header;};
+extern gc258*store258;
+extern int store_left258;
+extern fsoc*store_chunk258;
+extern gc258*gc_free258;
+extern na_env na_env257;
+typedef struct B256 gc256;
+struct B256{T256 object;union {void*flag;gc256*next;} header;};
+extern gc256*store256;
+extern int store_left256;
+extern fsoc*store_chunk256;
+extern gc256*gc_free256;
+extern na_env na_env255;
+typedef struct B254 gc254;
+struct B254{T254 object;union {void*flag;gc254*next;} header;};
+extern gc254*store254;
+extern int store_left254;
+extern fsoc*store_chunk254;
+extern gc254*gc_free254;
+typedef struct B253 gc253;
+struct B253{T253 object;union {void*flag;gc253*next;} header;};
+extern gc253*store253;
+extern int store_left253;
+extern fsoc*store_chunk253;
+extern gc253*gc_free253;
+typedef struct B252 gc252;
+struct B252{T252 object;union {void*flag;gc252*next;} header;};
+extern gc252*store252;
+extern int store_left252;
+extern fsoc*store_chunk252;
+extern gc252*gc_free252;
+extern na_env na_env251;
+extern na_env na_env250;
+typedef struct B249 gc249;
+struct B249{T249 object;union {void*flag;gc249*next;} header;};
+extern gc249*store249;
+extern int store_left249;
+extern fsoc*store_chunk249;
+extern gc249*gc_free249;
+extern na_env na_env247;
+typedef struct B246 gc246;
+struct B246{T246 object;union {void*flag;gc246*next;} header;};
+extern gc246*store246;
+extern int store_left246;
+extern fsoc*store_chunk246;
+extern gc246*gc_free246;
+typedef struct B245 gc245;
+struct B245{T245 object;union {void*flag;gc245*next;} header;};
+extern gc245*store245;
+extern int store_left245;
+extern fsoc*store_chunk245;
+extern gc245*gc_free245;
+typedef struct B244 gc244;
+struct B244{T244 object;union {void*flag;gc244*next;} header;};
+extern gc244*store244;
+extern int store_left244;
+extern fsoc*store_chunk244;
+extern gc244*gc_free244;
+typedef struct B243 gc243;
+struct B243{T243 object;union {void*flag;gc243*next;} header;};
+extern gc243*store243;
+extern int store_left243;
+extern fsoc*store_chunk243;
+extern gc243*gc_free243;
+extern na_env na_env239;
+extern na_env na_env238;
+extern na_env na_env237;
+typedef struct B147 gc147;
+struct B147{T147 object;union {void*flag;gc147*next;} header;};
+extern gc147*store147;
+extern int store_left147;
+extern fsoc*store_chunk147;
+extern gc147*gc_free147;
+typedef struct B236 gc236;
+struct B236{T236 object;union {void*flag;gc236*next;} header;};
+extern gc236*store236;
+extern int store_left236;
+extern fsoc*store_chunk236;
+extern gc236*gc_free236;
+typedef struct B235 gc235;
+struct B235{T235 object;union {void*flag;gc235*next;} header;};
+extern gc235*store235;
+extern int store_left235;
+extern fsoc*store_chunk235;
+extern gc235*gc_free235;
+typedef struct B234 gc234;
+struct B234{T234 object;union {void*flag;gc234*next;} header;};
+extern gc234*store234;
+extern int store_left234;
+extern fsoc*store_chunk234;
+extern gc234*gc_free234;
+typedef struct B232 gc232;
+struct B232{T232 object;union {void*flag;gc232*next;} header;};
+extern gc232*store232;
+extern int store_left232;
+extern fsoc*store_chunk232;
+extern gc232*gc_free232;
+typedef struct B230 gc230;
+struct B230{T230 object;union {void*flag;gc230*next;} header;};
+extern gc230*store230;
+extern int store_left230;
+extern fsoc*store_chunk230;
+extern gc230*gc_free230;
+typedef struct B228 gc228;
+struct B228{T228 object;union {void*flag;gc228*next;} header;};
+extern gc228*store228;
+extern int store_left228;
+extern fsoc*store_chunk228;
+extern gc228*gc_free228;
+typedef struct B227 gc227;
+struct B227{T227 object;union {void*flag;gc227*next;} header;};
+extern gc227*store227;
+extern int store_left227;
+extern fsoc*store_chunk227;
+extern gc227*gc_free227;
+typedef struct B226 gc226;
+struct B226{T226 object;union {void*flag;gc226*next;} header;};
+extern gc226*store226;
+extern int store_left226;
+extern fsoc*store_chunk226;
+extern gc226*gc_free226;
+typedef struct B225 gc225;
+struct B225{T225 object;union {void*flag;gc225*next;} header;};
+extern gc225*store225;
+extern int store_left225;
+extern fsoc*store_chunk225;
+extern gc225*gc_free225;
+typedef struct B158 gc158;
+struct B158{T158 object;union {void*flag;gc158*next;} header;};
+extern gc158*store158;
+extern int store_left158;
+extern fsoc*store_chunk158;
+extern gc158*gc_free158;
+typedef struct B54 gc54;
+struct B54{T54 object;union {void*flag;gc54*next;} header;};
+extern gc54*store54;
+extern int store_left54;
+extern fsoc*store_chunk54;
+extern gc54*gc_free54;
+typedef struct B139 gc139;
+struct B139{T139 object;union {void*flag;gc139*next;} header;};
+extern gc139*store139;
+extern int store_left139;
+extern fsoc*store_chunk139;
+extern gc139*gc_free139;
+typedef struct B223 gc223;
+struct B223{T223 object;union {void*flag;gc223*next;} header;};
+extern gc223*store223;
+extern int store_left223;
+extern fsoc*store_chunk223;
+extern gc223*gc_free223;
+typedef struct B142 gc142;
+struct B142{T142 object;union {void*flag;gc142*next;} header;};
+extern gc142*store142;
+extern int store_left142;
+extern fsoc*store_chunk142;
+extern gc142*gc_free142;
+typedef struct B222 gc222;
+struct B222{T222 object;union {void*flag;gc222*next;} header;};
+extern gc222*store222;
+extern int store_left222;
+extern fsoc*store_chunk222;
+extern gc222*gc_free222;
+typedef struct B141 gc141;
+struct B141{T141 object;union {void*flag;gc141*next;} header;};
+extern gc141*store141;
+extern int store_left141;
+extern fsoc*store_chunk141;
+extern gc141*gc_free141;
+typedef struct B221 gc221;
+struct B221{T221 object;union {void*flag;gc221*next;} header;};
+extern gc221*store221;
+extern int store_left221;
+extern fsoc*store_chunk221;
+extern gc221*gc_free221;
+extern na_env na_env220;
+extern na_env na_env219;
+typedef struct B218 gc218;
+struct B218{T218 object;union {void*flag;gc218*next;} header;};
+extern gc218*store218;
+extern int store_left218;
+extern fsoc*store_chunk218;
+extern gc218*gc_free218;
+typedef struct B217 gc217;
+struct B217{T217 object;union {void*flag;gc217*next;} header;};
+extern gc217*store217;
+extern int store_left217;
+extern fsoc*store_chunk217;
+extern gc217*gc_free217;
+typedef struct B216 gc216;
+struct B216{T216 object;union {void*flag;gc216*next;} header;};
+extern gc216*store216;
+extern int store_left216;
+extern fsoc*store_chunk216;
+extern gc216*gc_free216;
+typedef struct B215 gc215;
+struct B215{T215 object;union {void*flag;gc215*next;} header;};
+extern gc215*store215;
+extern int store_left215;
+extern fsoc*store_chunk215;
+extern gc215*gc_free215;
+typedef struct B214 gc214;
+struct B214{T214 object;union {void*flag;gc214*next;} header;};
+extern gc214*store214;
+extern int store_left214;
+extern fsoc*store_chunk214;
+extern gc214*gc_free214;
+typedef struct B213 gc213;
+struct B213{T213 object;union {void*flag;gc213*next;} header;};
+extern gc213*store213;
+extern int store_left213;
+extern fsoc*store_chunk213;
+extern gc213*gc_free213;
+extern na_env na_env212;
+typedef struct B211 gc211;
+struct B211{T211 object;union {void*flag;gc211*next;} header;};
+extern gc211*store211;
+extern int store_left211;
+extern fsoc*store_chunk211;
+extern gc211*gc_free211;
+typedef struct B208 gc208;
+struct B208{T208 object;union {void*flag;gc208*next;} header;};
+extern gc208*store208;
+extern int store_left208;
+extern fsoc*store_chunk208;
+extern gc208*gc_free208;
+typedef struct B146 gc146;
+struct B146{T146 object;union {void*flag;gc146*next;} header;};
+extern gc146*store146;
+extern int store_left146;
+extern fsoc*store_chunk146;
+extern gc146*gc_free146;
+typedef struct B207 gc207;
+struct B207{T207 object;union {void*flag;gc207*next;} header;};
+extern gc207*store207;
+extern int store_left207;
+extern fsoc*store_chunk207;
+extern gc207*gc_free207;
+typedef struct B206 gc206;
+struct B206{T206 object;union {void*flag;gc206*next;} header;};
+extern gc206*store206;
+extern int store_left206;
+extern fsoc*store_chunk206;
+extern gc206*gc_free206;
+typedef struct B148 gc148;
+struct B148{T148 object;union {void*flag;gc148*next;} header;};
+extern gc148*store148;
+extern int store_left148;
+extern fsoc*store_chunk148;
+extern gc148*gc_free148;
+typedef struct B131 gc131;
+struct B131{T131 object;union {void*flag;gc131*next;} header;};
+extern gc131*store131;
+extern int store_left131;
+extern fsoc*store_chunk131;
+extern gc131*gc_free131;
+typedef struct B130 gc130;
+struct B130{T130 object;union {void*flag;gc130*next;} header;};
+extern gc130*store130;
+extern int store_left130;
+extern fsoc*store_chunk130;
+extern gc130*gc_free130;
+typedef struct B128 gc128;
+struct B128{T128 object;union {void*flag;gc128*next;} header;};
+extern gc128*store128;
+extern int store_left128;
+extern fsoc*store_chunk128;
+extern gc128*gc_free128;
+typedef struct B72 gc72;
+struct B72{T72 object;union {void*flag;gc72*next;} header;};
+extern gc72*store72;
+extern int store_left72;
+extern fsoc*store_chunk72;
+extern gc72*gc_free72;
+typedef struct B53 gc53;
+struct B53{T53 object;union {void*flag;gc53*next;} header;};
+extern gc53*store53;
+extern int store_left53;
+extern fsoc*store_chunk53;
+extern gc53*gc_free53;
+typedef struct B46 gc46;
+struct B46{T46 object;union {void*flag;gc46*next;} header;};
+extern gc46*store46;
+extern int store_left46;
+extern fsoc*store_chunk46;
+extern gc46*gc_free46;
+typedef struct B175 gc175;
+struct B175{T175 object;union {void*flag;gc175*next;} header;};
+extern gc175*store175;
+extern int store_left175;
+extern fsoc*store_chunk175;
+extern gc175*gc_free175;
+typedef struct B205 gc205;
+struct B205{T205 object;union {void*flag;gc205*next;} header;};
+extern gc205*store205;
+extern int store_left205;
+extern fsoc*store_chunk205;
+extern gc205*gc_free205;
+typedef struct B204 gc204;
+struct B204{T204 object;union {void*flag;gc204*next;} header;};
+extern gc204*store204;
+extern int store_left204;
+extern fsoc*store_chunk204;
+extern gc204*gc_free204;
+
+#define gc_mark202(x) (((se_agent0*)(x))->gc_mark_agent_mold((se_agent*)(x)))
+
+typedef struct B67 gc67;
+struct B67{T67 object;union {void*flag;gc67*next;} header;};
+extern gc67*store67;
+extern int store_left67;
+extern fsoc*store_chunk67;
+extern gc67*gc_free67;
+typedef struct B43 gc43;
+struct B43{T43 object;union {void*flag;gc43*next;} header;};
+extern gc43*store43;
+extern int store_left43;
+extern fsoc*store_chunk43;
+extern gc43*gc_free43;
+typedef struct B69 gc69;
+struct B69{T69 object;union {void*flag;gc69*next;} header;};
+extern gc69*store69;
+extern int store_left69;
+extern fsoc*store_chunk69;
+extern gc69*gc_free69;
+extern na_env na_env9;
+typedef struct B7 gc7;
+struct B7{T7 object;union {void*flag;gc7*next;} header;};
+extern gc7*store7;
+extern int store_left7;
+extern fsoc*store_chunk7;
+extern gc7*gc_free7;
+typedef struct B70 gc70;
+struct B70{T70 object;union {void*flag;gc70*next;} header;};
+extern gc70*store70;
+extern int store_left70;
+extern fsoc*store_chunk70;
+extern gc70*gc_free70;
+typedef struct B64 gc64;
+struct B64{T64 object;union {void*flag;gc64*next;} header;};
+extern gc64*store64;
+extern int store_left64;
+extern fsoc*store_chunk64;
+extern gc64*gc_free64;
+typedef struct B25 gc25;
+struct B25{T25 object;union {void*flag;gc25*next;} header;};
+extern gc25*store25;
+extern int store_left25;
+extern fsoc*store_chunk25;
+extern gc25*gc_free25;
+void gc_sweep110(fsoc*c);
+void gc_mark110(T110*o);
+void gc_align_mark110(fsoc*c,gc110*p);
+extern fsoc H110;
+T110*new110(void);
+void gc_sweep120(fsoc*c);
+void gc_mark120(T120*o);
+void gc_align_mark120(fsoc*c,gc120*p);
+extern fsoc H120;
+T120*new120(void);
+void gc_mark293(T293 o);
+T293 new293(unsigned int size);
+void gc_mark292(T292 o);
+T292 new292(unsigned int size);
+void gc_mark291(T291 o);
+T291 new291(unsigned int size);
+void gc_mark290(T290 o);
+T290 new290(unsigned int size);
+void gc_mark289(T289 o);
+T289 new289(unsigned int size);
+void gc_mark288(T288 o);
+T288 new288(unsigned int size);
+void gc_mark287(T287 o);
+T287 new287(unsigned int size);
+void gc_sweep286(fsoc*c);
+void gc_update_weak_ref_item_polymorph(T0** item);
+void gc_mark286(T286*o);
+void gc_align_mark286(fsoc*c,gc286*p);
+extern fsoc H286;
+T286*new286(void);
+void gc_mark284(T284 o);
+T284 new284(unsigned int size);
+void gc_mark281(T281 o);
+T281 new281(unsigned int size);
+void gc_sweep277(fsoc*c);
+void gc_mark277(T277*o);
+void gc_align_mark277(fsoc*c,gc277*p);
+extern fsoc H277;
+T277*new277(void);
+void gc_mark276(T276 o);
+T276 new276(unsigned int size);
+void gc_sweep271(fsoc*c);
+void gc_mark271(T271*o);
+void gc_align_mark271(fsoc*c,gc271*p);
+extern fsoc H271;
+T271*new271(void);
+void gc_mark270(T270 o);
+T270 new270(unsigned int size);
+void gc_sweep268(fsoc*c);
+void gc_update_weak_ref_item268(T268* wr);
+void gc_mark268(T268*o);
+void gc_align_mark268(fsoc*c,gc268*p);
+extern fsoc H268;
+T268*new268(void);
+void gc_mark267(T267 o);
+T267 new267(unsigned int size);
+void gc_sweep266(fsoc*c);
+void gc_mark266(T266*o);
+void gc_align_mark266(fsoc*c,gc266*p);
+extern fsoc H266;
+T266*new266(void);
+void gc_sweep265(fsoc*c);
+void gc_update_weak_ref_item265(T265* wr);
+void gc_mark265(T265*o);
+void gc_align_mark265(fsoc*c,gc265*p);
+extern fsoc H265;
+T265*new265(void);
+void gc_sweep264(fsoc*c);
+void gc_mark264(T264*o);
+void gc_align_mark264(fsoc*c,gc264*p);
+extern fsoc H264;
+T264*new264(void);
+void gc_mark263(T263 o);
+T263 new263(unsigned int size);
+void gc_mark262(T262 o);
+T262 new262(unsigned int size);
+void gc_mark261(T261 o);
+T261 new261(unsigned int size);
+void gc_mark260(T260 o);
+T260 new260(unsigned int size);
+void gc_mark259(T259 o);
+T259 new259(unsigned int size);
+void gc_sweep258(fsoc*c);
+void gc_update_weak_ref_item258(T258* wr);
+void gc_mark258(T258*o);
+void gc_align_mark258(fsoc*c,gc258*p);
+extern fsoc H258;
+T258*new258(void);
+void gc_mark257(T257 o);
+T257 new257(unsigned int size);
+void gc_sweep256(fsoc*c);
+void gc_mark256(T256*o);
+void gc_align_mark256(fsoc*c,gc256*p);
+extern fsoc H256;
+T256*new256(void);
+void gc_mark255(T255 o);
+T255 new255(unsigned int size);
+void gc_sweep254(fsoc*c);
+void gc_mark254(T254*o);
+void gc_align_mark254(fsoc*c,gc254*p);
+extern fsoc H254;
+T254*new254(void);
+void gc_sweep253(fsoc*c);
+void gc_update_weak_ref_item253(T253* wr);
+void gc_mark253(T253*o);
+void gc_align_mark253(fsoc*c,gc253*p);
+extern fsoc H253;
+T253*new253(void);
+void gc_sweep252(fsoc*c);
+void gc_mark252(T252*o);
+void gc_align_mark252(fsoc*c,gc252*p);
+extern fsoc H252;
+T252*new252(void);
+void gc_mark251(T251 o);
+T251 new251(unsigned int size);
+void gc_mark250(T250 o);
+T250 new250(unsigned int size);
+void gc_sweep249(fsoc*c);
+void gc_mark249(T249*o);
+void gc_align_mark249(fsoc*c,gc249*p);
+extern fsoc H249;
+T249*new249(void);
+void gc_mark247(T247 o);
+T247 new247(unsigned int size);
+void gc_sweep246(fsoc*c);
+void gc_mark246(T246*o);
+void gc_align_mark246(fsoc*c,gc246*p);
+extern fsoc H246;
+T246*new246(void);
+void gc_sweep245(fsoc*c);
+void gc_update_weak_ref_item245(T245* wr);
+void gc_mark245(T245*o);
+void gc_align_mark245(fsoc*c,gc245*p);
+extern fsoc H245;
+T245*new245(void);
+void gc_sweep244(fsoc*c);
+void gc_mark244(T244*o);
+void gc_align_mark244(fsoc*c,gc244*p);
+extern fsoc H244;
+T244*new244(void);
+void gc_sweep243(fsoc*c);
+void gc_mark243(T243*o);
+void gc_align_mark243(fsoc*c,gc243*p);
+extern fsoc H243;
+T243*new243(void);
+void gc_mark239(T239 o);
+T239 new239(unsigned int size);
+void gc_mark238(T238 o);
+T238 new238(unsigned int size);
+void gc_mark237(T237 o);
+T237 new237(unsigned int size);
+void gc_sweep147(fsoc*c);
+void gc_mark147(T147*o);
+void gc_align_mark147(fsoc*c,gc147*p);
+extern fsoc H147;
+T147*new147(void);
+void gc_sweep236(fsoc*c);
+void gc_mark236(T236*o);
+void gc_align_mark236(fsoc*c,gc236*p);
+extern fsoc H236;
+T236*new236(void);
+void gc_sweep235(fsoc*c);
+void gc_mark235(T235*o);
+void gc_align_mark235(fsoc*c,gc235*p);
+extern fsoc H235;
+T235*new235(void);
+void gc_sweep234(fsoc*c);
+void gc_mark234(T234*o);
+void gc_align_mark234(fsoc*c,gc234*p);
+extern fsoc H234;
+T234*new234(void);
+void gc_sweep232(fsoc*c);
+void gc_mark232(T232*o);
+void gc_align_mark232(fsoc*c,gc232*p);
+extern fsoc H232;
+T232*new232(void);
+void gc_sweep230(fsoc*c);
+void gc_mark230(T230*o);
+void gc_align_mark230(fsoc*c,gc230*p);
+extern fsoc H230;
+T230*new230(void);
+void gc_sweep228(fsoc*c);
+void gc_mark228(T228*o);
+void gc_align_mark228(fsoc*c,gc228*p);
+extern fsoc H228;
+T228*new228(void);
+void gc_sweep227(fsoc*c);
+void gc_mark227(T227*o);
+void gc_align_mark227(fsoc*c,gc227*p);
+extern fsoc H227;
+T227*new227(void);
+void gc_sweep226(fsoc*c);
+void gc_mark226(T226*o);
+void gc_align_mark226(fsoc*c,gc226*p);
+extern fsoc H226;
+T226*new226(void);
+void gc_sweep225(fsoc*c);
+void gc_mark225(T225*o);
+void gc_align_mark225(fsoc*c,gc225*p);
+extern fsoc H225;
+T225*new225(void);
+void gc_sweep158(fsoc*c);
+void gc_mark158(T158*o);
+void gc_align_mark158(fsoc*c,gc158*p);
+extern fsoc H158;
+T158*new158(void);
+void gc_sweep54(fsoc*c);
+void gc_mark54(T54*o);
+void gc_align_mark54(fsoc*c,gc54*p);
+extern fsoc H54;
+T54*new54(void);
+void gc_sweep139(fsoc*c);
+void gc_mark139(T139*o);
+void gc_align_mark139(fsoc*c,gc139*p);
+extern fsoc H139;
+T139*new139(void);
+void gc_sweep223(fsoc*c);
+void gc_mark223(T223*o);
+void gc_align_mark223(fsoc*c,gc223*p);
+extern fsoc H223;
+T223*new223(void);
+void gc_sweep142(fsoc*c);
+void gc_mark142(T142*o);
+void gc_align_mark142(fsoc*c,gc142*p);
+extern fsoc H142;
+T142*new142(void);
+void gc_sweep222(fsoc*c);
+void gc_mark222(T222*o);
+void gc_align_mark222(fsoc*c,gc222*p);
+extern fsoc H222;
+T222*new222(void);
+void gc_sweep141(fsoc*c);
+void gc_mark141(T141*o);
+void gc_align_mark141(fsoc*c,gc141*p);
+extern fsoc H141;
+T141*new141(void);
+void gc_sweep221(fsoc*c);
+void gc_mark221(T221*o);
+void gc_align_mark221(fsoc*c,gc221*p);
+extern fsoc H221;
+T221*new221(void);
+void gc_mark220(T220 o);
+T220 new220(unsigned int size);
+void gc_mark219(T219 o);
+T219 new219(unsigned int size);
+void gc_sweep218(fsoc*c);
+void gc_mark218(T218*o);
+void gc_align_mark218(fsoc*c,gc218*p);
+extern fsoc H218;
+T218*new218(void);
+void gc_sweep217(fsoc*c);
+void gc_mark217(T217*o);
+void gc_align_mark217(fsoc*c,gc217*p);
+extern fsoc H217;
+T217*new217(void);
+void gc_sweep216(fsoc*c);
+void gc_mark216(T216*o);
+void gc_align_mark216(fsoc*c,gc216*p);
+extern fsoc H216;
+T216*new216(void);
+void gc_sweep215(fsoc*c);
+void gc_mark215(T215*o);
+void gc_align_mark215(fsoc*c,gc215*p);
+extern fsoc H215;
+T215*new215(void);
+void gc_sweep214(fsoc*c);
+void gc_mark214(T214*o);
+void gc_align_mark214(fsoc*c,gc214*p);
+extern fsoc H214;
+T214*new214(void);
+void gc_sweep213(fsoc*c);
+void gc_mark213(T213*o);
+void gc_align_mark213(fsoc*c,gc213*p);
+extern fsoc H213;
+T213*new213(void);
+void gc_mark212(T212 o);
+T212 new212(unsigned int size);
+void gc_sweep211(fsoc*c);
+void gc_mark211(T211*o);
+void gc_align_mark211(fsoc*c,gc211*p);
+extern fsoc H211;
+T211*new211(void);
+void gc_sweep208(fsoc*c);
+void gc_mark208(T208*o);
+void gc_align_mark208(fsoc*c,gc208*p);
+extern fsoc H208;
+T208*new208(void);
+void gc_sweep146(fsoc*c);
+void gc_mark146(T146*o);
+void gc_align_mark146(fsoc*c,gc146*p);
+extern fsoc H146;
+T146*new146(void);
+void gc_sweep207(fsoc*c);
+void gc_mark207(T207*o);
+void gc_align_mark207(fsoc*c,gc207*p);
+extern fsoc H207;
+T207*new207(void);
+void gc_sweep206(fsoc*c);
+void gc_mark206(T206*o);
+void gc_align_mark206(fsoc*c,gc206*p);
+extern fsoc H206;
+T206*new206(void);
+void gc_sweep148(fsoc*c);
+void gc_mark148(T148*o);
+void gc_align_mark148(fsoc*c,gc148*p);
+extern fsoc H148;
+T148*new148(void);
+void gc_sweep131(fsoc*c);
+void gc_mark131(T131*o);
+void gc_align_mark131(fsoc*c,gc131*p);
+extern fsoc H131;
+T131*new131(void);
+void gc_sweep130(fsoc*c);
+void gc_mark130(T130*o);
+void gc_align_mark130(fsoc*c,gc130*p);
+extern fsoc H130;
+T130*new130(void);
+void gc_sweep128(fsoc*c);
+void gc_mark128(T128*o);
+void gc_align_mark128(fsoc*c,gc128*p);
+extern fsoc H128;
+T128*new128(void);
+void gc_sweep72(fsoc*c);
+void gc_mark72(T72*o);
+void gc_align_mark72(fsoc*c,gc72*p);
+extern fsoc H72;
+T72*new72(void);
+void gc_sweep53(fsoc*c);
+void gc_mark53(T53*o);
+void gc_align_mark53(fsoc*c,gc53*p);
+extern fsoc H53;
+T53*new53(void);
+void gc_sweep46(fsoc*c);
+void gc_mark46(T46*o);
+void gc_align_mark46(fsoc*c,gc46*p);
+extern fsoc H46;
+T46*new46(void);
+void gc_sweep175(fsoc*c);
+void gc_mark175(T175*o);
+void gc_align_mark175(fsoc*c,gc175*p);
+extern fsoc H175;
+T175*new175(void);
+void gc_sweep205(fsoc*c);
+void gc_mark205(T205*o);
+void gc_align_mark205(fsoc*c,gc205*p);
+extern fsoc H205;
+T205*new205(void);
+void gc_sweep204(fsoc*c);
+void gc_mark204(T204*o);
+void gc_align_mark204(fsoc*c,gc204*p);
+extern fsoc H204;
+T204*new204(void);
+void gc_sweep67(fsoc*c);
+void gc_mark67(T67*o);
+void gc_align_mark67(fsoc*c,gc67*p);
+extern fsoc H67;
+T67*new67(void);
+void gc_sweep43(fsoc*c);
+void gc_mark43(T43*o);
+void gc_align_mark43(fsoc*c,gc43*p);
+extern fsoc H43;
+T43*new43(void);
+void gc_sweep69(fsoc*c);
+void gc_mark69(T69*o);
+void gc_align_mark69(fsoc*c,gc69*p);
+extern fsoc H69;
+T69*new69(void);
+void gc_mark9(T9 o);
+T9 new9(unsigned int size);
+void gc_sweep7(fsoc*c);
+void gc_mark7(T7*o);
+void gc_align_mark7(fsoc*c,gc7*p);
+extern fsoc H7;
+T7*new7(void);
+void gc_sweep70(fsoc*c);
+void gc_mark70(T70*o);
+void gc_align_mark70(fsoc*c,gc70*p);
+extern fsoc H70;
+T70*new70(void);
+void gc_sweep64(fsoc*c);
+void gc_mark64(T64*o);
+void gc_align_mark64(fsoc*c,gc64*p);
+extern fsoc H64;
+T64*new64(void);
+void gc_sweep25(fsoc*c);
+void gc_mark25(T25*o);
+void gc_align_mark25(fsoc*c,gc25*p);
+extern fsoc H25;
+T25*new25(void);
+void Xgc_mark242(T0*o);
+void Xgc_mark49(T0*o);
+void Xgc_mark71(T0*o);
+extern T25*eiffel_root_object;
+extern int se_argc;
+extern char**se_argv;
+#define SE_MAXID 294
+extern T7*g[];
+extern T7*t[];
+extern int se_strucT[];
+void se_atexit(void);
+void initialize_eiffel_runtime(int argc,char*argv[]);
+int main(int argc,char*argv[]);
+void X71prepare(T0*C,T0* a1);
+T2 X71priority(T0*C);
+T6 X71done(T0*C);
+T6 X71is_ready(T0*C,T0* a1);
+void X71continue(T0*C);
+void X109expect(T0*C,T0* a1);
+T6 X109occurred(T0*C,T0* a1);
+T2 X49descriptor(T0*C);
+T2 X49filtered_descriptor(T0*C);
+
+#ifdef __cplusplus
+}
+#endif