Newsgroups: comp.lang.postscript
Path: utzoo!utgpu!news-server.csri.toronto.edu!torsqnt!geac!maccs!maccs.dcss.mcmaster.ca!dan
From: dan@maccs.dcss.mcmaster.ca (Dan Trottier)
Subject: Simpleton question
Message-ID: <28678BF9.4393@maccs.dcss.mcmaster.ca>
Sender: dan@maccs.dcss.mcmaster.ca (Dan Trottier)
Organization: McMaster University, Hamilton, Ontario, Canada
Distribution: na
Date: Tue, 25 Jun 91 18:31:21 GMT

I'm trying to write a postscript program to dump character width tables
and print them on the printer. The following code segment works except
I can't seem to print the numeric width:

/prtchar
{   char 0
    3 -1 roll put char dup ==         - puts char to standard out
    dup show                          - puts char to page 
    stringwidth pop 300 mul 72 div    - calculate width
    round cvi dup ==                  - round and put to stdout
    dup cvs show                      - now how do I display width
 } def                                  to page???? Doesn't work!


Any insight to how I would print a number on the top of the stack to 
the graphic page would be very helpfull....

Thanks...	dan
-- 
Dan Trottier                                       dan@maccs.dcss.McMaster.CA
Dept of Computer Science                       ...!uunet!utai!utgpu!maccs!dan
McMaster University                                      (416) 525-9140 x3444