diff --git a/src/modules/Image/encodings/bmp.c b/src/modules/Image/encodings/bmp.c
index f3de86da973d40c0c49926a144b29032e0590ac2..c9c4b8cee6f5fe0d6dd8c3c39763044de59e469a 100644
--- a/src/modules/Image/encodings/bmp.c
+++ b/src/modules/Image/encodings/bmp.c
@@ -1,9 +1,9 @@
-/* $Id: bmp.c,v 1.16 1999/07/11 15:46:19 marcus Exp $ */
+/* $Id: bmp.c,v 1.17 1999/07/25 22:15:27 grubba Exp $ */
 
 /*
 **! module Image
 **! note
-**!	$Id: bmp.c,v 1.16 1999/07/11 15:46:19 marcus Exp $
+**!	$Id: bmp.c,v 1.17 1999/07/25 22:15:27 grubba Exp $
 **! submodule BMP
 **!
 **!	This submodule keeps the BMP (Windows Bitmap)
@@ -22,7 +22,7 @@
 #include <ctype.h>
 
 #include "stralloc.h"
-RCSID("$Id: bmp.c,v 1.16 1999/07/11 15:46:19 marcus Exp $");
+RCSID("$Id: bmp.c,v 1.17 1999/07/25 22:15:27 grubba Exp $");
 #include "pike_macros.h"
 #include "object.h"
 #include "constants.h"
@@ -163,14 +163,14 @@ void img_bmp_encode(INT32 args)
 	 struct svalue *v;
 	 struct pike_string *qs;
 
-	 MAKE_CONSTANT_SHARED_STRING(qs,"rle");
+	 MAKE_CONSTANT_SHARED_STRING(qs,"rle");	/* LEAK */
 	 if (parameter_int(sp+1-args,qs,&rle))
 	    rle=!!rle;
 
-	 MAKE_CONSTANT_SHARED_STRING(qs,"bpp");
+	 MAKE_CONSTANT_SHARED_STRING(qs,"bpp");	/* LEAK */
 	 parameter_int(sp+1-args,qs,&bpp);
 
-	 MAKE_CONSTANT_SHARED_STRING(qs,"colortable");
+	 MAKE_CONSTANT_SHARED_STRING(qs,"colortable");	/* LEAK */
 	 if (parameter(sp+1-args,qs,&v))
 	 {
 	    if (v->type!=T_OBJECT  ||
@@ -220,6 +220,8 @@ void img_bmp_encode(INT32 args)
 	 bad_arg_error("Image.BMP.encode",sp-args,args,2,"mapping",sp+2-1-args,"illegal bits per pixel: %d (1, 4, 8 and 24 are valid)\n",bpp);
    }
 
+   /* FIXME: According to DMALLOC, oc leaks 1 ref in the testsuite */
+
    if (oc) oc->refs++;
    o->refs++;
    pop_n_elems(args);