Upgrade to Attribute::Handlers 0.70.

NOTE: this unearthed the "too late for CHECK block" bug,
that's why the 1_compile.t change.

p4raw-id: //depot/perl@10407

1 files changed, 9 insertions, 0 deletions

diff --git a/lib/Attribute/Handlers/demo/demo4.pl b/lib/Attribute/Handlers/demo/demo4.pl
new file mode 100755
index 0000000000..22d9fd983b
--- /dev/null
+++ b/lib/Attribute/Handlers/demo/demo4.pl
@@ -0,0 +1,9 @@
+use Descriptions;
+
+my $capacity : Name(capacity)
+	     : Purpose(to store max storage capacity for files)
+	     : Unit(Gb);
+
+package Other;
+
+sub foo : Purpose(to foo all data before barring it) { }