X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=chiark-tcl.git;a=blobdiff_plain;f=hbytes%2Fhbytes.c;h=b941937044c6d559c11b3a46d42e971f6975d516;hp=41fc12a943de4f78359c7bf68ec1b92fbeb78a57;hb=9b2c18cc9d122b45f9e737864921d32baa599f0c;hpb=aa983421528c717a29c402c0cb4c8438b96fd860

diff --git a/hbytes/hbytes.c b/hbytes/hbytes.c
index 41fc12a..b941937 100644
--- a/hbytes/hbytes.c
+++ b/hbytes/hbytes.c
@@ -52,7 +52,7 @@ void hbytes_array(HBytes_Value *returns, const Byte *array, int l) {
 
 /* destructor */
 
-void hbytes_free(HBytes_Value *frees) {
+void hbytes_free(const HBytes_Value *frees) {
   if (HBYTES_ISCOMPLEX(frees)) {
     HBytes_ComplexValue *cx= COMPLEX(frees);
     TFREE(cx->dstart - cx->prespace);
@@ -121,7 +121,8 @@ Byte *hbytes_append(HBytes_Value *hb, int el) {
   return newpart;
 }
 
-HBytes_ComplexValue *prechop(HBytes_Value *hb, int cl, const Byte **rv) {
+static HBytes_ComplexValue*
+prechop(HBytes_Value *hb, int cl, const Byte **rv) {
   HBytes_ComplexValue *cx;
 
   if (cl<0) { *rv=0; return 0; }