# # sys.jako # # System ops. # # Copyright (C) 2003-2005, The Perl Foundation. # This program is free software. Its use is subject to the same # license as Parrot. # # $Id: sys.jako 12840 2006-05-30 15:08:05Z coke $ # module sys { sub print :op (str a); sub int time :op (); sub num timen :op="time" (); # TODO: Really want to allow overloads in Jako sub sleep :op (int n); sub exit :op (int s); }