comparison src/msdos.c @ 16915:8d28d96f6031

(run_msdos_command): Remove unused variables. (crlf_to_lf): Remove unused variables. (Fmsdos_downcase_filename): Remove unused variable. (IT_set_frame_parameters): Declare prototypes for external functions. (IT_set_frame_parameters): Correct format specifier. (IT_set_terminal_modes): Remove unused variable. (top level): Add header files which declare used functions.

16914:4b79df16b939

#include <stdlib.h>
#include <sys/param.h>
#include <sys/time.h>
#include <dos.h>
#include <errno.h>
#include <sys/stat.h>    /* for _fixpath */
#if __DJGPP__ >= 2
#include <fcntl.h>
#include <dpmi.h>	 /* for __dpmi_xxx stuff */
#include <sys/farptr.h>	 /* for _farsetsel, _farnspokeb */
#include <libc/dosio.h>  /* for _USE_LFN */
#endif

#include "dosfns.h"
#include "msdos.h"
#include "systime.h"

   resumed, and whenever the screen is redrawn!  */

static
IT_set_terminal_modes (void)
{
  char *colors;
  FRAME_PTR f;
  struct face *fp;

  if (termscript)
    fprintf (termscript, "\n<SET_TERM>");
  highlight = 0;

  screen_size_X = ScreenCols ();

	  if (new_color != ~0)
	    {
	      FRAME_FOREGROUND_PIXEL (f) = new_color;
	      redraw = 1;
	      if (termscript)
		fprintf (termscript, "<FGCOLOR %d>\n", new_color);
	    }
	}
      else if (EQ (prop, intern ("background-color")))
	{
	  unsigned long new_color = load_color (f, val);
	  if (new_color != ~0)
	    {
	      FRAME_BACKGROUND_PIXEL (f) = new_color;
	      redraw = 1;
	      if (termscript)
		fprintf (termscript, "<BGCOLOR %d>\n", new_color);
	    }
	}
      else if (EQ (prop, intern ("menu-bar-lines")))
	x_set_menu_bar_lines (f, val, 0);
    }

  if (redraw)
    {
      recompute_basic_faces (f);
      if (f == selected_frame)
	redraw_frame (f);
    }
}

#endif /* !HAVE_X_WINDOWS */


/* Do we need the internal terminal?  */

      return val;
    }
}

/* Get a char from keyboard.  Function keys are put into the event queue.  */

static int
dos_rawgetc ()
{
  struct input_event event;

     register unsigned char *buf;
{
  unsigned char *np = buf;
  unsigned char *startp = buf;
  unsigned char *endp = buf + n;
  unsigned char c;

  if (n == 0)
    return n;
  while (buf < endp - 1)
    {

If FILENAME is not a string, returns nil.\n\
The argument object is never altered--the value is a copy.")
  (filename)
     Lisp_Object filename;
{
  char *fname;
  Lisp_Object tem;

  if (! STRINGP (filename))
    return Qnil;

     int tempin, tempout, temperr;
{
  char *saveargv1, *saveargv2, **envv, *lowcase_argv0, *pa, *pl;
  char oldwd[MAXPATHLEN + 1]; /* Fixed size is safe on MSDOS.  */
  int msshell, result = -1;
  int in, out, inbak, outbak, errbak;
  int x, y;
  Lisp_Object cmd;

  /* Get current directory as MSDOS cwd is not per-process.  */
  getwd (oldwd);

16915:8d28d96f6031

#include <stdlib.h>
#include <sys/param.h>
#include <sys/time.h>
#include <dos.h>
#include <errno.h>
#include <string.h>	 /* for bzero and string functions */
#include <sys/stat.h>    /* for _fixpath */
#include <unistd.h>	 /* for chdir, dup, dup2, etc. */
#if __DJGPP__ >= 2
#include <fcntl.h>
#include <io.h>		 /* for setmode */
#include <dpmi.h>	 /* for __dpmi_xxx stuff */
#include <sys/farptr.h>	 /* for _farsetsel, _farnspokeb */
#include <libc/dosio.h>  /* for _USE_LFN */
#include <conio.h>	 /* for cputs */
#endif

#include "dosfns.h"
#include "msdos.h"
#include "systime.h"

   resumed, and whenever the screen is redrawn!  */

static
IT_set_terminal_modes (void)
{
  if (termscript)
    fprintf (termscript, "\n<SET_TERM>");
  highlight = 0;

  screen_size_X = ScreenCols ();

	  if (new_color != ~0)
	    {
	      FRAME_FOREGROUND_PIXEL (f) = new_color;
	      redraw = 1;
	      if (termscript)
		fprintf (termscript, "<FGCOLOR %lu>\n", new_color);
	    }
	}
      else if (EQ (prop, intern ("background-color")))
	{
	  unsigned long new_color = load_color (f, val);
	  if (new_color != ~0)
	    {
	      FRAME_BACKGROUND_PIXEL (f) = new_color;
	      redraw = 1;
	      if (termscript)
		fprintf (termscript, "<BGCOLOR %lu>\n", new_color);
	    }
	}
      else if (EQ (prop, intern ("menu-bar-lines")))
	x_set_menu_bar_lines (f, val, 0);
    }

  if (redraw)
    {
      extern void recompute_basic_faces (FRAME_PTR);
      extern void redraw_frame (FRAME_PTR);

      recompute_basic_faces (f);
      if (f == selected_frame)
	redraw_frame (f);
    }
}

extern void init_frame_faces (FRAME_PTR);

#endif /* !HAVE_X_WINDOWS */


/* Do we need the internal terminal?  */

      return val;
    }
}

/* Get a char from keyboard.  Function keys are put into the event queue.  */

extern void kbd_buffer_store_event (struct input_event *);

static int
dos_rawgetc ()
{
  struct input_event event;

     register unsigned char *buf;
{
  unsigned char *np = buf;
  unsigned char *startp = buf;
  unsigned char *endp = buf + n;

  if (n == 0)
    return n;
  while (buf < endp - 1)
    {

If FILENAME is not a string, returns nil.\n\
The argument object is never altered--the value is a copy.")
  (filename)
     Lisp_Object filename;
{
  Lisp_Object tem;

  if (! STRINGP (filename))
    return Qnil;

     int tempin, tempout, temperr;
{
  char *saveargv1, *saveargv2, **envv, *lowcase_argv0, *pa, *pl;
  char oldwd[MAXPATHLEN + 1]; /* Fixed size is safe on MSDOS.  */
  int msshell, result = -1;
  int inbak, outbak, errbak;
  int x, y;
  Lisp_Object cmd;

  /* Get current directory as MSDOS cwd is not per-process.  */
  getwd (oldwd);