Source

spark / parspark / src / builtins / say.pir

The default branch has multiple heads

Full commit
# $Id$

=head1

say.pir -- simple implementation of a say function

=cut

.namespace []

.sub 'say'
    .param pmc args            :slurpy
    .local pmc it
    it = iter args
  it_loop:
    unless it goto it_end
    $P0 = shift it
    print $P0
    goto it_loop
  it_end:
    print "\n"
    .return ()
.end


# Local Variables:
#   mode: pir
#   fill-column: 100
# End:
# vim: expandtab shiftwidth=4 ft=pir: