tags 625319 + pending thanks Dear maintainer,
I've prepared an NMU for chiark-tcl (versioned as 1.1.0+nmu3) and uploaded it to DELAYED/2. Please feel free to tell me if I should delay it longer. Regards. -- .''`. Homepage: http://info.comodo.priv.at/ - OpenPGP key ID: 0x8649AA06 : :' : Debian GNU/Linux user, admin, & developer - http://www.debian.org/ `. `' Member of VIBE!AT & SPI, fellow of Free Software Foundation Europe `- NP: Omara Portuondo: Ausencia
diff -Nru chiark-tcl-1.1.0+nmu2/base/hook.c chiark-tcl-1.1.0+nmu3/base/hook.c
--- chiark-tcl-1.1.0+nmu2/base/hook.c 2009-07-19 18:26:13.000000000 +0200
+++ chiark-tcl-1.1.0+nmu3/base/hook.c 2011-12-13 17:06:56.000000000 +0100
@@ -86,7 +86,7 @@
int cht_get_urandom(Tcl_Interp *ip, Byte *buffer, int l) {
static FILE *urandom;
- int r, esave;
+ int r;
if (!urandom) {
urandom= fopen(URANDOM,"rb");
@@ -95,7 +95,6 @@
r= fread(buffer,1,l,urandom);
if (r==l) return 0;
- esave= errno;
fclose(urandom); urandom=0;
if (ferror(urandom)) {
diff -Nru chiark-tcl-1.1.0+nmu2/base/idtable.c chiark-tcl-1.1.0+nmu3/base/idtable.c
--- chiark-tcl-1.1.0+nmu2/base/idtable.c 2006-10-20 13:35:04.000000000 +0200
+++ chiark-tcl-1.1.0+nmu3/base/idtable.c 2011-12-13 17:06:56.000000000 +0100
@@ -79,14 +79,12 @@
int l;
unsigned long ul;
IdDataValue *dv;
- IdDataAssocData *assoc;
char *ep, *str;
if (o->typePtr != &cht_tabledataid_nearlytype) goto convert;
dv= o->internalRep.otherValuePtr;
if (dv->interp != ip) goto convert;
- assoc= dv->assoc;
if (dv->assoc->idds != idds) goto convert;
return TCL_OK;
diff -Nru chiark-tcl-1.1.0+nmu2/debian/changelog chiark-tcl-1.1.0+nmu3/debian/changelog
--- chiark-tcl-1.1.0+nmu2/debian/changelog 2009-11-22 18:29:24.000000000 +0100
+++ chiark-tcl-1.1.0+nmu3/debian/changelog 2011-12-13 17:07:30.000000000 +0100
@@ -1,3 +1,12 @@
+chiark-tcl (1.1.0+nmu3) unstable; urgency=low
+
+ * Non-maintainer upload.
+ * Fix "ftbfs with gcc-4.6 -Werror": add patch from peter green (removes some
+ unuses variables).
+ Closes: #625319, LP: #831264
+
+ -- gregor herrmann <[email protected]> Tue, 13 Dec 2011 17:07:00 +0100
+
chiark-tcl (1.1.0+nmu2) unstable; urgency=low
* Non-maintainer upload.
diff -Nru chiark-tcl-1.1.0+nmu2/hbytes/hook.c chiark-tcl-1.1.0+nmu3/hbytes/hook.c
--- chiark-tcl-1.1.0+nmu2/hbytes/hook.c 2006-10-20 13:35:04.000000000 +0200
+++ chiark-tcl-1.1.0+nmu3/hbytes/hook.c 2011-12-13 17:06:56.000000000 +0100
@@ -98,8 +98,8 @@
}
static int hbytes_t_sfa(Tcl_Interp *ip, Tcl_Obj *o) {
- char *str, *ep, *os;
- Byte *startbytes, *bytes;
+ char *str, *ep;
+ Byte *bytes;
int l;
char cbuf[3];
@@ -111,13 +111,13 @@
} else {
- os= str= Tcl_GetStringFromObj(o,&l); assert(str);
+ str= Tcl_GetStringFromObj(o,&l); assert(str);
cht_objfreeir(o);
if (l & 1) return cht_staticerr(ip, "hbytes: conversion from hex:"
" odd length in hex", "HBYTES SYNTAX");
- startbytes= bytes= cht_hb_arrayspace(OBJ_HBYTES(o), l/2);
+ bytes= cht_hb_arrayspace(OBJ_HBYTES(o), l/2);
cbuf[2]= 0;
while (l>0) {
signature.asc
Description: Digital signature

