fortran (once again)

[LAAKSONE at FINFUN.BITNET]

Please tell me what I'm doing wrong. I have a short file with some
fortran subroutines but I'm totally unable to compile the file.
The fortran compiler grabs more and more of memory and after a while
the system tells: DANGER: Out of swap space and I lose the control
of the system totally. The system I'm using is a 4D/70GTB and the
fortran compiler is version 1.31.

I can get the same effect by just compiling the following subroutine:

I have tried with and without optimization but always the same problem.
----------------------cut here--------------------------------------
C
C
C PLOTTER OFF CALL    ESC.)
        SUBROUTINE HPLOF
C BEFORE OFF SEND A TERMINATING CHARACTER
        CALL HPOUT(char(125)//char(27)//'.)')
        RETURN
        END

-----------------------cut here------------------------------------
I have tried to compile the code on a VAX and a SUN and there was no
problem.

Thanks in advance,

Leif Laaksonen
CSC ESPOO FINLAND