mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-04 05:50:26 +02:00
Code Activity

Resync with new patch to make functions receive a const argument

Browse source
This commit is contained in:
pcpa 2014-11-01 22:32:23 -02:00
parent e98640e1ac
commit 85ab988cd1
6 changed files with 17 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

8
include/lightning.h
View file

@ -120,7 +120,6 @@ typedef jit_uint64_t jit_uword_t;
typedef float jit_float32_t;
typedef double jit_float64_t;
typedef void* jit_pointer_t;
typedef const void* jit_const_pointer_t;
typedef jit_int32_t jit_bool_t;
typedef jit_int32_t jit_gpr_t;
typedef jit_int32_t jit_fpr_t;
@ -175,7 +174,6 @@ typedef struct jit_node jit_node_t;
typedef struct jit_state jit_state_t;
typedef enum {
#define jit_data(u,v,w) _jit_data(_jit,u,v,w)
jit_code_data,
#define jit_live(u) jit_new_node_w(jit_code_live, u)
#define jit_align(u) jit_new_node_w(jit_code_align, u)
@ -846,7 +844,7 @@ typedef void (*jit_free_func_ptr) (void*);
/*
* Prototypes
*/
extern void init_jit(char*);
extern void init_jit(const char*);
extern void finish_jit(void);
extern jit_state_t *jit_new_state(void);
@ -857,9 +855,7 @@ extern void _jit_destroy_state(jit_state_t*);
#define jit_address(node) _jit_address(_jit, node)
extern jit_pointer_t _jit_address(jit_state_t*, jit_node_t*);
extern jit_node_t *_jit_data(jit_state_t*, jit_const_pointer_t,
jit_word_t, jit_int32_t);
extern jit_node_t *_jit_name(jit_state_t*, char*);
extern jit_node_t *_jit_name(jit_state_t*, const char*);
extern jit_node_t *_jit_note(jit_state_t*, const char*, int);
extern jit_node_t *_jit_label(jit_state_t*);
extern jit_node_t *_jit_forward(jit_state_t*);