Previous: prsswi Up: ../plot79_p.html Next: prstok

PRSTCL

       INTEGER FUNCTION  PRSTCL (UNITNO)
 C$    (Parse Internal - Terminal Column)
 C$    Return as  a  function  value  the  current  cursor  column
 C$    position on  the  terminal  associated  with  FORTRAN  unit
 C$    number UNITNO.  Column positions are numbered from 0 at the
 C$    left margin.   This  function  is  used  by  the  prompting
 C$    routine, PRSTPR, to determine whether or not to start a new
 C$    line for the  prompt.  If  UNITNO is  not open,  or is  not
 C$    connected to a terminal,  then -1 is  returned to flag  the
 C$    indeterminate status.
 C$
 C$    Since this  capability is  system-dependent, this  portable
 C$    version simply returns -1.
 C$    (10-AUG-85)