r31878 -[S02, S32] kill off .notdef

[pugs-commits]

Author: masak
Date: 2010-07-30 21:46:36 +0200 (Fri, 30 Jul 2010)
New Revision: 31878

Modified:
   docs/Perl6/Spec/S02-bits.pod
   docs/Perl6/Spec/S32-setting-library/Basics.pod
Log:
[S02, S32] kill off .notdef

Not cute with methods that do negatively defined things. And !*.defined
covers the semantic hole that *.notdef was meant to fill, so no need to
keep it.

Modified: docs/Perl6/Spec/S02-bits.pod
===================================================================
--- docs/Perl6/Spec/S02-bits.pod        2010-07-30 18:41:06 UTC (rev 31877)
+++ docs/Perl6/Spec/S02-bits.pod        2010-07-30 19:46:36 UTC (rev 31878)
@@ -1045,7 +1045,7 @@
 
     @primes = grep *.prime, 2..*;
     subset Duck where *.^can('quack');
-    when *.notdef {...}
+    when !*.defined {...}
 
 These returned closures are of type C<WhateverCode:($)> or 
C<WhateverCode:($,$)>
 rather than type C<Whatever>, so constructs that do want to handle C<*>

Modified: docs/Perl6/Spec/S32-setting-library/Basics.pod
===================================================================
--- docs/Perl6/Spec/S32-setting-library/Basics.pod      2010-07-30 18:41:06 UTC 
(rev 31877)
+++ docs/Perl6/Spec/S32-setting-library/Basics.pod      2010-07-30 19:46:36 UTC 
(rev 31878)
@@ -38,9 +38,6 @@
      our Bool multi method defined ($self:) is export {...}
      our Bool multi method defined ($self: ::role ) is export {...}
 
-     our Bool multi method notdef ($self:) is export {...}
-     our Bool multi method notdef ($self: ::role ) is export {...}
-
      our multi method undefine( $self: ) is export {...}
 
      method not() {...}