HDTenEightyP/NetNews huggingface dataset:
Newsgroups: comp.os.vms
From: paulo@cix.compulink.co.uk (Paul Ockenden)
Subject: Job opportunity
Reply-To: paulo@cix.compulink.co.uk
Date: Sat, 23 Jan 1993 15:34:00 +0000


We have an opening for a VAX/VMS Pascal programmer, to work at our
offices in Brighton, on the south coast of England (50 miles from
London).

The main requirements are (obviously) VMS and Pascal (preferably
at the same time!). Knowledge of C would also be an advantage.

We are a small company developing technical software for the oil
distribution industry.

Please send a CV to me fairly quickly if you are interested.

P.

Please DO NOT post queries here - I don't often have time to read
this newsgroup.

 +---------------------------------+--------------------------------+
 |Paul Ockenden, Managing Director,|Telephone        +44 273 621393 |
 |Industrial Might & Logic Ltd,    |Fax              +44 273 621390 |
 |58 Cobden Road, BRIGHTON,        |Email paulo@cix.compulink.co.uk |
 |East Sussex, BN2 2TJ, England.   |                                |
 +---------------------------------+--------------------------------+
From: carl@SOL1.GPS.CALTECH.EDU (Carl J Lydick)
Newsgroups: comp.os.vms
Subject: Re: ?1-800 from outside USA? + obs. ACLs, resources.
Date: 28 Jan 1993 10:55:53 GMT
Organization: HST Wide Field/Planetary Camera
Distribution: world
Reply-To: carl@SOL1.GPS.CALTECH.EDU
NNTP-Posting-Host: sol1.gps.caltech.edu

In article <242001A9_00186610.009673D25A01EB40$95_1@UK.AC.KCL.PH.IPG>, SYSMGR@IPG.PH.KCL.AC.UK writes:
>obs. flamers. HAVE YOU THOUGHT ABOUT THE POSSIBLE SIDE EFFECTS OF YOUR NOISE?
>
>From where I am,
>(b) it's not inconcievable that you've contributed to at least one system crash,
>    the one that hit me last night. The active process was the info-VAX
>    redistributor. Of course that may be irrelevant, and I'll never know,
>    but  if we hadn't had all that content-free rude-words garbage to digest 
>    then just maybe it wouldn't have happened.

So, you haven't taken the trouble to figure out just why your system crashed?
You're going to hold the rest of the world accountable for the fact that you've
(possibly) installed an unreliable piece of software?

Don't complain to the people who post to the group, complain to the people who
wrote the broken software.

Or is it your position that broken software is reasonable?

>(c) it's also not inconcievable that you'll deny someone with an incipient
>    heart attack his last few days on earth. Do you REALLY want to do that?

If he's managing a VAX while incompetent to do so, and hasn't enough brains to
use a kill file or skip messages he doesn't like, that's his problem.  BTW, for
your information, I happen to have high blood pressure.  IF YOU'RE GOING TO
BITCH ABOUT SUCH THINGS, WHY DON'T YOU ALSO COMPLAIN TO THE IDIOTS WHO THINK
COMPUTERS WORK BY MAGIC?

>I can cope with naive users who won't RTFM and/or post relevant details very
>easily by hitting delete; this has little effect on my blood pressure.

Gee, then, jackass, couldn't you do the same for the flames to which you're
objecting?

>I fear the word "flame" is going the same way as "hacker". Flame used to
>mean a posting with much valuable technical content, but expressed in a rather
>passionate manner from a biassed viewpoint. This was often acknowledged by
>the author who bracketed it with **FLAME ON ** and **FLAME OFF**. Today it
>just seems to mean a stream of content-free gibberish full of four-letter words.

TECHNICAL INFORMATION FOR AN IDIOT:  IF YOU'VE GOT SOFTWARE THAT CRASHES YOUR
SYSTEM, FIX THE GODDAMNED SOFTWARE!
--------------------------------------------------------------------------------
Carl J Lydick | INTERnet: CARL@SOL1.GPS.CALTECH.EDU | NSI/HEPnet: SOL1::CARL

Disclaimer:  Hey, I understand VAXen and VMS.  That's what I get paid for.  My
understanding of astronomy is purely at the amateur level (or below).  So
unless what I'm saying is directly related to VAX/VMS, don't hold me or my
organization responsible for it.  If it IS related to VAX/VMS, you can try to
hold me responsible for it, but my organization had nothing to do with it.
From: titus@dallas.sil.org
Newsgroups: comp.os.vms
Subject: Re: Postscript Printing woes...
Date: 27 Jan 93 15:28:57 CST
Organization: Summer Institute of Linguistics, Dallas Center

In article <1993Jan26.225807.700149@sue.cc.uregina.ca>, MAHENDRA@Meena.CC.URegina.CA (A. Mahendra Rajah) writes:
> Hello:
> 
>     I hope someone in netland can provide some insight into this
>     printing problem.
> 
>     My boss retrieved some postscript files from an MVS site, which he
>     wanted me to print on our LPS20 laser printer. But, when I tried it
>     with the following command
> 
>         $ Print/Notify/Queue=PRT$LPS20A_PS-
>           /Param=(Sides=2, Page_Orient=PORTTRAIT, Number_UP=1) 'Filename'
> 
>     I get the following error after the job has started:
> 
>     %LPS-W-UNDEF, undefined: Name not known - offending command is letter
> 

Mahendra,
  My first thought is (what I think is) the obvious:  try adding
Data=PS to your parameters.  If that doesn't do it, then maybe
one of the more knowledgeable folks who read this group will be
able to help you.

               * * * * * * * * * * * * * * * * *
#include <std_disclaimer.h>

Mike Titus, Programmer                  /\   Summer Institute
SIL                                    /  \        of
7500 West Camp Wisdom Road            /SIL \   Linguistics
Dallas, Texas  75236-5699            --------
U.S.A.
Voice    : (214) 709-2400             * Internet <titus@dallas.sil.org>
Facsimile: (214) 709-3387             * UUCP     ...utafil!txsil!dalsil!titus

"I can do everything through Him who gives me strength."
      Philippians 4:13 (NIV)

Newsgroups: comp.os.vms
From: sprute@dsf58a.desy.de (Lars Sprute)
Subject: POSIX shells
Organization: DESY, Hamburg, Germany
X-Newsreader: Tin 1.1 PL3
Date: Thu, 28 Jan 1993 15:51:26 GMT

Can someone give me a pointer to anonymous ftp servers which have
UNIX shells (tcsh, ksh, zsh, ...) ports to VMS POSIX, please ?

A few months ago I've read about a tcsh port, but I lost the message.

Thanks for your help,

Lars

--

/---------------------------------------------------------------------------\
| Lars Sprute  -R-                            Net:                          |
| DESY (Deutsches Elektronen Synchrotron)                                   |
| Notkestr. 85                                sprute@desy.de                |
| D - Hamburg 52                              SPRUTE@DESYVAX.BITNET         |
| Germany                                     13313::SPRUTE.DECNET          |
| Tel. +49 40 8998 3219                                                     |
| FAX. +49 40 8998 3282                                                     |
\---------------------------------------------------------------------------/
From: bill@bill.ab.umd.edu (Bill Bame)
Newsgroups: comp.os.vms
Subject: Re: Activating a sharable image
Date: 27 Jan 93 20:04:34 GMT
Reply-To: bill@office.ab.umd.edu
Followup-To: comp.os.vms
Organization: M.I.E.M.S.S.

In article <1993Jan27.165530.4660@das.harvard.edu>, chen@speed.uucp (Lilei Chen) writes:

>Does someone on the net know how to call subroutines in a sharable image
>after a lib$find_image_symbol call?  What can one do with the the symbol
>value returned by that call?  An example in FORTRAN and/or C would be
>greatly appreciated.

Warning: the code fragment I am about to post is off the top of my head,
and therefore has never been tested!  It may not be exactly correct, but
the idea should be sound...

	program call_my_shareable_routine
	implicit none
	parameter shareable_image = 'MYSHR'	! assumes sys$share
	parameter gizmo_to_call   = 'MYROUTINE'
	integer*4 status,gizmo_addr,vector(0:2),arg1,arg2
	integer*4 lib$find_image_symbol,lib$callg
	status=lib$find_image_symbol(shareable_image,gizmo_to_call,gizmo_addr)
	if (.not. status) call lib$stop(%val(status))
	vector(0)=2		! This assumes that MYROUTINE takes two
	vector(1)=%loc(arg1)	! integer args.
	vector(2)=%loc(arg2)
	status=lib$callg(vec,proc) ! or should that be %val(proc)?
	if (.not. status) call lib$stop(%val(status))
	end

This is easier in C since you don't have to use LIB$CALLG.  For further
reference consult "A Guide to Writing Modular Library Procedures", "Linker
Reference Manual", and the LIB$ section of the RTL manual.

>Jim (xue@cfaft5.harvard.edu)
>

-Bill

--
--------------------------------------------------------------------------------
William P. Bame                    | sneakernet: William P. Bame
internet: bill@office.ab.umd.edu   |             M.I.E.M.S.S.
          bbame@achi1.ab.umd.edu   |             22 South Greene Street
AT&T    : [Work] (410) 328-3062    |             Baltimore, MD 21201
CIS     : 71620,425                |             Room: T1R55
--------------------------------------------------------------------------------
From: rankin@EQL.CALTECH.EDU (Pat Rankin)
Newsgroups: comp.os.vms
Subject: Re: VAXC divide problems (V3.2)
Date: 26 Jan 93 01:41:20 GMT
Distribution: world
Organization: The Internet

|>A statement in VAXC such as:
|>   i = (x + 511) / 512;
|>generates ten or so instructions.  Is there anyway to get it to generate:
|>   ADDL3  #511,x,R0
|>   DIVL3  R0,#512,i

     Then one of several posters who have refuted this...

> That's funny, when I compiled this function:
>
func( int x )
{
    int i;
    i = (x + 511) / 512;
    return( i );
}
>
> VAX C V3.2-044 generated this code:
>       .entry  func,^m<>
>       subl2   #4,sp
>       addl3   #511,4(ap),r0
>       divl2   #512,r0
>       ret

     Even CC/NOOPTIMIZE generates only three instructions for the
division (3rd instruction updates `i' on the stack instead of using
a register for it).  "Ten or so" seems to be some sort of hallucination.
Even VAX C V2.2--which is many years old by now--generates the same code
(once the function is changed to use "old style" argument declaration :-).

> Don't ask me why it allocated space on the stack without using it,

     That makes room for a "hidden automatic variable" at the top of the
stack for use by VAXC$ESTABLISH().  The compiler just allocates that
automatically--so do recent releases of GNU C--rather than attempting
to determine whether VAXC$ESTABLISH is actually called.  VAXC$ESTABLISH
cannot safely be used when the compiler doesn't do this; that's why it's
documented as only being supported when used from VAX C.

		Pat Rankin, rankin@eql.caltech.edu
From: carl@SOL1.GPS.CALTECH.EDU (Carl J Lydick)
Newsgroups: comp.os.vms
Subject: Re: Please explain SUBMIT action.
Date: 23 Jan 1993 01:27:13 GMT
Organization: HST Wide Field/Planetary Camera
Distribution: world
Reply-To: carl@SOL1.GPS.CALTECH.EDU
NNTP-Posting-Host: sol1.gps.caltech.edu

In article <1993Jan22.161212.1@woods.ulowell.edu>, welchb@woods.ulowell.edu writes:
=	I am used to the fact that I often have trouble with submitting
=jobs.  In particular, if the job creates a file, and if the execution
=time is lengthy, I often try to look at the log file, or the file being
=created (with TYPE, DUMP, EDIT) with no luck; the file is locked by
=another user.

Are you sure you were looking at the log file, and not another file being
created by the batch job?  You see, the batch job log file is automatically
created with read sharing allowed, and is automatically flushed periodically
(once per minute by default; type the command HELP SET OUTPUT_RATE for details).
Also, files created as the primary output files for process created with a
command like:
	$ SPAWN/INPUT=inpfile/OUTPUT=outfile
where both inpfile and outfile are non-terminal devices will be so created and
so flushed.

Files explicitly created by your program, however, will NOT be flushed
automatically, nor will they necessarily be created with read sharing enabled.
If you fopen() a file with "w" access via VAX C, read sharing is automatically
enabled from C.  To OPEN a file shared in FORTRAN, you need to specify the
SHARED keyword in the OPEN statement.  To flush a file in FORTRAN, use a
statement of the form:
	CALL SYS$FLUSH(%VAL(FOR$RAB(lun)))
where "lun" is the logical unit number associated with the file you want to
flush.  To flush a file opened via the VAX C RTL, you need to use both fflush()
and fsync(). Either:
	FILE *fp;

	fp = fopen("test.dat", "w");
		...
	fflush(fp); fsync(fileno(fp));
Or:
	FILE *fp;
	int fd;

	fd = open(file_spec, flags, mode);
		...
	fp = fdopen(fd, "w");
		...
	fflush(fp); fsync(fd);
--------------------------------------------------------------------------------
Carl J Lydick | INTERnet: CARL@SOL1.GPS.CALTECH.EDU | NSI/HEPnet: SOL1::CARL

Disclaimer:  Hey, I understand VAXen and VMS.  That's what I get paid for.  My
understanding of astronomy is purely at the amateur level (or below).  So
unless what I'm saying is directly related to VAX/VMS, don't hold me or my
organization responsible for it.  If it IS related to VAX/VMS, you can try to
hold me responsible for it, but my organization had nothing to do with it.
From: vaxinf@chclu.chemie.uni-konstanz.de
Newsgroups: comp.os.vms
Subject: Summary: CDA-Viewer mystery solved: X-Server doesn't have the
         PS-Extention
Date: 26 Jan 93 19:45:10 GMT
Organization: The Internet
X-Unparsable-Date: Tue, 26 Jan 1993 16:21:32 CET

Thanks to all, who answered.

It turns out, that the EWS-X-Server doesn't have the PS-Extention, that CDA 
wants to use. One can use the Ghostscript-program or other tools (Now I select 
Xwindow-Dump/Display-Xwindow-Dump).

Regard
Eberhard Heuser-Hofmann
From: music@erich.triumf.ca (FRED W. BACH)
Newsgroups: comp.os.vms
Subject: Re: End-user on-line Motif tutorial
Date: 25 Jan 1993 15:50 PST
Organization: TRIUMF: Tri-University Meson Facility
Distribution: world
NNTP-Posting-Host: erich.triumf.ca
Keywords: mouse trackball female dyslexia
News-Software: VAX/VMS VNEWS 1.41    

In article <1993Jan25.093440.25311@slcs.slb.com>, brydon@dsn.SINet.slb.com writes...
#In article <23JAN199309331004@cvdv99.mayo.edu>, fisk@cvdv99.mayo.edu (Tom Fisk
#| 2D-337 STM | 5-4341) writes:
#>I realize that there are many women that have no difficulty using mice.  The
#>ones we see that are having the problem are those who have none or very limited
#>computer experience and they use it while they are standing (which I think may
#>be a big factor also).  The reason why they are having the trouble was 
#>actually brought up by one of the users...not inferred on our part in anyway.
#>And she is still running the mouse upside down and it works fine for her...
# 
#Just curious, but what kind of mouse are you and your lady friends using? 
#Every mouse I have ever seen would not work upside down because gravity pulls
#the ball "down" ("up" to the mouse) so that no contact is made on the internal
#rollers.  ...And how do you click on the button(s) if it/they are on the
#bottom?
#_______________________________________________________________
#Harvey Brydon         | Internet:   brydon@dsn.SINet.slb.com
#Dowell Schlumberger   | P.O.T.S.:   (918)250-4312
#1. Politics 2. Religion 3. Women's (a) ages (b) weights (c) rights

  Now Harvey, they mean that the mouse's head is where its tail should be
 and so its connecting cable is under the wrist not beyond the index
 finger, (don't they?).

                          ***************

   This brings up another idea.  Has the mouse ever been used as
 a test for dyslexia?   I wonder if the net has not come up with
 something here....  Any of you medics out there got any ideas?
 How about Chad at the Mayo Clinic ? :-)

                          ****************


    Anyway, I heard that a trackball was just an upside-down mouse
 (in the sense to which you were referring).  I would very much like
 to start a discussion on this group on the use of the mouse vs the
 trackball.  I have my serious biases.  (I hate the mouse because of
 the real-estate it needs to run and because it is never in the same
 place twice.  I am a fairly good pianist, and if the piano got up and
 changed co-ordinates the way a mouse does, it would drive me crazy.)
 I'm pretty darned hot with a trackball, but correspondingly bad with
 the mouse.  Are there more like me out there?

   Comments please, boys and girls.

 Fred W. Bach ,    Operations Group        |  Internet: music@erich.triumf.ca
 TRIUMF (TRI-University Meson Facility)    |  Voice:  604-222-1047 loc 278/419
 4004 WESBROOK MALL, UBC CAMPUS            |  FAX:    604-222-1074
 University of British Columbia, Vancouver, B.C., CANADA   V6T 2A3

 These are my opinions, which should ONLY make you read, think, and question.
 They do NOT necessarily reflect the views of my employer or fellow workers.
From: ERMIMWEI@er.ele.tue.nl (Wim Beckers)
Newsgroups: comp.os.vms
Subject: command procedure calling
Date: 26 Jan 93 16:41:02 GMT
Organization: Electrical Engineering, Eindhoven University of Technology, The Netherlands

When a command procedure is called by another command procedure  their is 

always a return to the calling command procedure.

Is there a possibility to NOT return to the calling procedure?
----------------------------------$$$$$-------------------------------- 
 Measurement and Control Group              P.O. BOX 513                
 Department of Electrical Engineering       5600 MB  Eindhoven       
 Eindhoven University of Technology         The Netherlands             
 .                                                                      
 Email      : ERMIMWEI@er.ele.tue.nl                                  
 TELEFAX    : +31.40.434582                                             
 TEL        : +31.40.472300 (secr.)                                     
            : +31.40.473246 (office)                                    
Newsgroups: comp.os.vms
From: Ronald P. Larkin <r-larkin@uiuc.edu>
Subject: Re: Editing a large file
X-Xxdate: Wed, 27 Jan 93 12:41:19 GMT
X-Useragent: Nuntius v1.1.1d16
Organization: Illinois Natural History Survey
Date: Wed, 27 Jan 1993 18:38:36 GMT
X-Xxmessage-Id: <A78C336FCE019D21@sb3mac.inhs.uiuc.edu>

In article <21JAN199314094029@ariel.lerc.nasa.gov> VMScluster
Administrator, uugblum@ariel.lerc.nasa.gov writes:

> Some of our Cray programs produce very large (~80,000 blocks) ASCII
output
> files which are sent to the VAXcluster for review.  TPU and EDT don't
work
> well with large files.  I think the editors read the entire file into
memory
> so the performance is poor if it works at all...

   Somebody should point out that there is a general principle that a
program that
produces very large quantities of printout could probably be written
better, and
that principle may apply to this case of very large quantities of text
meant to be
perused by humans.  In this case, rather than repeating supercomputer
runs, it
may be possible to write a postprocessor to select that part of the 80k
blocks that
might be of interest to humans.  Maybe even $ SEARCH would help....
Ronald P. Larkin, Illinois Natural History Survey
607 E. Peabody Drive, Champaign, IL 61820  USA
r-larkin@uiuc.edu (Ron Larkin)
From: music@pubff1.triumf.ca (FRED W. BACH)
Newsgroups: comp.os.vms
Subject: Re: (none)
Date: 26 Jan 1993 18:03 PST
Organization: TRIUMF: Tri-University Meson Facility
Distribution: world
NNTP-Posting-Host: pubff1.triumf.ca
Keywords: hotel California
News-Software: VAX/VMS VNEWS 1.41    

In article <1993Jan22.144925.1263@cmkrnl.com>, jeh@cmkrnl.com writes...
#In article <930120112423.2041c8e9@FNAL.FNAL.GOV>, ISENHOUR@FNAL.FNAL.GOV 
#(John L. Isenhour) writes:
#> REMOVE ISENHOUR@FNALO.FNAL.GOV
#> REMOVE ISENHOUR@FNALA.FNAL.GOV
#> REMOVE ISENHOUR@FNALC.FNAL.GOV
#> REMOVE ISENHOUR@FNALF.FNAL.GOV
#> [...]
# 
#Hah!  Death shall not release you. 
# 
#	--- Jamie Hanrahan, Kernel Mode Systems, San Diego CA

   Jamie,

   Doesn't this remind you of the Eagles' number "Hotel California" ?

   " You can check out any time you want, but you can never leave... "

   So this is what they mean by the Eternal Flames of Hell ... ;-)

 Fred W. Bach ,    Operations Group        |  Internet: music@erich.triumf.ca
 TRIUMF (TRI-University Meson Facility)    |  Voice:  604-222-1047 loc 278/419
 4004 WESBROOK MALL, UBC CAMPUS            |  FAX:    604-222-1074
 University of British Columbia, Vancouver, B.C., CANADA   V6T 2A3

 These are my opinions, which should ONLY make you read, think, and question.
 They do NOT necessarily reflect the views of my employer or fellow workers.
Newsgroups: comp.os.vms
From: wall@rndhse.enet.dec.com (David F. Wall)
Subject: Re: Alpha AXP setup "gotchas"
Followup-To: comp.os.vms
Reply-To: wall@rndhse.enet.dec.com (David F. Wall)
Organization: Digital Equipment Corporation
Date: Wed, 27 Jan 1993 13:55:02 GMT


In article <19727.2b65500d@ecs.umass.edu>, jhwelch@ecs.umass.edu writes:

>
>To boot into sysgen you have to >>> SET BOOT_OSFLAGS 0,1 - I read
>all the manuals that I received but if it was in one I missed it.
>Don't forget to reset this at the next shutdown.
>

At the risk of pointing out something obvious:

The console accepts one-time variations on the boot flags.  If you just want
to get at conversational SYSBOOT you need not change the variable.  Just supply
them in the boot command:

>>> boot -flags 0,1 <device>

where device is your system disk, will achieve the effect without changing your
defaults.

Hope the machine serves you well.

Disclaimer:  This stuff comes from me, not Digital.  I just happened to know
	     something about what was going on in this case.

--

David F. Wall (Digital Equipment Corp., Nashua, NH)
 
UUCP		...!decwrl!rndhse.enet!wall
Internet	wall@rndhse.enet.dec.com	
	- or -	wall%rndhse.enet@decwrl.dec.com
---
Newsgroups: comp.os.vms
From: welchb@woods.ulowell.edu
Subject: Re: cpu time measurement on VMS
Organization: University of Lowell
Date: Thu, 21 Jan 1993 19:21:31 GMT

In article <1993Jan20.164619.8700@eecs.nwu.edu>, shil@eecs.nwu.edu (Lei Shi) writes:
> Hi: 
> 
>    I am a new user of OpenVMS running on Alpha. I have a problem and I am asking
> for your help.  I have a FORTRAN program. I compile and link it and use run 
> command to run it.  My question is how I can measure the total CPU used by the 
> execution of the program.  In UNIX, I can easily use time to do it.  
> But how do I do it in VMS?  Can some one help me?  Thanks a lot. 
> 
> 					Your Sincerely,
> 
> 					Lei Shi
> 
> -------------------------------------------------------------------
> Lei Shi			|  Department of Electrical Engineering and 
> shil@eecs.nwu.edu	|                Computer Science 
> i			|  Northwestern University
> Work: (708)467-2299 	|  Evanston, IL 60208-3118
c---- timer2.for
      PROGRAM TIMER
C    
C          Program to illustrate the use of commands that
C          allow CPU time for execution to be determined.
C
C          This version writes timer statistics to output file.
C
      INTEGER*4 TIMER_ADDR,TIMER_ROUTINE
      EXTERNAL TIMER_ROUTINE
C          declare library routines
      INTEGER*4 LIB$INIT_TIMER,LIB$SHOW_TIMER
C          declare as external
      EXTERNAL LIB$INIT_TIMER,LIB$SHOW_TIMER
C          set up work variables
      INTEGER*4 STATUS
C
C          create output file
      CALL ASSIGN(2,'TIMER.OUT')
C
      TIMER_ADDR=0
C
C          set timer
      STATUS=LIB$INIT_TIMER(TIMER_ADDR)

c---------------------------------------------------------------------
C    sample do loop to use some CPU time
c-----------------  your thing to be timed goes here  ----------------
      DO 100 I=1,50         ! remove these 4 lines
      WRITE(2,80) I
   80 FORMAT(1X,'     I =',I4)
  100 CONTINUE
c---------------------------------------------------------------------
C
C         get CPU time statistics
      STATUS=LIB$SHOW_TIMER(TIMER_ADDR,,TIMER_ROUTINE,)
C
C
      TYPE120
  120 FORMAT(//,1X,'OUTPUT IN "TIMER.OUT"',/)
C
      STOP
      END
      INTEGER FUNCTION TIMER_ROUTINE(STATS)
C    
C          subroutine to output timer statistics
C
      CHARACTER*(*) STATS
C
C          must return success value of 1
      TIMER_ROUTINE = 1
C
C          output timer stat line
      WRITE(2,100) STATS
  100 FORMAT(//,1X,'TIMER STATISTICS:',/,1X,A)
      END
-- 
Brendan Welch, UMass/Lowell, W1LPG,  welchb@woods.ulowell.edu
Newsgroups: comp.os.vms