kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

cast to long from char, short and int in ASM_PUSH_XXXX.

Browse source 
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@2452 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
ttate 2002-05-12 19:54:10 +00:00
parent be122d47be
commit 88cc3b3954
2 changed files with 6 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
ext/dl/dl.h
View file

@ -161,9 +161,9 @@
#elif defined(USE_DLSTACK) #elif defined(USE_DLSTACK)
# define ASM_START(sym) # define ASM_START(sym)
# define ASM_END(sym) # define ASM_END(sym)
# define ASM_PUSH_C(x) memcpy(sp,&x,1); sp++; # define ASM_PUSH_C(x) {long v=(long)x; memcpy(sp,&v,sizeof(long)); sp++;}
# define ASM_PUSH_H(x) memcpy(sp,&x,sizeof(short)); sp++; # define ASM_PUSH_H(x) {long v=(long)x; memcpy(sp,&v,sizeof(long)); sp++;}
# define ASM_PUSH_I(x) memcpy(sp,&x,sizeof(int)); sp++; # define ASM_PUSH_I(x) {long v=(long)x; memcpy(sp,&v,sizeof(long)); sp++;}
# define ASM_PUSH_L(x) memcpy(sp,&x,sizeof(long)); sp++; # define ASM_PUSH_L(x) memcpy(sp,&x,sizeof(long)); sp++;
# define ASM_PUSH_P(x) memcpy(sp,&x,sizeof(void*)); sp++; # define ASM_PUSH_P(x) memcpy(sp,&x,sizeof(void*)); sp++;
# define ASM_PUSH_F(x) memcpy(sp,&x,sizeof(float)); sp+=sizeof(float)/sizeof(long); # define ASM_PUSH_F(x) memcpy(sp,&x,sizeof(float)); sp+=sizeof(float)/sizeof(long);

7
ext/dl/sym.c
View file

@ -529,8 +529,10 @@ rb_dlsym_call(int argc, VALUE argv[], VALUE self)
stack[5],stack[6],stack[7],stack[8],stack[9],\ stack[5],stack[6],stack[7],stack[8],stack[9],\
stack[10],stack[11],stack[12],stack[13],stack[14] stack[10],stack[11],stack[12],stack[13],stack[14]
int stk_size; int stk_size;
long *stack, *sp; long stack[15];
long *sp;
sp = stack;
stk_size = stack_size(sym); stk_size = stack_size(sym);
if( stk_size < 0 ){ if( stk_size < 0 ){
FREE_ARGS; FREE_ARGS;
@ -539,10 +541,7 @@ rb_dlsym_call(int argc, VALUE argv[], VALUE self)
else if( stk_size > (int)(sizeof(long) * 15) ){ else if( stk_size > (int)(sizeof(long) * 15) ){
FREE_ARGS; FREE_ARGS;
rb_raise(rb_eArgError, "too many arguments."); rb_raise(rb_eArgError, "too many arguments.");
stk_size = sizeof(long) * 15;
} }
stack = (long*)alloca(stk_size);
sp = stack;
#elif defined(USE_INLINE_ASM) #elif defined(USE_INLINE_ASM)
#define DLSTACK_PROTO #define DLSTACK_PROTO
#define DLSTACK_ARGS #define DLSTACK_ARGS