From 22413dfa58bdaeda139426dab61f89e73b737259 Mon Sep 17 00:00:00 2001
From: Alexander Iljin <ajsoft@yandex.ru>
Date: Fri, 20 Jan 2017 03:44:44 +0300
Subject: [PATCH] charts: add chart-dim

---
 charts.factor | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/charts.factor b/charts.factor
index 2771024ab1..132a106de3 100644
--- a/charts.factor
+++ b/charts.factor
@@ -11,6 +11,10 @@ M: chart pref-dim* drop { 300 300 } ;
 : chart-axes ( chart -- seq )
     drop { { 0 300 } { 0 300 } } ;
 
+! Return the width and height of the visible area, in pixels.
+: chart-dim ( chart -- seq )
+    drop { 300 300 } ;
+
 ! There are several things to do to present data on the screen.
 ! Map the data coordinates to the screen coordinates.
 ! Cut off data outside the presentation window. When cutting off vertically, split the line into segments and add new points if necessary. Return an array of line segments.