text: /* Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
   */
  
  #include <stdio.h>
  #include <string.h>
  
  #define	import_spp
  #define	import_knames
  #include <iraf.h>
  
  extern	char os_process_name[];
  extern	PKCHAR osfn_bkgfile[];
  extern	int save_prtype;
  extern	int ipc_isatty;
  extern	int ipc_in, ipc_out;
  
  /* ZZSETK -- Internal kernel routine, used by the zmain to set the values
   * of certain internal kernel parameters.
   */
  int
  ZZSETK (
    char	*ospn,
    char	*osbfn,
    int	prtype,
    int	isatty,
    int	in, 
    int   out
  )
  {
  	strcpy (os_process_name, ospn);
  	strcpy ((char *)osfn_bkgfile, osbfn);
  	save_prtype = prtype;
  	ipc_isatty = isatty;
  	ipc_in = in;
  	ipc_out = out;
  
  	return (XOK);
  }
  