|
@@ -89,7 +89,7 @@ extern "C" {
|
|
|
#ifndef GRAVITY_MAP_DOTSUGAR
|
|
#ifndef GRAVITY_MAP_DOTSUGAR
|
|
|
#define GRAVITY_MAP_DOTSUGAR 1 // if 1 then map objects can be accessed with both map[key] and map.key
|
|
#define GRAVITY_MAP_DOTSUGAR 1 // if 1 then map objects can be accessed with both map[key] and map.key
|
|
|
#endif
|
|
#endif
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
#ifdef _MSC_VER
|
|
#ifdef _MSC_VER
|
|
|
#undef GRAVITY_COMPUTED_GOTO
|
|
#undef GRAVITY_COMPUTED_GOTO
|
|
|
#define GRAVITY_COMPUTED_GOTO 0 // MSVC does not support it
|
|
#define GRAVITY_COMPUTED_GOTO 0 // MSVC does not support it
|
|
@@ -128,7 +128,7 @@ extern "C" {
|
|
|
#define MAX_ALLOCATION 4194304 // 1024 * 1024 * 4 (about 4 millions entry)
|
|
#define MAX_ALLOCATION 4194304 // 1024 * 1024 * 4 (about 4 millions entry)
|
|
|
#define MAX_CCALLS 100 // default maximum number of nested C calls
|
|
#define MAX_CCALLS 100 // default maximum number of nested C calls
|
|
|
#define MAX_MEMORY_BLOCK 157286400 // 150MB
|
|
#define MAX_MEMORY_BLOCK 157286400 // 150MB
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
#define DEFAULT_CONTEXT_SIZE 256 // default VM context entries (can grow)
|
|
#define DEFAULT_CONTEXT_SIZE 256 // default VM context entries (can grow)
|
|
|
#define DEFAULT_MINSTRING_SIZE 32 // minimum string allocation size
|
|
#define DEFAULT_MINSTRING_SIZE 32 // minimum string allocation size
|
|
|
#define DEFAULT_MINSTACK_SIZE 256 // sizeof(gravity_value_t) * 256 = 16 * 256 => 4 KB
|
|
#define DEFAULT_MINSTACK_SIZE 256 // sizeof(gravity_value_t) * 256 = 16 * 256 => 4 KB
|
|
@@ -136,7 +136,7 @@ extern "C" {
|
|
|
#define DEFAULT_CG_THRESHOLD 5*1024*1024 // 5MB
|
|
#define DEFAULT_CG_THRESHOLD 5*1024*1024 // 5MB
|
|
|
#define DEFAULT_CG_MINTHRESHOLD 1024*1024 // 1MB
|
|
#define DEFAULT_CG_MINTHRESHOLD 1024*1024 // 1MB
|
|
|
#define DEFAULT_CG_RATIO 0.5 // 50%
|
|
#define DEFAULT_CG_RATIO 0.5 // 50%
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
#define MAXNUM(a,b) ((a) > (b) ? a : b)
|
|
#define MAXNUM(a,b) ((a) > (b) ? a : b)
|
|
|
#define MINNUM(a,b) ((a) < (b) ? a : b)
|
|
#define MINNUM(a,b) ((a) < (b) ? a : b)
|
|
|
#define EPSILON 0.000001
|
|
#define EPSILON 0.000001
|
|
@@ -214,12 +214,12 @@ typedef marray_t(gravity_value_t) gravity_value_r; // array of values
|
|
|
#define GRAVITY_HASH_DEFINED
|
|
#define GRAVITY_HASH_DEFINED
|
|
|
typedef struct gravity_hash_t gravity_hash_t; // forward declaration
|
|
typedef struct gravity_hash_t gravity_hash_t; // forward declaration
|
|
|
#endif
|
|
#endif
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
#ifndef GRAVITY_VM_DEFINED
|
|
#ifndef GRAVITY_VM_DEFINED
|
|
|
#define GRAVITY_VM_DEFINED
|
|
#define GRAVITY_VM_DEFINED
|
|
|
typedef struct gravity_vm gravity_vm; // vm is an opaque data type
|
|
typedef struct gravity_vm gravity_vm; // vm is an opaque data type
|
|
|
#endif
|
|
#endif
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
typedef bool (*gravity_c_internal)(gravity_vm *vm, gravity_value_t *args, uint16_t nargs, uint32_t rindex);
|
|
typedef bool (*gravity_c_internal)(gravity_vm *vm, gravity_value_t *args, uint16_t nargs, uint32_t rindex);
|
|
|
|
|
|
|
|
typedef enum {
|
|
typedef enum {
|
Filippo Costa