--- a/Lib/IMPL/DOM/Schema.pm	Fri Nov 20 16:48:08 2009 +0300
+++ b/Lib/IMPL/DOM/Schema.pm	Mon Nov 23 00:59:06 2009 +0300
@@ -31,11 +31,13 @@
     $_[0]->{$_TypesMap}->{$_[1]};
 }
 
-#sub Create {
-#    my ($this,$nodeName,$class,$refArgs) = @_;
+sub Create {
+    my ($this,$nodeName,$class,$refArgs) = @_;
     
-#    goto &SUPER::Create unless $class eq 'IMPL::DOM::Schema::Validator'
-#}
+    die new IMPL::Exception('Invalid node class') unless $class->isa('IMPL::DOM::Schema::Node');
+    
+    goto &SUPER::Create;
+}
 
 sub Process {
     my ($this) = @_;