/* Cursor motion subroutines for GNU Emacs.
- Copyright (C) 1985, 1995, 2001-2011 Free Software Foundation, Inc.
+ Copyright (C) 1985, 1995, 2001-2013 Free Software Foundation, Inc.
based primarily on public domain code written by Chris Torek
This file is part of GNU Emacs.
#include <config.h>
#include <stdio.h>
-#include <setjmp.h>
#include "lisp.h"
#include "frame.h"
#include "termchar.h"
#include "tparam.h"
-#define BIG 9999 /* 9999 good on VAXen. For 16 bit machines
- use about 2000.... */
+#define BIG 9999 /* Good on 32-bit hosts. */
int cost; /* sums up costs */
if (curX (tty) == FrameCols (tty))
{
if (!MagicWrap (tty) || curY (tty) >= FrameRows (tty) - 1)
- abort ();
+ emacs_abort ();
if (tty->termscript)
putc ('\r', tty->termscript);
putc ('\r', tty->output);
}
totalcost = c * deltay;
if (doit)
- while (--deltay >= 0)
+ do
emacs_tputs (tty, p, 1, cmputc);
+ while (--deltay > 0);
x:
if ((deltax = dstx - srcx) == 0)
goto done;
}
totalcost += c * deltax;
if (doit)
- while (--deltax >= 0)
+ do
emacs_tputs (tty, p, 1, cmputc);
+ while (--deltax > 0);
done:
return totalcost;
}
#if 0
-losecursor ()
+void
+losecursor (void)
{
curY = -1;
}