#
# io.jako
#
# Input/Output ops.
#
# Copyright (C) 2003-2005, The Perl Foundation.
# This program is free software. Its use is subject to the same
# license as Parrot.
#
# $Id: io.jako 12840 2006-05-30 15:08:05Z coke $
#

module io
{
  sub pmc open     :op (str name, str mode);
  sub pmc fdopen   :op (int fd, str mode);
  sub     close    :op (pmc io);

  sub     print    :op (pmc io, str s);
  sub     printerr :op (str s);
  sub     puts     :op (str s);
  sub     puts     :op (int i);
  sub     puts     :op (num n);

  sub str read     :op (int l);
  sub str read     :op (pmc io, int l);

  sub int seek     :op (pmc io, int offset, int whence);
  sub int seek     :op (pmc io, int high, int low, int whence);
}