1 /* This file is part of the GNU plotutils package. Copyright (C) 1995,
2 1996, 1997, 1998, 1999, 2000, 2005, 2008, Free Software Foundation, Inc.
3
4 The GNU plotutils package is free software. You may redistribute it
5 and/or modify it under the terms of the GNU General Public License as
6 published by the Free Software foundation; either version 2, or (at your
7 option) any later version.
8
9 The GNU plotutils package is distributed in the hope that it will be
10 useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 General Public License for more details.
13
14 You should have received a copy of the GNU General Public License along
15 with the GNU plotutils package; see the file COPYING. If not, write to
16 the Free Software Foundation, Inc., 51 Franklin St., Fifth Floor,
17 Boston, MA 02110-1301, USA. */
18
19 /* A PSPlotter simply resets the output buffer, discarding all objects
20 written to it, resets the bounding box, and marks all Postscript fonts
21 as unused on the current page. */
22
23 #include "sys-defines.h"
24 #include "extern.h"
25
26 bool
_pl_p_erase_page(S___ (Plotter * _plotter))27 _pl_p_erase_page (S___(Plotter *_plotter))
28 {
29 int i;
30
31 /* reinitialize `font used' array(s) for this page */
32 for (i = 0; i < PL_NUM_PS_FONTS; i++)
33 _plotter->data->page->ps_font_used[i] = false;
34 #ifdef USE_LJ_FONTS_IN_PS
35 for (i = 0; i < PL_NUM_PCL_FONTS; i++)
36 _plotter->data->page->pcl_font_used[i] = false;
37 #endif
38
39 return true;
40 }
41