// $Id$

$func Stream     s.func e.args = s.stream;
$func Expr_Open  e.expr        = s.stream;
$func File_Open  e.file        = s.stream;
$func File_Close s.stream      = ;
$func StdIStream               = s.stream;

//X/*
$func? Getc           s.stream          = t.term;
$func? Gets           s.stream s.length = e.expr;
$func  Ungets         s.stream e.expr   = ;
$func  Scanc          s.stream t.1      = e.empty_or_t1;
$func  Scans          s.stream e.1      = e.empty_or_e1;
$func  Get_Delim      s.stream t.delim  = e.expr;
$func  Get_Delims     s.stream v.delim  = e.expr;
$func  Get_Line       s.stream          = e.expr;
$func  Get_While      s.stream s.pred e.predArgs = e.expr;
$func  Get_Until      s.stream s.pred e.predArgs = e.expr;
$func? IsEnd_of_Stream s.stream         = ;
//X*/

//X$include IStream;