Branch: Tag:

2004-10-16

2004-10-16 07:27:30 by Marcus Agehall <agehall@gmail.com>

Done away with all warnings during compilation. Now compiles on GCC
3.4.2 without any warnings using the -Wall -Werror CFLAGS.
Some workarounds are not very nice, but they should do their job.

Rev: src/array.c:1.174
Rev: src/dynamic_load.c:1.85
Rev: src/encode.c:1.221
Rev: src/interpret.c:1.356
Rev: src/las.c:1.350
Rev: src/module.c:1.30
Rev: src/modules/Java/jvm.c:1.71
Rev: src/modules/_Charset/charsetmod.c:1.49
Rev: src/object.c:1.258
Rev: src/pike_search.c:1.24
Rev: src/post_modules/Nettle/cipher.cmod:1.34
Rev: src/post_modules/Nettle/hash.cmod:1.26
Rev: src/post_modules/Shuffler/a_source_pikestring.c:1.10
Rev: src/post_modules/Shuffler/a_source_system_memory.c:1.11
Rev: src/post_modules/Shuffler/c_source_stream.c:1.11
Rev: src/post_modules/Shuffler/d_source_pikestream.c:1.7
Rev: src/post_modules/Shuffler/e_source_block_pikestream.c:1.5
Rev: src/post_modules/Shuffler/shuffler.h:1.6
Rev: src/program.c:1.570
Rev: src/rusage.c:1.42

2:   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: encode.c,v 1.220 2004/10/15 15:24:51 grubba Exp $ + || $Id: encode.c,v 1.221 2004/10/16 07:27:29 agehall Exp $   */      #include "global.h"
2266:    SET_ONERROR(err, exit_bytecode, NULL);       switch(bytecode->size_shift) { - #define EMIT_BYTECODE(STR) do { \ -  for (e = 0; e < bytecode->len; e += 3) { \ -  if (STR(bytecode)[e] == F_FILENAME) { \ -  INT32 strno = STR(bytecode)[e+1]; \ -  if ((strno < 0) || (strno >= p->num_strings)) { \ -  Pike_error("Bad filename directive number:" \ -  " %d (expected 0 - %d).\n", \ -  strno, p->num_strings); \ -  } \ -  current_file = p->strings[strno]; \ -  } else if (STR(bytecode)[e] == F_LINE) { \ -  current_line = STR(bytecode)[e+1]; \ -  } else { \ -  insert_opcode2(STR(bytecode)[e], \ -  STR(bytecode)[e+1], \ -  STR(bytecode)[e+2], \ -  current_line, \ -  current_file); \ -  } \ -  } \ + #define EMIT_BYTECODE2(STR) \ +  if (STR(bytecode)[e] == F_FILENAME) { \ +  INT32 strno = STR(bytecode)[e+1]; \ +  if ((strno < 0) || (strno >= p->num_strings)) { \ +  Pike_error("Bad filename directive number:" \ +  " %d (expected 0 - %d).\n", \ +  strno, p->num_strings); \ +  } \ +  current_file = p->strings[strno]; \ +  } else if (STR(bytecode)[e] == F_LINE) { \ +  current_line = STR(bytecode)[e+1]; \ +  } else +  + #define EMIT_BYTECODE(STR, X) do { \ +  for (e = 0; e < bytecode->len; e += 3) { \ +  X(STR) \ +  { \ +  insert_opcode2(STR(bytecode)[e], \ +  STR(bytecode)[e+1], \ +  STR(bytecode)[e+2], \ +  current_line, \ +  current_file); \ +  } \ +  } \    } while(0)    case 2: -  EMIT_BYTECODE(STR2); +  EMIT_BYTECODE(STR2, EMIT_BYTECODE2);    break;    case 1: -  EMIT_BYTECODE(STR1); +  EMIT_BYTECODE(STR1, EMIT_BYTECODE2);    break;    case 0: -  EMIT_BYTECODE(STR0); + #undef EMIT_BYTECODE2 + #define EMIT_BYTECODE2(X) +  EMIT_BYTECODE(STR0, EMIT_BYTECODE2);    break;   #undef EMIT_BYTECODE -  + #undef EMIT_BYTECODE2    default:    Pike_fatal("Bad size_shift: %d\n", bytecode->size_shift);    }