# Copyright (C) 2006-2009, Parrot Foundation.
# $Id: Leaf.pir 38369 2009-04-26 12:57:09Z fperrad $

=head1 NAME

Leaf - a sample leaf node for Language::AttributeGrammar

=head1 DESCRIPTION

=cut

.namespace [ "Leaf" ]

.sub "__onload" :load
    .local pmc base
    newclass base, "Leaf"
    addattribute base, "value"   # the value of the leaf node
    .return ()
.end

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