From d70ac1ceb45d31d213b49b2f72b120b9737d860f Mon Sep 17 00:00:00 2001
From: "Brian A. LaMacchia" <edu/mit/csail/zurich/bal>
Date: Wed, 13 May 1992 22:45:18 +0000
Subject: [PATCH] *** empty log message ***

---
 v7/src/microcode/x11graph.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/v7/src/microcode/x11graph.c b/v7/src/microcode/x11graph.c
index be3253850..c79d14b4c 100644
--- a/v7/src/microcode/x11graph.c
+++ b/v7/src/microcode/x11graph.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/x11graph.c,v 1.25 1992/05/13 22:40:07 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/x11graph.c,v 1.26 1992/05/13 22:45:18 bal Exp $
 
 Copyright (c) 1989-92 Massachusetts Institute of Technology
 
@@ -601,6 +601,7 @@ DEFINE_PRIMITIVE ("X-GRAPHICS-FILL-POLYGON", Prim_x_graphics_fill_polygon, 2, 2,
   {
     struct xwindow * xw = x_window_arg (1);
     XPoint * points = (x_polygon_vector_arg (xw, 2));
+    unsigned long length = VECTOR_LENGTH (VECTOR_ARG (2));
     XFillPolygon ((XW_DISPLAY (xw)),
 		  (XW_WINDOW (xw)),
 		  (XW_NORMAL_GC (xw)),
-- 
2.25.1