***************
*** 48,54 ****
  	if(data && type_of(data)==t_cfdata)
  	  { data->cfd.cfd_start=start; 
  	    data->cfd.cfd_size=size;}
- 	  else if(size) FEerror(0,"Bad call to make_cfun");
  	return(cf);
  }
  object
--- 48,54 ----
  	if(data && type_of(data)==t_cfdata)
  	  { data->cfd.cfd_start=start; 
  	    data->cfd.cfd_size=size;}
+ 	  else if(size) FEerror("Bad call to make_cfun",0);
  	return(cf);
  }
  object
***************
*** 234,240 ****
  { if(data && type_of(data)==t_cfdata)
  	  { data->cfd.cfd_start=start; 
  	    data->cfd.cfd_size=size;}
- 	  else if(size) FEerror(0,"Bad call to make_cfun");
    return(MFnew(sym,self,data));
  }
  
--- 234,240 ----
  { if(data && type_of(data)==t_cfdata)
  	  { data->cfd.cfd_start=start; 
  	    data->cfd.cfd_size=size;}
+ 	  else if(size) FEerror("Bad call to make_cfun",0);
    return(MFnew(sym,self,data));
  }