# $XConsortium: StringToCT.scr /main/4 1995/07/17 20:47:39 drk $
# @OPENGROUP_COPYRIGHT@
# COPYRIGHT NOTICE
# Copyright (c) 1990, 1991, 1992, 1993 Open Software Foundation, Inc.
# Copyright (c) 1996, 1997, 1998, 1999, 2000 The Open Group
# ALL RIGHTS RESERVED (MOTIF).  See the file named COPYRIGHT.MOTIF for
# the full copyright text.
# 
# This software is subject to an open license. It may only be
# used on, with or for operating systems which are themselves open
# source systems. You must contact The Open Group for a license
# allowing distribution and sublicensing of this software on, with,
# or for operating systems which are not Open Source programs.
# 
# See http://www.opengroup.org/openmotif/license for full
# details of the license agreement. Any use, reproduction, or
# distribution of the program constitutes recipient's acceptance of
# this agreement.
# 
# EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, THE PROGRAM IS
# PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
# KIND, EITHER EXPRESS OR IMPLIED INCLUDING, WITHOUT LIMITATION, ANY
# WARRANTIES OR CONDITIONS OF TITLE, NON-INFRINGEMENT, MERCHANTABILITY
# OR FITNESS FOR A PARTICULAR PURPOSE
# 
# EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, NEITHER RECIPIENT
# NOR ANY CONTRIBUTORS SHALL HAVE ANY LIABILITY FOR ANY DIRECT,
# INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
# DAMAGES (INCLUDING WITHOUT LIMITATION LOST PROFITS), 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 OR DISTRIBUTION OF THE PROGRAM OR THE
# EXERCISE OF ANY RIGHTS GRANTED HEREUNDER, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGES.
# 
# 
# HISTORY

#  An XmString is created with direction, charset, text and separator
#  components.  The function XmStringGetNextComponent() is then called
#  to traverse the XmString and retrieve each component along with
#  its values.  The component types and values should be printed
#  to stdout.

#  Verify that the following values are printed:

# @) XmSTRING_COMPONENT_DIRECTION: XmSTRING_DIRECTION_R_TO_L
# @) XmSTRING_COMPONENT_CHARSET: ISO8859-1
# @) XmSTRING_COMPONENT_TEXT: This is a test.
# @) XmSTRING_COMPONENT_SEPARATOR: True
# @) XmSTRING_COMPONENT_SEPARATOR: True
# @) XmSTRING_COMPONENT_SEPARATOR: True
# @) XmSTRING_COMPONENT_DIRECTION: XmSTRING_DIRECTION_L_TO_R
# @) XmSTRING_COMPONENT_CHARSET: ISO8859-1
# @) XmSTRING_COMPONENT_TEXT: This is only a test.

# C)
Continue

#  The function XmCvtXmStringToCT() is called to convert the
#  XmString to a (char *) string in compound text format.
#  The converted string should be printed to stdout. 

#  Verify that the following string is printed:

# @) 2]This is a test.
# @)
# @)
# @) 1]This is only a test.

#  There should be two blank lines between the lines of text.

# C)
Continue

#  The function XmCvtCTToXmString() is then called to convert the
#  (char *) string in compound text format to an XmString.
#  XmStringGetNextComponent() is then called to traverse the XmString
#  and retrieve each of the components and their values.
#  The components obtained and their values should be printed to stdout.

#  Verify that the following values are printed:

# @) XmSTRING_COMPONENT_DIRECTION: XmSTRING_DIRECTION_R_TO_L
# @) XmSTRING_COMPONENT_CHARSET: ISO8859-1
# @) XmSTRING_COMPONENT_TEXT: This is a test.
# @) XmSTRING_COMPONENT_SEPARATOR: True
# @) XmSTRING_COMPONENT_SEPARATOR: True
# @) XmSTRING_COMPONENT_SEPARATOR: True
# @) XmSTRING_COMPONENT_DIRECTION: XmSTRING_DIRECTION_L_TO_R
# @) XmSTRING_COMPONENT_CHARSET: ISO8859-1
# @) XmSTRING_COMPONENT_TEXT: This is only a test.

#  The component types and component values are then compared
#  to the component types and values in the original XmString.
#  A message will be printed to stdout indicating whether
#  XmCvtCTToXmString() passed or failed based on these
#  comparison tests.

# C)
Continue
# E)
Exit