#define is_arrayobject(op) ((op)->ob_type == &Arraytype)
/* Forward */
-extern object *newarrayobject PROTO((int, struct arraydescr *));
-extern int getarraysize PROTO((object *));
-extern object *getarrayitem PROTO((object *, int));
+static object *newarrayobject PROTO((int, struct arraydescr *));
+static int getarraysize PROTO((object *));
+static object *getarrayitem PROTO((object *, int));
static int setarrayitem PROTO((object *, int, object *));
-extern int insarrayitem PROTO((object *, int, object *));
-extern int addarrayitem PROTO((object *, object *));
+static int insarrayitem PROTO((object *, int, object *));
+static int addarrayitem PROTO((object *, object *));
static object *
c_getitem(ap, i)
#define MAXLIN 32767
#define LINCLIP(x) do { if ( x < MINLIN ) x = MINLIN ; else if ( x > MAXLIN ) x = MAXLIN; } while ( 0 )
-unsigned char st_linear_to_ulaw( /* int sample */ );
+static unsigned char st_linear_to_ulaw( /* int sample */ );
/*
** This macro converts from ulaw to 16 bit linear, faster.
#define BIAS 0x84 /* define the add-in bias for 16 bit samples */
#define CLIP 32635
-unsigned char
+static unsigned char
st_linear_to_ulaw( sample )
int sample;
{
return newintobject(val);
}
-double _sum2(a, b, len)
+static double _sum2(a, b, len)
short *a;
short *b;
int len;