Use Uninstantiable repr for things that should not be instantiated.

Raku · Jul 5, 2011 · 2d4a979 · 2d4a979
1 parent a957601
commit 2d4a979
Show file tree

Hide file tree

Showing 3 changed files with 6 additions and 6 deletions.
diff --git a/src/how/NQPConcreteRoleHOW.pm b/src/how/NQPConcreteRoleHOW.pm
@@ -45,9 +45,9 @@ knowhow NQPConcreteRoleHOW {
 
     # Create a new meta-object instance, and then a new type object
     # to go with it, and return that.
-    method new_type(:$name = '<anon>', :$repr = 'P6opaque', :$instance_of!) {
+    method new_type(:$name = '<anon>', :$instance_of!) {
         my $metarole := self.new(:name($name), :instance_of($instance_of));
-        pir::repr_type_object_for__PPS($metarole, $repr);
+        pir::repr_type_object_for__PPS($metarole, 'Uninstantiable');
     }
 
     method add_method($obj, $name, $code_obj) {

diff --git a/src/how/NQPModuleHOW.pm b/src/how/NQPModuleHOW.pm
@@ -14,10 +14,10 @@ knowhow NQPModuleHOW {
 
     # Create a new meta-class instance, and then a new type object
     # to go with it, and return that.
-    method new_type(:$name = '<anon>', :$repr = 'P6opaque') {
+    method new_type(:$name = '<anon>') {
         my $metaclass := self.new(:name($name));
         pir::set_who__0PP(
-            pir::repr_type_object_for__PPS($metaclass, $repr),
+            pir::repr_type_object_for__PPS($metaclass, 'Uninstantiable'),
             {});
     }
 

diff --git a/src/how/NQPParametricRoleHOW.pm b/src/how/NQPParametricRoleHOW.pm
@@ -44,10 +44,10 @@ knowhow NQPParametricRoleHOW {
 
     # Create a new meta-class instance, and then a new type object
     # to go with it, and return that.
-    method new_type(:$name = '<anon>', :$repr = 'P6opaque') {
+    method new_type(:$name = '<anon>') {
         my $metarole := self.new(:name($name));
         pir::set_who__0PP(
-            pir::repr_type_object_for__PPS($metarole, $repr),
+            pir::repr_type_object_for__PPS($metarole, 'Uninstantiable'),
             {});
     }