=> Bootstrap dependency digest>=20010302: found digest-20160304 ===> Building for clisp-gdbm-2.49nb3 /usr/pkg/bin/clisp -norc -q -c ./gdbm.lisp -o ./ ;; Compiling file /var/pkgsrc/work/databases/clisp-gdbm/work/clisp-2.49/modules/gdbm/gdbm.lisp ... ;; Wrote file /var/pkgsrc/work/databases/clisp-gdbm/work/clisp-2.49/modules/gdbm/gdbm.fas 0 errors, 0 warnings /usr/pkg/bin/clisp -norc -q -C /usr/pkg/lib/clisp/linkkit/modprep ./gdbm.c ./ ;; MODPREP: "./gdbm.c" --> #P"gdbm.m.c" ;; MODPREP: reading "./gdbm.c": 17,192 bytes, 405 lines ;; MODPREP: 69 objects, 15 DEFUNs, 1 DEFVAR (1 init) ;; packages: ("GDBM") MODPREP: wrote gdbm.m.c (49,857 bytes) clang -I/usr/pkg/include -I/usr/include -I/usr/pkg/include -I/usr/include -O2 -I/usr/pkg/include -I/usr/include -I/usr/pkg/include/glib/glib-2.0 -I/usr/pkg/include/glib/gio-unix-2.0 -I/usr/pkg/lib/glib-2.0/include -W -Wswitch -Wcomment -Wpointer-arith -Wimplicit -Wreturn-type -Wmissing-declarations -O -DNO_SINGLEMAP -DNO_TRIVIALMAP -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -fPIC -I/usr/pkg/lib/clisp/linkkit -c gdbm.m.c -o gdbm.o ./gdbm.c:131:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] with_string_0(path, GLO(pathname_encoding), name, { ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:59: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4099: note: expanded from macro 'with_string_0_help_' ./gdbm.c:133:32: warning: incompatible function pointer types passing 'void (*)(void)' to parameter of type 'void (*)(const char *)' [-Wincompatible-function-pointer-types] (void (*)(void))error_gdbm)); ^~~~~~~~~~~~~~~~~~~~~~~~~~ ./gdbm.c:127:58: note: expanded from macro 'SYSCALL' #define SYSCALL(statement) begin_blocking_system_call(); statement; end_blocking_system_call() ^~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:104: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4325: note: expanded from macro 'with_string_0_help_' /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/include/gdbm.h:115:15: note: passing argument to parameter here void (*)(const char *)); ^ ./gdbm.c:282:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] with_datum(STACK_2, key, ^~~~~~~~~~~~~~~~~~~~~~~~ ./gdbm.c:273:224: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:59: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4099: note: expanded from macro 'with_string_0_help_' ./gdbm.c:283:14: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] with_datum(STACK_1, content, ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ ./gdbm.c:273:224: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:59: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4099: note: expanded from macro 'with_string_0_help_' note: (skipping 1 expansions in backtrace; use -fmacro-backtrace-limit=0 to see all) ./gdbm.c:127:58: note: expanded from macro 'SYSCALL' #define SYSCALL(statement) begin_blocking_system_call(); statement; end_blocking_system_call() ^~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:104: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4325: note: expanded from macro 'with_string_0_help_' ./gdbm.c:283:14: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] with_datum(STACK_1, content, ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ ./gdbm.c:273:224: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:59: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4099: note: expanded from macro 'with_string_0_help_' ./gdbm.c:273:816: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~ ./gdbm.c:127:58: note: expanded from macro 'SYSCALL' #define SYSCALL(statement) begin_blocking_system_call(); statement; end_blocking_system_call() ^~~~~~~~~ ./gdbm.c:283:14: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] with_datum(STACK_1, content, ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ ./gdbm.c:273:224: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:59: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4099: note: expanded from macro 'with_string_0_help_' ./gdbm.c:273:1181: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~ ./gdbm.c:127:58: note: expanded from macro 'SYSCALL' #define SYSCALL(statement) begin_blocking_system_call(); statement; end_blocking_system_call() ^~~~~~~~~ ./gdbm.c:283:14: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] with_datum(STACK_1, content, ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ ./gdbm.c:273:224: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:59: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4099: note: expanded from macro 'with_string_0_help_' ./gdbm.c:273:1766: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~ ./gdbm.c:127:58: note: expanded from macro 'SYSCALL' #define SYSCALL(statement) begin_blocking_system_call(); statement; end_blocking_system_call() ^~~~~~~~~ ./gdbm.c:283:14: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] with_datum(STACK_1, content, ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ ./gdbm.c:273:224: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:59: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4099: note: expanded from macro 'with_string_0_help_' ./gdbm.c:273:2204: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~ ./gdbm.c:127:58: note: expanded from macro 'SYSCALL' #define SYSCALL(statement) begin_blocking_system_call(); statement; end_blocking_system_call() ^~~~~~~~~ ./gdbm.c:283:14: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] with_datum(STACK_1, content, ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ ./gdbm.c:273:224: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:59: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4099: note: expanded from macro 'with_string_0_help_' ./gdbm.c:273:2642: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~ ./gdbm.c:127:58: note: expanded from macro 'SYSCALL' #define SYSCALL(statement) begin_blocking_system_call(); statement; end_blocking_system_call() ^~~~~~~~~ ./gdbm.c:358:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] with_datum(STACK_0, key, res = gdbm_fetch(dbf,key)); ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ./gdbm.c:273:224: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:59: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4099: note: expanded from macro 'with_string_0_help_' ./gdbm.c:369:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] with_datum(STACK_0, key, status = gdbm_delete(dbf,key)); ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ./gdbm.c:273:224: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:59: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4099: note: expanded from macro 'with_string_0_help_' ./gdbm.c:392:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] with_datum(STACK_1, key, res = gdbm_nextkey(dbf,key)); ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ./gdbm.c:273:224: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:59: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4099: note: expanded from macro 'with_string_0_help_' ./gdbm.c:427:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] with_datum(STACK_0, key, status = gdbm_exists(dbf, key)); ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ./gdbm.c:273:224: note: expanded from macro 'with_datum' #define with_datum(lisp_obj, datum_var, statement) do { datum datum_var; if (stringp(lisp_obj)) { with_string_0(lisp_obj, GLO(misc_encoding), datum_var##string, { datum_var.dptr = datum_var##string; datum_var.dsize = datum_var##string_len; SYSCALL(statement); }); } else if (bit_vector_p(Atype_32Bit,lisp_obj)) { datum_var.dsize = 4 * vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (vectorp(lisp_obj)) { /* assume Atype_8Bit */ lisp_obj = coerce_bitvector(lisp_obj); datum_var.dsize = vector_length(lisp_obj); datum_var.dptr = (char*)TheSbvector(lisp_obj)->data; SYSCALL(statement); } else if (integerp(lisp_obj)) { unsigned long datum_var##bitsize = 1 + I_integer_length(lisp_obj); /* an extra bit for the sign */ datum_var.dsize = ceiling(datum_var##bitsize,8); datum_var.dptr = (char*)alloca(datum_var.dsize); if (I_to_LEbytes(lisp_obj,8*datum_var.dsize,(uintB*)datum_var.dptr)) NOTREACHED; /* there must not be an overflow! */ SYSCALL(statement); } else if (single_float_p(lisp_obj)) { ffloatjanus datum_var##ffloat; FF_to_c_float(lisp_obj, &datum_var##ffloat); datum_var.dptr = (char*)&datum_var##ffloat; datum_var.dsize = sizeof(ffloat); SYSCALL(statement); } else if (double_float_p(lisp_obj)) { dfloatjanus datum_var##dfloat; DF_to_c_double(lisp_obj, &datum_var##dfloat); datum_var.dptr = (char*)&datum_var##dfloat; datum_var.dsize = sizeof(dfloat); SYSCALL(statement); } else error_bad_type(lisp_obj); } while(0) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4116:59: note: expanded from macro 'with_string_0' #define with_string_0(string,encoding,ascizvar,statement) with_string_0_help_(string,encoding,ascizvar,statement,ascizvar##_len,ascizvar##_offset,ascizvar##_string,ascizvar##_bytelen,ascizvar##_data,ASSERT,NOTREACHED) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4114:4099: note: expanded from macro 'with_string_0_help_' ./gdbm.c:472:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_close,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:472:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_close,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:472:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_close,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:474:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_default_key_type,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:474:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_default_key_type,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:474:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_default_key_type,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:475:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_default_value_type,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:475:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_default_value_type,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:475:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_default_value_type,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:477:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_delete,seclass_default,2,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:477:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_delete,seclass_default,2,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:477:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_delete,seclass_default,2,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:480:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_exists,seclass_default,2,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:480:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_exists,seclass_default,2,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:480:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_exists,seclass_default,2,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:483:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_fetch,seclass_default,2,0,norest,key,1,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:483:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_fetch,seclass_default,2,0,norest,key,1,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:483:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_fetch,seclass_default,2,0,norest,key,1,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:486:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_file_size,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:486:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_file_size,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:486:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_file_size,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:489:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_firstkey,seclass_default,1,0,norest,key,1,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:489:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_firstkey,seclass_default,1,0,norest,key,1,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:489:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_firstkey,seclass_default,1,0,norest,key,1,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:492:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_nextkey,seclass_default,2,0,norest,key,1,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:492:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_nextkey,seclass_default,2,0,norest,key,1,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:492:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_nextkey,seclass_default,2,0,norest,key,1,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:495:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_open,seclass_default,1,0,norest,key,6,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:495:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_open,seclass_default,1,0,norest,key,6,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:495:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_open,seclass_default,1,0,norest,key,6,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:498:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_reorganize,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:498:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_reorganize,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:498:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_reorganize,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:500:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_setopt,seclass_default,3,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:500:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_setopt,seclass_default,3,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:500:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_setopt,seclass_default,3,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:502:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_store,seclass_default,3,0,norest,key,1,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:502:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_store,seclass_default,3,0,norest,key,1,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:502:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_store,seclass_default,3,0,norest,key,1,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:505:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_sync,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:505:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_sync,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:505:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_sync,seclass_default,1,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:507:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_version,seclass_default,0,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:92: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:507:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_version,seclass_default,0,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:127: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:507:3: warning: arithmetic on a null pointer treated as a cast from integer to pointer is a GNU extension [-Wnull-pointer-arithmetic] LISPFUN_F(subr_gdbm_gdbm_version,seclass_default,0,0,norest,nokey,0,NIL) ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:4375:140: note: expanded from macro 'LISPFUN_F' #define LISPFUN_F(name,sec,req_count,opt_count,rest_flag,key_flag,key_count,keywords) { { gcv_nullobj }, 9UL,0UL,2UL,0x18UL, gcv_nullobj, gcv_nullobj, (lisp_function_t)(&C_##name), 0, req_count, opt_count, (uintB)subr_##rest_flag, (uintB)subr_##key_flag, key_count, sec, 0}, ^~~~~~~~~~~ /var/pkgsrc/work/databases/clisp-gdbm/work/.buildlink/lib/clisp/linkkit/clisp.h:680:51: note: expanded from macro 'gcv_nullobj' #define gcv_nullobj (gcv_object_t)(((UBYTE*)((0))+((oint)(tint)((0))<<48))) ~~~~~~~~~~~~~^ ./gdbm.c:593:47: warning: unused parameter 'module' [-Wunused-parameter] void module__gdbm__init_function_1 (module_t* module) ^ ./gdbm.c:624:47: warning: unused parameter 'module' [-Wunused-parameter] void module__gdbm__init_function_2 (module_t* module) ^ ./gdbm.c:629:45: warning: unused parameter 'module' [-Wunused-parameter] void module__gdbm__fini_function (module_t* module) ^ 61 warnings generated.