#
# sub.jako
#
# A program to demonstrate macros and poor-man's subroutine
# calls.
#
# Copyright (C) 2001-2003 Gregor N. Purdy. All rights reserved.
# This program is free software. It is subject to the same
# license as the Parrot interpreter.
#
# $Id: sub.jako,v 1.4 2003/07/03 15:32:25 gregor Exp $
#

use sys;

var int x;

sub printit (int x) {
  sys::print("$x\n");
}

x = 42;
printit(x);

x = 1234;
printit(x);

