# $XConsortium: RIArrowBtn3.scr /main/4 1995/07/17 20:34:49 drk $
# Motif
#
# Copyright (c) 1987-2012, The Open Group. All rights reserved.
#
# These libraries and programs are free software; you can
# redistribute them and/or modify them under the terms of the GNU
# Lesser General Public License as published by the Free Software
# Foundation; either version 2 of the License, or (at your option)
# any later version.
#
# These libraries and programs are distributed in the hope that
# they will be useful, but WITHOUT ANY WARRANTY; without even the
# implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
# PURPOSE. See the GNU Lesser General Public License for more
# details.
#
# You should have received a copy of the GNU Lesser General Public
# License along with these librararies and programs; if not, write
# to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
# Floor, Boston, MA 02110-1301 USA
#
# HISTORY
# A client with arrow button pointing upwards should appear.
# Two messages should be printed in term window. The first says that
# the unitType is inches (1000TH_INCHES) and the size is set at 2000x1000.
# The next line prints out the width and height. These
# values are returned by XtGetValues. The width and height should be
# approximately, but not exactly, the same as the values in the first line.
# This is because there is a rounding difference when converting
# 1000TH_INCHES to pixels.
CompareVisual arrow
Continue
# The arrow button should change size 10 times.
# Each time, the Expected and the Returned sizes should be printed in the
# term window. The Expected values are those used in XtSetValues
# and the Returned values are those retured by XtGetValues. The Returned
# values should be approximately equal to the Expected values. This is
# because there is a rounding difference when converting 1000TH_INCHES
# to pixels.
CompareVisual arrow
Continue
# A message should be printed in the term window saying that unit type
# is being set to millimeters (100TH_MILLIMETERS).
# The arrow button should change size 10 times.
# Each time, the Expected and the Returned sizes should be printed in
# the term window. The Expected values are those used in XtSetValues
# and the Returned values are those returned by XtGetValues. The Returned
# values should be approximately equal to the Expected values. This is
# because there is a rounding difference when
# converting 100TH_MILLIMETERS to pixels.
CompareVisual arrow
Continue
# A arrow button should change size to 2000 x 1000.
# Two messages should be printed in term window. The first says that
# the size is set at 2000x1000. The next line is again the width and
# height printed out. These values are returned by XtGetValues. The
# width and height should be approximately 2000 by 1000.
# This is because there is a rounding difference when
# converting 100TH_MILLIMETERS to pixels.
CompareVisual arrow
Exit