Initial commit of OpenSPARC T2 design and verification files.

[OpenSPARC-T2-DV] / tools / perl-5.8.0 / lib / 5.8.0 / Attribute / Handlers / demo / demo_call.pl

#! /usr/local/bin/perl -w

use Attribute::Handlers;

sub Call : ATTR {
       use Data::Dumper 'Dumper';
       print Dumper [ @_ ];
}


sub x : Call(some,data) { };