# $Id$

This test verifies that CodecFactory and CDR encapsulation Codec
support is working properly. 

It does so by encoding a structure into an octet sequence, decoding
into a new instance of the structure from the octet sequence, and then
comparing the contents of the two structures.

Run the test as follows:

	$ perl run_test.pl

Expected output follows:

==== Running Codec test
Testing CDR encapsulation Codec encode()/decode()
=================================================
Original
--------
1010
-3427
I'm Batman.

Extracted
---------
1010
-3427
I'm Batman.

Testing CDR encapsulation Codec encode_value()/decode_value()
=============================================================
Original
--------
1010
-3427
I'm Batman.

Extracted
---------
1010
-3427
I'm Batman.

Codec test passed.