ftp.nice.ch/pub/next/unix/postscript/ps2eps.1.0.NIHS.bsd.tar.gz#/ps2eps-1.0/src/comments.c

This is comments.c in view mode; [Download] [Up]

#include "incl.h"

extern FILE   *fpo;
extern int     outlinecount;
extern int     pagesOK, EndComments;
extern long    ScalePos;
extern double  scx, scy;

comments ()
{
   if (!(pagesOK)) {
      fprintf (fpo, "%s: 0 1\n", PPPAGES);
      outlinecount++;
      pagesOK = TRUE;
   }
   fprintf (fpo, "%s\n", PPENDCOMMENTS);
/*
** Insert this statement for use with program ``dvialw''
*/
   fprintf (fpo, "%s", DVIALW_BEGIN);
/*
** Insert scale statement to reflect to supplied or default boundingbox.
** Boundingbox depends on -w and -h options.
** Insert dummy spaces at the end for this statement may be overwritten.
*/
   ScalePos = ftell (fpo);
   fprintf (fpo, "%.3lf %.3lf %s                \n", 
            scx, scy, SCALE);

   outlinecount += 3;
   EndComments = TRUE;
   return (EXIT_SUCCESS);
}

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.