X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?a=blobdiff_plain;f=hbytes%2Fulongs.c;h=16e30505c399a147fba44862c99cc5899980a6cc;hb=84cd08bffdd4bf1571432e312b132dbe0a57586c;hp=0f99db3eb1acfa043778a8b3d1b54c403086bbd9;hpb=82f88c53ddb84e42c770c23feb9bb0ee18341188;p=chiark-tcl.git diff --git a/hbytes/ulongs.c b/hbytes/ulongs.c index 0f99db3..16e3050 100644 --- a/hbytes/ulongs.c +++ b/hbytes/ulongs.c @@ -1,4 +1,19 @@ /* + * hbytes - hex-stringrep efficient byteblocks for Tcl + * Copyright 2006-2012 Ian Jackson + * + * This program is free software; you can redistribute it and/or + * modify it under the terms of the GNU General Public License as + * published by the Free Software Foundation; either version 2 of the + * License, or (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, but + * WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this library; if not, see . */ #include "chiark_tcl_hbytes.h" @@ -264,10 +279,7 @@ static void ulong_t_ustr(Tcl_Obj *o) { char buf[9]; val= *(const uint32_t*)&o->internalRep.longValue; - - assert(val <= 0xffffffffUL); snprintf(buf,sizeof(buf), "%08lx", (unsigned long)val); - cht_obj_updatestr_vstringls(o, buf, sizeof(buf)-1, (char*)0); }