small patch to metalbasemodule.c

lance@fox.com
Tue, 23 Aug 94 12:08:30 PDT

Here is a small patch file that someone sent me to fix a compilation
bug and also increase the range of searches in the metalbasemodule.c
file in the Extensions/metalbase directory.

Enjoy!

*** metalbasemodule.c~ Wed Feb 23 02:33:53 1994
--- metalbasemodule.c Tue Aug 23 12:01:15 1994
***************
*** 26,31 ****
--- 26,32 ----
#include "modsupport.h" /* For getargs() etc. */
#include "mbase.h"

+ extern char *sys_errlist[];

static object *metalbase_error;

***************
*** 771,779 ****

if ( !getargs(args,"(iO)", &act,&def_values) )
return NULL;
! if (act < FRST || act > EQUL) {
err_setstr(TypeError,
! "Action argument must be between FRST and EQUL");
return NULL;
}
if (is_listobject(def_values)) {
--- 772,780 ----

if ( !getargs(args,"(iO)", &act,&def_values) )
return NULL;
! if (act < FRST || act > PQUE) {
err_setstr(TypeError,
! "Action argument must be between FRST and PQUE");
return NULL;
}
if (is_listobject(def_values)) {

--
Lance Ellinghouse                lance@fox.com