is DEPRECATED on attributes works now

Author: lizmat

doc/Type/Attribute.pod6

@@ -68,7 +68,20 @@ error.
 
 Marks an attribute as deprecated, optionally with a message what to use instead.
 
-TODO: Add example when it's implemented in Rakudo.
+    class C {
+        has $.foo is DEPRECATED("'bar'");
+    }
+    my $c = C.new( foo => 42 );  # doesn't trigger with initialization (yet)
+    say $c.foo;                  # does trigger on usage
+
+B<After> the program is finished, this will show something like this on
+STDERR:
+
+    # Saw 1 occurrence of deprecated code.
+    # =====================================
+    # Method foo (from C) seen at:
+    # script.pl6, line 5
+    # Please use 'bar' instead.
 
 =head1 Methods