/usr/local/CPAN/RDFStore/RDFStore/Vocabulary/RDFStoreContext.pm

• package RDFStore::Vocabulary::RDFStoreContext
  • createResource
  • setNodeFactory
  • END
• EOF

# *
# *     Copyright (c) 2000-2006 Alberto Reggiori <areggiori@webweaving.org>
# *                        Dirk-Willem van Gulik <dirkx@webweaving.org>
# *
# * NOTICE
# *
# * This product is distributed under a BSD/ASF like license as described in the 'LICENSE'
# * file you should have received together with this source code. If you did not get a
# * a copy of such a license agreement you can pick up one at:
# *
# *     http://rdfstore.sourceforge.net/LICENSE
# *

package RDFStore::Vocabulary::RDFStoreContext;
{
use vars qw ( $VERSION $Context $EmptyContext );
$VERSION='0.41';
use strict;
use RDFStore::Model;
use Carp;

# 
# This package provides convenient access to schema information.
# DO NOT MODIFY THIS FILE.
# It was generated automatically by RDFStore::Vocabulary::Generator
#

# Namespace URI of this schema
$RDFStore::Vocabulary::RDFStoreContext::_Namespace= "http://rdfstore.sourceforge.net/contexts/";
use RDFStore::NodeFactory;
&setNodeFactory(new RDFStore::NodeFactory());

sub createResource {
	croak "Factory ".$_[0]." is not an instance of RDFStore::NodeFactory"
		unless( (defined $_[0]) &&
                	( (ref($_[0])) && ($_[0]->isa("RDFStore::NodeFactory")) ) );

	return $_[0]->createResource($RDFStore::Vocabulary::RDFStoreContext::_Namespace,$_[1]);
};
sub setNodeFactory {
	croak "Factory ".$_[0]." is not an instance of RDFStore::NodeFactory"
		unless( (defined $_[0]) &&
                	( (ref($_[0])) && ($_[0]->isa("RDFStore::NodeFactory")) ) );
	# Context
	$RDFStore::Vocabulary::RDFStoreContext::Context = createResource($_[0], "Context");
	# Empty (NULL) Context
	$RDFStore::Vocabulary::RDFStoreContext::EmptyContext = createResource($_[0], "EmptyContext");
};
sub END {
	$RDFStore::Vocabulary::RDFStoreContext::Context = undef;
	$RDFStore::Vocabulary::RDFStoreContext::EmptyContext = undef;
};
1;
};