date and time created 83/03/09 16:22:58 by ralph

SCCS-vsn: old/lib2648/move.c 4.1

diff --git a/usr/src/old/lib2648/move.c b/usr/src/old/lib2648/move.c
new file mode 100644 (file)
index 0000000..11cc665
--- /dev/null
+++ b/usr/src/old/lib2648/move.c
@@ -0,0 +1,17 @@
+/*     move.c  4.1     83/03/09        */
+/*
+ * move to (x, y).  Both the _pen and cursor are supposed to be moved.
+ * We really just remember it for later, in case we move again.
+ */
+
+#include "2648.h"
+
+move(x, y)
+{
+#ifdef TRACE
+       if (trace)
+               fprintf(trace, "\tmove(%d, %d), ", x, y);
+#endif
+       _supx = x;
+       _supy = y;
+}