--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Lib/IMPL/ORM/Schema/ValueType.pm	Mon Nov 23 17:57:07 2009 +0300
@@ -0,0 +1,22 @@
+package IMPL::ORM::Schema::ValueType;
+use strict;
+use warnings;
+
+use base qw(IMPL::DOM::Node);
+use IMPL::Class::Property;
+use IMPL::DOM::Property qw(_dom);
+
+BEGIN {
+    public _dom property name => prop_all;
+    public _dom property mapper => prop_all;
+}
+
+our %CTOR = (
+    'IMPL::DOM::Node' => sub {
+        my %args = @_;
+        $args{nodeName} = 'ValueType';
+        %args;
+    }
+);
+
+1;