Branch: Tag:

2012-01-12

2012-01-12 14:49:06 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Compiler: The compiler and runtime are now INT_TYPE-clean wrt line numbers.

885:    {    char *file = NULL, *f;    struct pike_string *filep; -  INT32 linep; +  INT_TYPE linep;       filep = get_line(Pike_fp->pc,Pike_fp->context->prog,&linep);    if (filep && !filep->size_shift) {
1026:    if (p)    {    struct pike_string *file; -  INT32 line; +  INT_TYPE line;      #ifdef _REENTRANT    if(thread != backlog[e].thread_state)
1738:   {    struct pike_string *filep = NULL;    char *file, *s; -  INT32 linep,e; +  INT_TYPE linep; +  INT32 e;    ptrdiff_t len = 0;       my_strcat("(");
1825:   {    struct pike_string *filep = NULL;    char *file, *s; -  INT32 linep; +  INT_TYPE linep;       if (got_retval) {    my_strcat ("returns: ");
3052:    if (f->refs) {    int args, i;    char *file = NULL; -  INT32 line; +  INT_TYPE line;       if (f->context) {    if (f->pc)
3061:    file = low_get_program_line_plain (f->context->prog, &line, 0);    }    if (file) -  fprintf (stderr, "%s:%d: ", file, line); +  fprintf (stderr, "%s:%ld: ", file, (long)line);    else    fputs ("unknown program: ", stderr);   
3173:    struct program *p = arg->u.object->prog;    if (p && p->num_linenumbers) {    file = low_get_program_line_plain (p, &line, 0); -  fprintf (stderr, "object(%s:%d)", file, line); +  fprintf (stderr, "object(%s:%ld)", file, (long)line);    }    else    fputs ("object", stderr);
3184:    struct program *p = arg->u.program;    if (p->num_linenumbers) {    file = low_get_program_line_plain (p, &line, 0); -  fprintf (stderr, "program(%s:%d)", file, line); +  fprintf (stderr, "program(%s:%ld)", file, (long)line);    }    else    fputs ("program", stderr);
3233: Inside #if defined(PIKE_THREADS)
   struct thread_state *ts = 0;    while ((i = gdb_next_thread_state (i, &ts)), ts) {    fprintf (stderr, "\nTHREAD_ID %p (swapped %s):\n", -  (void *)ts->id, ts->swapped ? "out" : "in"); +  (void *)(ptrdiff_t)ts->id, ts->swapped ? "out" : "in");    gdb_backtrace (ts->id);    }   #else