head	1.4;
access;
symbols
	UUID_1_6_2:1.3
	UUID_1_6_1:1.3
	UUID_1_6_0:1.3
	UUID_1_5_1:1.2
	UUID_1_5_0:1.2
	UUID_1_4_2:1.2
	UUID_1_4_1:1.2
	UUID_1_4_0:1.2
	UUID_1_3_2:1.1
	UUID_1_3_1:1.1
	UUID_1_3_0:1.1;
locks; strict;
comment	@# @;


1.4
date	2008.07.05.12.58.22;	author rse;	state dead;
branches;
next	1.3;
commitid	XLXN7vUmABwPcC9t;

1.3
date	2007.01.01.18.14.57;	author rse;	state Exp;
branches;
next	1.2;
commitid	jOXiIO8S8v7xFP0s;

1.2
date	2006.01.13.06.44.33;	author rse;	state Exp;
branches;
next	1.1;
commitid	hYfQc9JIMh4bcphr;

1.1
date	2005.08.31.09.59.45;	author rse;	state Exp;
branches;
next	;


desc
@@


1.4
log
@remove OSSP uuid from CVS -- it is now versioned controlled in a Monotone repository
@
text
@##
##  OSSP uuid - Universally Unique Identifier
##  Copyright (c) 2004-2007 Ralf S. Engelschall <rse@@engelschall.com>
##  Copyright (c) 2004-2007 The OSSP Project <http://www.ossp.org/>
##  Copyright (c) 2004 Piotr Roszatycki <dexter@@debian.org>
##
##  This file is part of OSSP uuid, a library for the generation
##  of UUIDs which can found at http://www.ossp.org/pkg/lib/uuid/
##
##  Permission to use, copy, modify, and distribute this software for
##  any purpose with or without fee is hereby granted, provided that
##  the above copyright notice and this permission notice appear in all
##  copies.
##
##  THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
##  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
##  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
##  IN NO EVENT SHALL THE AUTHORS AND COPYRIGHT HOLDERS AND THEIR
##  CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
##  SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
##  LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
##  USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
##  ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
##  OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
##  OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
##  SUCH DAMAGE.
##
##  uuid_compat.ts: Data::UUID Backward Compatibility Perl API (Perl test suite part)
##

use Test::More tests => 14;

BEGIN {
    use_ok('Data::UUID');
    use Data::UUID;
};

ok($ug = new Data::UUID);

ok($uuid1 = $ug->create());
ok($uuid2 = $ug->to_hexstring($uuid1));
ok($uuid3 = $ug->from_string($uuid2));
ok($ug->compare($uuid1, $uuid3) == 0);

ok($uuid4 = $ug->to_b64string($uuid1));
ok($uuid5 = $ug->to_b64string($uuid3));
ok($uuid4 eq $uuid5);

ok($uuid6 = $ug->from_b64string($uuid5));
ok($ug->compare($uuid6, $uuid1) == 0);

ok($uuid7 = NameSpace_URL);
ok($uuid8 = $ug->from_string("6ba7b811-9dad-11d1-80b4-00c04fd430c8"));
ok($ug->compare($uuid7, $uuid8) == 0);

@


1.3
log
@Adjust copyright messages for new year 2007.
@
text
@@


1.2
log
@Adjust copyright messages for new year 2006.
@
text
@d3 2
a4 2
##  Copyright (c) 2004-2006 Ralf S. Engelschall <rse@@engelschall.com>
##  Copyright (c) 2004-2006 The OSSP Project <http://www.ossp.org/>
@


1.1
log
@Added optional Data::UUID backward compatibility Perl API which can
be enabled with the build-time option --with-perl-compat.

Submitted by: Piotr Roszatycki <dexter@@debian.org>
@
text
@d3 2
a4 2
##  Copyright (c) 2004-2005 Ralf S. Engelschall <rse@@engelschall.com>
##  Copyright (c) 2004-2005 The OSSP Project <http://www.ossp.org/>
@