1 files changed, 0 insertions, 82 deletions
diff --git a/tcl/xlib/xdraw.c b/tcl/xlib/xdraw.c
deleted file mode 100644
index 2655915b3c2..00000000000
--- a/tcl/xlib/xdraw.c
+++ /dev/null
@@ -1,82 +0,0 @@
-/* 
- * xdraw.c --
- *
- *	This file contains generic procedures related to X drawing
- *	primitives.
- *
- * Copyright (c) 1995 Sun Microsystems, Inc.
- *
- * See the file "license.terms" for information on usage and redistribution
- * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
- *
- * RCS: @(#) $Id$
- */
-
-#include "tk.h"
-
-/*
- *----------------------------------------------------------------------
- *
- * XDrawLine --
- *
- *	Draw a single line between two points in a given drawable. 
- *
- * Results:
- *	None.
- *
- * Side effects:
- *	Draws a single line segment.
- *
- *----------------------------------------------------------------------
- */
-
-void
-XDrawLine(display, d, gc, x1, y1, x2, y2)
-    Display* display;
-    Drawable d;
-    GC gc;
-    int x1, y1, x2, y2;		/* Coordinates of line segment. */
-{
-    XPoint points[2];
-
-    points[0].x = x1;
-    points[0].y = y1;
-    points[1].x = x2;
-    points[1].y = y2;
-    XDrawLines(display, d, gc, points, 2, CoordModeOrigin);
-}
-
-/*
- *----------------------------------------------------------------------
- *
- * XFillRectangle --
- *
- *	Fills a rectangular area in the given drawable.  This procedure
- *	is implemented as a call to XFillRectangles.
- *
- * Results:
- *	None
- *
- * Side effects:
- *	Fills the specified rectangle.
- *
- *----------------------------------------------------------------------
- */
-
-void
-XFillRectangle(display, d, gc, x, y, width, height)
-    Display* display;
-    Drawable d;
-    GC gc;
-    int x;
-    int y;
-    unsigned int width;
-    unsigned int height;
-{
-    XRectangle rectangle;
-    rectangle.x = x;
-    rectangle.y = y;
-    rectangle.width = width;
-    rectangle.height = height;
-    XFillRectangles(display, d, gc, &rectangle, 1);
-}