pike.git / src / opcodes.c

version» Context lines:

pike.git/src/opcodes.c:19:   #include "pike_types.h"   #include "pike_memory.h"   #include "fd_control.h"   #include "cyclic.h"   #include "builtin_functions.h"   #include "module_support.h"   #include "security.h"   #include "bignum.h"   #include "operators.h"    - RCSID("$Id: opcodes.c,v 1.78 2000/07/28 17:16:55 hubbe Exp $"); + RCSID("$Id: opcodes.c,v 1.79 2000/08/07 09:44:49 grubba Exp $");      void index_no_free(struct svalue *to,struct svalue *what,struct svalue *ind)   {    INT32 i;      #ifdef PIKE_SECURITY    if(what->type <= MAX_COMPLEX)    if(!CHECK_DATA_SECURITY(what->u.array, SECURITY_BIT_INDEX))    error("Index permission denied.\n");   #endif
pike.git/src/opcodes.c:970:    x[6] = (INPUT)[6]; \    x[7] = (INPUT)[7]; \    (SVAL).u.float_number = low_parse_IEEE_float(x, 8); \    } while(0)   #endif   #endif      #define MK_VERY_LOW_SSCANF(INPUT_SHIFT, MATCH_SHIFT) \   static INT32 PIKE_CONCAT4(very_low_sscanf_,INPUT_SHIFT,_,MATCH_SHIFT)( \    PIKE_CONCAT(p_wchar, INPUT_SHIFT) *input, \ -  long input_len, \ +  ptrdiff_t input_len, \    PIKE_CONCAT(p_wchar, MATCH_SHIFT) *match, \ -  long match_len, \ -  long *chars_matched, \ +  ptrdiff_t match_len, \ +  ptrdiff_t *chars_matched, \    int *success) \   { \    struct svalue sval; \ -  int e,cnt,matches,eye,arg; \ +  int matches, arg; \ +  ptrdiff_t cnt, eye, e; \    int no_assign = 0, field_length = 0, minus_flag = 0; \    struct sscanf_set set; \    struct svalue *argp; \    \    \ -  set.a=0; \ -  success[0]=0; \ +  set.a = 0; \ +  success[0] = 0; \    \ -  arg=eye=matches=0; \ +  eye = arg = matches = 0; \    \    for(cnt = 0; cnt < match_len; cnt++) \    { \    for(;cnt<match_len;cnt++) \    { \    if(match[cnt]=='%') \    { \    if(match[cnt+1]=='%') \    { \    cnt++; \
pike.git/src/opcodes.c:1319:    sval.u.string=PIKE_CONCAT(make_shared_binary_string, \    INPUT_SHIFT)(input+eye, \    input_len-eye); \    eye=input_len; \    break; \    }else{ \    PIKE_CONCAT(p_wchar, MATCH_SHIFT) *end_str_start; \    PIKE_CONCAT(p_wchar, MATCH_SHIFT) *end_str_end; \    PIKE_CONCAT(p_wchar, MATCH_SHIFT) *s=0; \    PIKE_CONCAT(p_wchar, MATCH_SHIFT) *p=0; \ -  int start,contains_percent_percent, new_eye; \ +  int contains_percent_percent; \ +  ptrdiff_t start, new_eye; \    \    start=eye; \    end_str_start=match+cnt+1; \    \    s=match+cnt+1; \    test_again: \    if(*s=='%') \    { \    s++; \    if(*s=='*') s++; \