hlfw.ca

Info  •  Files  •  Log  •  Branches

Port alloc some more

--- a/libdraw/alloc.c

+++ b/libdraw/alloc.c

@@ -9,8 +9,6 @@

 	Image *i;

 	i = _allocimage(nil, d, r, chan, repl, col, 0, 0);

-	if(i != nil)

-		setmalloctag(i, getcallerpc(&d));

 	return i;

 }

@@ -125,7 +123,8 @@

 	if(flushimage(d, 0) < 0)

 		goto Error;

-	if(pread(d->ctlfd, buf, sizeof buf, 0) < 12*12)

+	seek(d->ctlfd, 0);

+	if(read(d->ctlfd, buf, sizeof buf) < 12*12)

 		goto Error;

 	buf[12*12] = '\0';