argv@island.uu.net (Dan Heller) (04/27/89)
Submitted-by: Gene Dykes <gdykes@tcgould.tn.cornell.edu>
Posting-number: Volume 3, Issue 88
Archive-name: xcu/part12
#! /bin/sh
# This is a shell archive. Remove anything before this line, then feed it
# into a shell via "sh file" or similar. To overwrite existing files,
# type "sh file -c".
# The tool that generated this appeared in the comp.sources.unix newsgroup;
# send mail to comp-sources-unix@uunet.uu.net if you want that tool.
# If this archive is complete, you will see the following message at the end:
# "End of archive 12 (of 12)."
# Contents: bin/wlm_doupdate examples/Imakefile
# examples/xcursors/README examples/xcursors/cursor_list
# examples/xcursors/mk_cursors examples/xlayout/Imakefile
# examples/xlayout/bw_manip.wl examples/xlayout/bw_shadow.wc
# examples/xlayout/bw_shadow.wl examples/xlayout/manip.wl
# examples/xlayout/xlayout.c examples/xlayout/xlayout.wh
# examples/xtbl/Imakefile examples/xtbl/_fill_
# examples/xtbl/_gravity_ examples/xtbl/_justify_
# examples/xtbl/_text_ examples/xtbl/tst1 examples/xtbl/tst12
# examples/xtbl/tst13 examples/xtbl/tst15 examples/xtbl/tst17
# examples/xtbl/tst2 examples/xtbl/tst22 examples/xtbl/tst6
# examples/xtbl/tst7 examples/xwlm/Imakefile examples/xwlm/README
# examples/xwlm/ex.modify_page examples/xwlm/ex.page_widgets
# examples/xwlm/ex.perm_widgets examples/xwlm/ex.rotate_page
# examples/xwlm/ex.wl examples/xworld/Imakefile
# examples/xworld/world.c examples/xworld/world.wc
# examples/xworld/world.wl man/CuCommand.man man/CuFloatR.man
# man/CuRc.man src/CuBmgr.h src/CuBmgrR.h src/CuButton.h
# src/CuCommand.h src/CuCopy_ds.c src/CuDeck.h src/CuFloatR.c
# src/CuFloatR.h src/CuGravityR.h src/CuJustifyR.h src/CuLabel.h
# src/CuProcedureR.h src/CuRc.h src/CuRc.l src/CuRc.y src/CuRcP.h
# src/CuResizePR.h src/CuSimpleI.h src/CuTbl.h src/CuWlm.c.ad
# src/CuWlm.h wlmCompiler/CuCopy_ds.c wlmCompiler/CuGrow.c
# wlmCompiler/CuGrow.h wlmCompiler/CuStack.h wlmCompiler/Imakefile
# Wrapped by argv@island on Mon Apr 24 15:42:31 1989
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f 'bin/wlm_doupdate' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'bin/wlm_doupdate'\"
else
echo shar: Extracting \"'bin/wlm_doupdate'\" \(118 characters\)
sed "s/^X//" >'bin/wlm_doupdate' <<'END_OF_FILE'
X#!/bin/sh
X
Xclient=$1
X
Xa=`/bin/cat $client.nc`
X
Xfor i in `echo $a | tr " " "\012"` ; do
X echo $i >> $client.wb
Xdone
END_OF_FILE
echo shar: NEWLINE appended to \"'bin/wlm_doupdate'\"
if test 119 -ne `wc -c <'bin/wlm_doupdate'`; then
echo shar: \"'bin/wlm_doupdate'\" unpacked with wrong size!
fi
chmod +x 'bin/wlm_doupdate'
# end of 'bin/wlm_doupdate'
fi
if test -f 'examples/Imakefile' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/Imakefile'\"
else
echo shar: Extracting \"'examples/Imakefile'\" \(161 characters\)
sed "s/^X//" >'examples/Imakefile' <<'END_OF_FILE'
X#define IHaveSubdirs
X#define PassCDebugFlags 'CDEBUGFLAGS=$(CDEBUGFLAGS)'
X
XSUBDIRS = xworld xlayout xtbl xwlm
X
XMakeSubdirs($(SUBDIRS))
XDependSubdirs($(SUBDIRS))
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/Imakefile'\"
if test 162 -ne `wc -c <'examples/Imakefile'`; then
echo shar: \"'examples/Imakefile'\" unpacked with wrong size!
fi
# end of 'examples/Imakefile'
fi
if test -f 'examples/xcursors/README' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xcursors/README'\"
else
echo shar: Extracting \"'examples/xcursors/README'\" \(557 characters\)
sed "s/^X//" >'examples/xcursors/README' <<'END_OF_FILE'
XThis directory shows how an "interesting" use of the widget layout
Xdescription language makes possible a utility without writing a client,
Xbut instead just making use of the "xlayout" program in the adjoining
Xdirectory.
X
XA list of X cursors was obtained in "cursor_list".
XA shell script was written that converted "cursor_list" to a fragment
Xincluded in "cursors.wl".
XThen, "cursors.wl" was compiled with wlc.
X
XThe command "xlayout cursors" produces a table of cursors as one
Xmoves the pointer into each widget. ("bwcursors" uses shadows instead
Xof facets)
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xcursors/README'\"
if test 558 -ne `wc -c <'examples/xcursors/README'`; then
echo shar: \"'examples/xcursors/README'\" unpacked with wrong size!
fi
# end of 'examples/xcursors/README'
fi
if test -f 'examples/xcursors/cursor_list' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xcursors/cursor_list'\"
else
echo shar: Extracting \"'examples/xcursors/cursor_list'\" \(787 characters\)
sed "s/^X//" >'examples/xcursors/cursor_list' <<'END_OF_FILE'
XX_cursor
XX_cursor
XX_cursor
XX_cursor
Xarrow
Xbased_arrow_down
Xbased_arrow_up
Xboat
Xbogosity
Xbottom_left_corner
Xbottom_right_corner
Xbottom_side
Xbottom_tee
Xbox_spiral
Xcenter_ptr
Xcircle
Xclock
Xcoffee_mug
Xcross
Xcross_reverse
Xcrosshair
Xdiamond_cross
Xdot
Xdotbox
Xdouble_arrow
Xdraft_large
Xdraft_small
Xdraped_box
Xexchange
Xfleur
Xgobbler
Xgumby
Xhand1
Xhand2
Xheart
Xicon
Xiron_cross
Xleft_ptr
Xleft_side
Xleft_tee
Xleftbutton
Xll_angle
Xlr_angle
Xman
Xmiddlebutton
Xmouse
Xpencil
Xpirate
Xplus
Xquestion_arrow
Xright_ptr
Xright_side
Xright_tee
Xrightbutton
Xrtl_logo
Xsailboat
Xsb_down_arrow
Xsb_h_double_arrow
Xsb_left_arrow
Xsb_right_arrow
Xsb_up_arrow
Xsb_v_double_arrow
Xshuttle
Xsizing
Xspider
Xspraycan
Xstar
Xtarget
Xtcross
Xtop_left_arrow
Xtop_left_corner
Xtop_right_corner
Xtop_side
Xtop_tee
Xtrek
Xul_angle
Xumbrella
Xur_angle
Xwatch
Xxterm
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xcursors/cursor_list'\"
if test 788 -ne `wc -c <'examples/xcursors/cursor_list'`; then
echo shar: \"'examples/xcursors/cursor_list'\" unpacked with wrong size!
fi
# end of 'examples/xcursors/cursor_list'
fi
if test -f 'examples/xcursors/mk_cursors' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xcursors/mk_cursors'\"
else
echo shar: Extracting \"'examples/xcursors/mk_cursors'\" \(127 characters\)
sed "s/^X//" >'examples/xcursors/mk_cursors' <<'END_OF_FILE'
X#!/bin/ksh
X
Xwhile [ 1 ] ; do
X read a
X if [ ! "$a" ] ; then break ; fi
X echo "CuCommand { name \"$a\" cursor \"$a\" }"
X done
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xcursors/mk_cursors'\"
if test 128 -ne `wc -c <'examples/xcursors/mk_cursors'`; then
echo shar: \"'examples/xcursors/mk_cursors'\" unpacked with wrong size!
fi
chmod +x 'examples/xcursors/mk_cursors'
# end of 'examples/xcursors/mk_cursors'
fi
if test -f 'examples/xlayout/Imakefile' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xlayout/Imakefile'\"
else
echo shar: Extracting \"'examples/xlayout/Imakefile'\" \(366 characters\)
sed "s/^X//" >'examples/xlayout/Imakefile' <<'END_OF_FILE'
X#ifdef RtArchitecture
X CC = pcc
X#endif
X XCUSRC = ../../src
X INCLUDES = -I$(TOP) -I$(XCUSRC)
X SRCS = xlayout.c
X XCULIB = $(XCUSRC)/libXcu.a
XLOCAL_LIBRARIES = $(XCULIB) $(XAWLIB) $(XMULIB) $(XTOOLLIB) $(XLIB)
X
Xall: xlayout
X
Xxlayout.o : xlayout.wh
X
XSingleProgramTarget(xlayout,xlayout.o,$(LOCAL_LIBRARIES),)
X
XDependTarget()
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xlayout/Imakefile'\"
if test 367 -ne `wc -c <'examples/xlayout/Imakefile'`; then
echo shar: \"'examples/xlayout/Imakefile'\" unpacked with wrong size!
fi
# end of 'examples/xlayout/Imakefile'
fi
if test -f 'examples/xlayout/bw_manip.wl' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xlayout/bw_manip.wl'\"
else
echo shar: Extracting \"'examples/xlayout/bw_manip.wl'\" \(269 characters\)
sed "s/^X//" >'examples/xlayout/bw_manip.wl' <<'END_OF_FILE'
XCuWlm
X{
Xname "office"
X*shadow "True"
X*font "9x15"
X*CuTbl.borderWidth "0"
X*CuButton.borderColor "White"
X*CuButton.internalWidth "10"
X*CuButton.internalHeight "5"
X*CuLabel.shadow "True"
X*CuLabel.borderColor "White"
X*CuLabel.facetWidth "1"
X
X include "manip.visible"
X}
X
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xlayout/bw_manip.wl'\"
if test 270 -ne `wc -c <'examples/xlayout/bw_manip.wl'`; then
echo shar: \"'examples/xlayout/bw_manip.wl'\" unpacked with wrong size!
fi
# end of 'examples/xlayout/bw_manip.wl'
fi
if test -f 'examples/xlayout/bw_shadow.wc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xlayout/bw_shadow.wc'\"
else
echo shar: Extracting \"'examples/xlayout/bw_shadow.wc'\" \(787 characters\)
sed "s/^X//" >'examples/xlayout/bw_shadow.wc' <<'END_OF_FILE'
X#WLDL
X3
X
X5 CuWlm
X2
X16 CuCommand.shadow 4 (True) 6 Global
X16 CuCommand.cursor 3 (dot) 6 Global
X0
X0
X1
X
X 4 CuRc
X 5
X 11 interHeight 2 (10) 5 Local
X 10 interWidth 2 (10) 5 Local
X 14 internalHeight 2 (20) 5 Local
X 13 internalWidth 2 (20) 5 Local
X 12 formatString 5 (2 x 2) 5 Local
X 0
X 0
X 4
X
X 9 CuCommand
X 3
X 6 shadow 4 (True) 5 Local
X 13 dimFacetColor 5 (black) 5 Local
X 4 name 6 (Shadow) 5 Local
X 0
X 0
X 0
X
X 9 CuCommand
X 2
X 6 shadow 5 (False) 5 Local
X 4 name 6 (Facets) 5 Local
X 0
X 0
X 0
X
X 9 CuCommand
X 2
X 9 sensitive 4 (True) 5 Local
X 4 name 9 (Sensitive) 5 Local
X 0
X 0
X 0
X
X 9 CuCommand
X 3
X 9 sensitive 5 (False) 5 Local
X 4 name 11 (INSENSITIVE) 5 Local
X 11 borderWidth 1 (0) 5 Local
X 0
X 0
X 0
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xlayout/bw_shadow.wc'\"
if test 788 -ne `wc -c <'examples/xlayout/bw_shadow.wc'`; then
echo shar: \"'examples/xlayout/bw_shadow.wc'\" unpacked with wrong size!
fi
# end of 'examples/xlayout/bw_shadow.wc'
fi
if test -f 'examples/xlayout/bw_shadow.wl' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xlayout/bw_shadow.wl'\"
else
echo shar: Extracting \"'examples/xlayout/bw_shadow.wl'\" \(451 characters\)
sed "s/^X//" >'examples/xlayout/bw_shadow.wl' <<'END_OF_FILE'
XCuWlm
X {
X *CuCommand.cursor "dot"
X *CuCommand.shadow "True"
X CuRc
X {
X formatString "2 x 2" /* equivalent to CuTbl "c c." */
X internalWidth "20"
X internalHeight "20"
X interWidth "10"
X interHeight "10"
X
X CuCommand { borderWidth "0" name "INSENSITIVE" sensitive "False" }
X CuCommand { name "Sensitive" sensitive "True" }
X CuCommand { name "Facets" shadow "False" }
X CuCommand { name "Shadow" dimFacetColor "black" shadow "True" }
X }
X }
X
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xlayout/bw_shadow.wl'\"
if test 452 -ne `wc -c <'examples/xlayout/bw_shadow.wl'`; then
echo shar: \"'examples/xlayout/bw_shadow.wl'\" unpacked with wrong size!
fi
# end of 'examples/xlayout/bw_shadow.wl'
fi
if test -f 'examples/xlayout/manip.wl' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xlayout/manip.wl'\"
else
echo shar: Extracting \"'examples/xlayout/manip.wl'\" \(354 characters\)
sed "s/^X//" >'examples/xlayout/manip.wl' <<'END_OF_FILE'
XCuWlm
X{
Xname "office"
X*highlightThickness "2"
X*dimFacetColor "SteelBlue"
X*brightFacetColor "LightSteelBlue"
X*font "9x15"
X*CuTbl.background "LightGray"
X*CuTbl.borderWidth "0"
X*CuTbl.borderColor "LightGray"
X*CuLabel.background "LightGray"
X*CuLabel.borderColor "LightGray"
X*CuLabel.foreground "black"
X*CuLabel.facetWidth "0"
X
X include "manip.visible"
X}
X
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xlayout/manip.wl'\"
if test 355 -ne `wc -c <'examples/xlayout/manip.wl'`; then
echo shar: \"'examples/xlayout/manip.wl'\" unpacked with wrong size!
fi
# end of 'examples/xlayout/manip.wl'
fi
if test -f 'examples/xlayout/xlayout.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xlayout/xlayout.c'\"
else
echo shar: Extracting \"'examples/xlayout/xlayout.c'\" \(937 characters\)
sed "s/^X//" >'examples/xlayout/xlayout.c' <<'END_OF_FILE'
X#include <stdio.h>
X#include <X11/Intrinsic.h>
X#include <X11/Cardinals.h>
X#include <X11/StringDefs.h>
X#include <X11/Shell.h>
X#include "CuWlm.h"
X
Xstatic Arg toplevel_args[] =
X {
X {XtNallowShellResize, (XtArgVal) True}
X } ;
X
Xstatic Arg wlm_args[] =
X {
X {XtNfile, (XtArgVal) NULL}
X } ;
X
XWidget toplevel, wlm ;
X
Xmain (argc, argv)
X int argc ;
X char **argv ;
X{
XCardinal i ;
X
Xif (argc < 2)
X {
X fprintf (stderr, "\nUsage: %s wlm_layout_file\n\n",
X argv[0]) ;
X exit (1) ;
X }
X
Xtoplevel = XtInitialize (NULL, "top", NULL, NULL, &argc, argv);
X
XXtSetArg (wlm_args[0], XtNfile, argv[1]) ;
XXtSetValues (toplevel, toplevel_args, XtNumber(toplevel_args)) ;
Xwlm = XtCreateManagedWidget ( "wlm", cuWlmWidgetClass, toplevel, wlm_args, ONE) ;
X
XXtRealizeWidget (toplevel) ;
X
XCuWlmSample (wlm) ;
Xfor (;;)
X {
X fprintf (stderr, "\nMaking a request...\n") ;
X CuWlmRequest ( wlm) ;
X }
X}
X
X#include "xlayout.wh"
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xlayout/xlayout.c'\"
if test 938 -ne `wc -c <'examples/xlayout/xlayout.c'`; then
echo shar: \"'examples/xlayout/xlayout.c'\" unpacked with wrong size!
fi
# end of 'examples/xlayout/xlayout.c'
fi
if test -f 'examples/xlayout/xlayout.wh' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xlayout/xlayout.wh'\"
else
echo shar: Extracting \"'examples/xlayout/xlayout.wh'\" \(660 characters\)
sed "s/^X//" >'examples/xlayout/xlayout.wh' <<'END_OF_FILE'
X#include "CuWlmP.h"
X#include "CuLabel.h"
X#include "CuWlm.h"
X#include "CuCommand.h"
X#include "CuBmgr.h"
X#include "CuButton.h"
X#include "CuDeck.h"
X#include "CuTbl.h"
X#include "CuRc.h"
X
Xvoid
Xmake_tag_class_list (ww)
X CuWlmWidget ww ;
X{
XTAG_CLASS_ENTRY(ww, "CuLabel", cuLabelWidgetClass) ;
XTAG_CLASS_ENTRY(ww, "CuWlm", cuWlmWidgetClass) ;
XTAG_CLASS_ENTRY(ww, "CuCommand", cuCommandWidgetClass) ;
XTAG_CLASS_ENTRY(ww, "CuBmgr", cuBmgrWidgetClass) ;
XTAG_CLASS_ENTRY(ww, "CuButton", cuButtonWidgetClass) ;
XTAG_CLASS_ENTRY(ww, "CuDeck", cuDeckWidgetClass) ;
XTAG_CLASS_ENTRY(ww, "CuTbl", cuTblWidgetClass) ;
XTAG_CLASS_ENTRY(ww, "CuRc", cuRcWidgetClass) ;
Xreturn ;
X}
X
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xlayout/xlayout.wh'\"
if test 661 -ne `wc -c <'examples/xlayout/xlayout.wh'`; then
echo shar: \"'examples/xlayout/xlayout.wh'\" unpacked with wrong size!
fi
# end of 'examples/xlayout/xlayout.wh'
fi
if test -f 'examples/xtbl/Imakefile' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/Imakefile'\"
else
echo shar: Extracting \"'examples/xtbl/Imakefile'\" \(330 characters\)
sed "s/^X//" >'examples/xtbl/Imakefile' <<'END_OF_FILE'
X#ifdef RtArchitecture
X CC = pcc
X#endif
X XCUSRC = ../../src
X INCLUDES = -I$(TOP) -I$(XCUSRC)
X SRCS = xtbl.c
X XCULIB = $(XCUSRC)/libXcu.a
XLOCAL_LIBRARIES = $(XCULIB) $(XAWLIB) $(XMULIB) $(XTOOLLIB) $(XLIB)
X
Xall: xtbl
X
XSingleProgramTarget(xtbl,xtbl.o,$(LOCAL_LIBRARIES),)
X
XDependTarget()
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/Imakefile'\"
if test 331 -ne `wc -c <'examples/xtbl/Imakefile'`; then
echo shar: \"'examples/xtbl/Imakefile'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/Imakefile'
fi
if test -f 'examples/xtbl/_fill_' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/_fill_'\"
else
echo shar: Extracting \"'examples/xtbl/_fill_'\" \(216 characters\)
sed "s/^X//" >'examples/xtbl/_fill_' <<'END_OF_FILE'
X2
X1
XTrue
X4
XTrue
X
X# DATA GOES ABOVE THIS LINE
X
XFirst line contains number of widgets to modify, followed by
XFor each widget to modify,
X the number of the widget to modify (0 to n-1)
X the new fill mode (True or False)
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/_fill_'\"
if test 217 -ne `wc -c <'examples/xtbl/_fill_'`; then
echo shar: \"'examples/xtbl/_fill_'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/_fill_'
fi
if test -f 'examples/xtbl/_gravity_' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/_gravity_'\"
else
echo shar: Extracting \"'examples/xtbl/_gravity_'\" \(236 characters\)
sed "s/^X//" >'examples/xtbl/_gravity_' <<'END_OF_FILE'
X5
X1 w
X2 e
X3 w
X4 e
X5 s
X
X# DATA GOES ABOVE THIS LINE
X
XFirst line contains number of widgets to modify, followed by
XFor each widget to modify,
X the number of the widget to modify (0 to n-1)
X the new gravity (n, ne, e, se, s, sw, w, nw, c)
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/_gravity_'\"
if test 237 -ne `wc -c <'examples/xtbl/_gravity_'`; then
echo shar: \"'examples/xtbl/_gravity_'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/_gravity_'
fi
if test -f 'examples/xtbl/_justify_' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/_justify_'\"
else
echo shar: Extracting \"'examples/xtbl/_justify_'\" \(242 characters\)
sed "s/^X//" >'examples/xtbl/_justify_' <<'END_OF_FILE'
X4
X1 left
X2 left
X3 right
X4 right
X
X# DATA GOES ABOVE THIS LINE
X
XFirst line contains number of widgets to modify, followed by
XFor each widget to modify,
X the number of the widget to modify (0 to n-1)
X the new justification (left, center, right)
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/_justify_'\"
if test 243 -ne `wc -c <'examples/xtbl/_justify_'`; then
echo shar: \"'examples/xtbl/_justify_'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/_justify_'
fi
if test -f 'examples/xtbl/_text_' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/_text_'\"
else
echo shar: Extracting \"'examples/xtbl/_text_'\" \(250 characters\)
sed "s/^X//" >'examples/xtbl/_text_' <<'END_OF_FILE'
X1
X0
XElvis Presley\nreturns from dead\nwith amazing new\nUFO\nsex diet
X
X# DATA GOES ABOVE THIS LINE
X
XFirst line contains number of widgets to modify, followed by
XFor each widget to modify,
X the number of the widget to modify (0 to n-1)
X the new label
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/_text_'\"
if test 251 -ne `wc -c <'examples/xtbl/_text_'`; then
echo shar: \"'examples/xtbl/_text_'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/_text_'
fi
if test -f 'examples/xtbl/tst1' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/tst1'\"
else
echo shar: Extracting \"'examples/xtbl/tst1'\" \(3 characters\)
sed "s/^X//" >'examples/xtbl/tst1' <<'END_OF_FILE'
Xc.
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/tst1'\"
if test 4 -ne `wc -c <'examples/xtbl/tst1'`; then
echo shar: \"'examples/xtbl/tst1'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/tst1'
fi
if test -f 'examples/xtbl/tst12' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/tst12'\"
else
echo shar: Extracting \"'examples/xtbl/tst12'\" \(49 characters\)
sed "s/^X//" >'examples/xtbl/tst12' <<'END_OF_FILE'
Xc s c c
Xc c ^ ^
Xc ^ ^ c
X^ c s ^
X^ c c ^
Xc s ^ c.
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/tst12'\"
if test 50 -ne `wc -c <'examples/xtbl/tst12'`; then
echo shar: \"'examples/xtbl/tst12'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/tst12'
fi
if test -f 'examples/xtbl/tst13' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/tst13'\"
else
echo shar: Extracting \"'examples/xtbl/tst13'\" \(68 characters\)
sed "s/^X//" >'examples/xtbl/tst13' <<'END_OF_FILE'
Xequal_rows ;
Xc s c c
X^ ^ ^ c
Xce c s ^
X^ c c s
X^ c s c
X^ c c c.
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/tst13'\"
if test 69 -ne `wc -c <'examples/xtbl/tst13'`; then
echo shar: \"'examples/xtbl/tst13'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/tst13'
fi
if test -f 'examples/xtbl/tst15' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/tst15'\"
else
echo shar: Extracting \"'examples/xtbl/tst15'\" \(59 characters\)
sed "s/^X//" >'examples/xtbl/tst15' <<'END_OF_FILE'
Xequal_rows equal_columns ;
Xc
Xc c
Xc c c c
Xc c c c c c c c.
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/tst15'\"
if test 60 -ne `wc -c <'examples/xtbl/tst15'`; then
echo shar: \"'examples/xtbl/tst15'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/tst15'
fi
if test -f 'examples/xtbl/tst17' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/tst17'\"
else
echo shar: Extracting \"'examples/xtbl/tst17'\" \(74 characters\)
sed "s/^X//" >'examples/xtbl/tst17' <<'END_OF_FILE'
Xequal_rows ;
Xc c c
Xc c
Xc c c c s c
Xc c s c s s
X^ ^ ^ c s c
Xc s s c s ^.
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/tst17'\"
if test 75 -ne `wc -c <'examples/xtbl/tst17'`; then
echo shar: \"'examples/xtbl/tst17'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/tst17'
fi
if test -f 'examples/xtbl/tst2' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/tst2'\"
else
echo shar: Extracting \"'examples/xtbl/tst2'\" \(3 characters\)
sed "s/^X//" >'examples/xtbl/tst2' <<'END_OF_FILE'
Xc.
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/tst2'\"
if test 4 -ne `wc -c <'examples/xtbl/tst2'`; then
echo shar: \"'examples/xtbl/tst2'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/tst2'
fi
if test -f 'examples/xtbl/tst22' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/tst22'\"
else
echo shar: Extracting \"'examples/xtbl/tst22'\" \(334 characters\)
sed "s/^X//" >'examples/xtbl/tst22' <<'END_OF_FILE'
Xequal_rows ;
Xc s s s s c s s s s s s c s s s s s
Xc s s s s s c s s s c s s s c s s s
Xc s s s s s s s s s s c s s s s s s
Xc s s s s s s ^ s s s c s s s s s s
Xc s s s s s s s s s s s s s s s s s
Xc s s s s c s s c s s c s s s s s s
Xc s s s s c s s s s c s s s s s s s
Xc s s s s c s s s s c s s s s s s s.
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/tst22'\"
if test 335 -ne `wc -c <'examples/xtbl/tst22'`; then
echo shar: \"'examples/xtbl/tst22'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/tst22'
fi
if test -f 'examples/xtbl/tst6' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/tst6'\"
else
echo shar: Extracting \"'examples/xtbl/tst6'\" \(360 characters\)
sed "s/^X//" >'examples/xtbl/tst6' <<'END_OF_FILE'
Xequal_rows tab(;);
Xc
Xc c
Xc c
Xc.
XWidget with VeryLongText. How Long You Ask? Well,\n\
Xlong enough to let the effects of\n\
XGravity and Justification\n\
Xshow clearly in the widgets below...
X___Left Justify___\nWest Gravity;___Left Justify___\nEast Gravity
X___Right Justify___\nWest Gravity;___Right Justify___\nEast Gravity
X___Center Justify___\nSouth Gravity
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/tst6'\"
if test 361 -ne `wc -c <'examples/xtbl/tst6'`; then
echo shar: \"'examples/xtbl/tst6'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/tst6'
fi
if test -f 'examples/xtbl/tst7' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xtbl/tst7'\"
else
echo shar: Extracting \"'examples/xtbl/tst7'\" \(52 characters\)
sed "s/^X//" >'examples/xtbl/tst7' <<'END_OF_FILE'
Xequal_rows ;
Xc c s c s s
X^ ^ ^ c s c
Xc s s c s ^.
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xtbl/tst7'\"
if test 53 -ne `wc -c <'examples/xtbl/tst7'`; then
echo shar: \"'examples/xtbl/tst7'\" unpacked with wrong size!
fi
# end of 'examples/xtbl/tst7'
fi
if test -f 'examples/xwlm/Imakefile' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xwlm/Imakefile'\"
else
echo shar: Extracting \"'examples/xwlm/Imakefile'\" \(970 characters\)
sed "s/^X//" >'examples/xwlm/Imakefile' <<'END_OF_FILE'
X#ifdef RtArchitecture
X CC = pcc
X#endif
X CAT = /bin/cat
X WLDL = ex.wl
X WLDLI = ex.page_widgets ex.perm_widgets ex.rotate_page ex.modify_page
X WLMBIN = ../../bin
X WLCLOC = ../../wlmCompiler
X XCUSRC = ../../src
X INCLUDES = -I$(TOP) -I$(XCUSRC)
X SRCS = xwlm.c
X XCULIB = $(XCUSRC)/libXcu.a
XLOCAL_LIBRARIES = $(XCULIB) $(XAWLIB) $(XMULIB) $(XTOOLLIB) $(XLIB)
X
Xall: wlc xwlm long
X
Xwlc :
X ln $(WLCLOC)/wlc .
X
Xxwlm.o : xwlm.wh
X
XSingleProgramTarget(xwlm,xwlm.o,$(LOCAL_LIBRARIES),)
XSingleProgramTarget(long,long.o,$(LOCAL_LIBRARIES),)
X
XDependTarget()
X
Xxwlm.wh : xwlm.wb
X @echo making xwlm.wh because of $?
X $(WLMBIN)/wlm_incl_make `$(CAT) xwlm.wb` > $@
X
Xxwlm.nc : $(WLDL)
X @echo making xwlm.nc because of $?
X $(WLMBIN)/wlm_update_class xwlm $?
X
Xxwlm.wf : xwlm.nc
X
Xxwlm.wb : xwlm.wf
X @echo making xwlm.wb because of $?
X $(WLMBIN)/wlm_doupdate xwlm
X
X$(WLDL) : $(WLDLI)
X touch $@
X
Xalways :;
X
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xwlm/Imakefile'\"
if test 971 -ne `wc -c <'examples/xwlm/Imakefile'`; then
echo shar: \"'examples/xwlm/Imakefile'\" unpacked with wrong size!
fi
# end of 'examples/xwlm/Imakefile'
fi
if test -f 'examples/xwlm/README' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xwlm/README'\"
else
echo shar: Extracting \"'examples/xwlm/README'\" \(825 characters\)
sed "s/^X//" >'examples/xwlm/README' <<'END_OF_FILE'
XTo run the test program...
X
X xwlm layout
X
XThen fool around with the buttons!
X
XFILE1/FILE2/FILE3: a "one of many" group
X One and only one is selected at a time.
X
XNEGATIVE: a "single toggle" button
X It switches between a set and an unset state
X
XMODIFICATION PAGE/ROTATION PAGE: a "double toggle" pair of buttons
X Clicking on either button causes them to swap states.
X This also activates a directive to bring in a new page on top of the
X preceding buttons.
X
XROTATION INCREMENT: a "transient" button
X It blinks when clicked, but returns to the unset state.
X
XROTATION ON/ROTATION OFF: another "double toggle"
X
XREG/GRN/BLU: an "any of many" button
X Any combination of set and unset buttons is okay
X
XFile1/File2/File3: a label
X Text depends on the "one of many" group on preceding page
X
XEXIT: a transient button
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xwlm/README'\"
if test 826 -ne `wc -c <'examples/xwlm/README'`; then
echo shar: \"'examples/xwlm/README'\" unpacked with wrong size!
fi
# end of 'examples/xwlm/README'
fi
if test -f 'examples/xwlm/ex.modify_page' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xwlm/ex.modify_page'\"
else
echo shar: Extracting \"'examples/xwlm/ex.modify_page'\" \(744 characters\)
sed "s/^X//" >'examples/xwlm/ex.modify_page' <<'END_OF_FILE'
XCuTbl {
X formatString "c\nc."
X name "modification page"
X CuBmgr {
X name "files"
X if setCallback (String "FILE1" == x)
X XtSetValues (CuLabel "FILEX", label "File1")
X if setCallback (String "FILE2" == x)
X XtSetValues (CuLabel "FILEX", label "File2")
X if setCallback (String "FILE3" == x)
X XtSetValues (CuLabel "FILEX", label "File3")
X if setCallback (String "FILE3" == x)
X XtSetValues (CuBmgr "files", bmgrType "AnyOfMany")
X bmgrType "OneOfMany"
X manage "FILE1" "FILE2" "FILE3"
X CuTbl {
X CuButton { name "FILE1" set "True" }
X CuButton { name "FILE2" }
X CuButton { name "FILE3" }
X }
X }
X CuBmgr {
X name "pos_neg"
X bmgrType "SingleToggle"
X manage "NEGATIVE"
X CuButton { name "NEGATIVE" set "False" }
X }
X }
X
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xwlm/ex.modify_page'\"
if test 745 -ne `wc -c <'examples/xwlm/ex.modify_page'`; then
echo shar: \"'examples/xwlm/ex.modify_page'\" unpacked with wrong size!
fi
# end of 'examples/xwlm/ex.modify_page'
fi
if test -f 'examples/xwlm/ex.page_widgets' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xwlm/ex.page_widgets'\"
else
echo shar: Extracting \"'examples/xwlm/ex.page_widgets'\" \(79 characters\)
sed "s/^X//" >'examples/xwlm/ex.page_widgets' <<'END_OF_FILE'
XCuDeck {
X name "pages"
X include "ex.rotate_page"
X include "ex.modify_page"
X }
X
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xwlm/ex.page_widgets'\"
if test 80 -ne `wc -c <'examples/xwlm/ex.page_widgets'`; then
echo shar: \"'examples/xwlm/ex.page_widgets'\" unpacked with wrong size!
fi
# end of 'examples/xwlm/ex.page_widgets'
fi
if test -f 'examples/xwlm/ex.perm_widgets' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xwlm/ex.perm_widgets'\"
else
echo shar: Extracting \"'examples/xwlm/ex.perm_widgets'\" \(616 characters\)
sed "s/^X//" >'examples/xwlm/ex.perm_widgets' <<'END_OF_FILE'
XCuBmgr {
X bmgrType "DoubleToggle"
X manage "MODIFICATION\nPAGE" "ROTATION\nPAGE"
X if setCallback (String "MODIFICATION\nPAGE" == x)
X RaiseWidget (CuDeck "pages", CuTbl "modification page")
X if setCallback (String "ROTATION\nPAGE" == x)
X RaiseWidget (CuDeck "pages", CuTbl "rotation page")
X
X CuTbl {
X CuButton { name "MODIFICATION\nPAGE" set "True" }
X CuButton {
X name "ROTATION\nPAGE"
X biggestCuLabel "ABCDEFGHIJKLMNOPQRS\n123"
X }
X }
X }
XCuBmgr {
X name "exit_button"
X bmgrType "Transient"
X manage "EXIT"
X CuButton { name "EXIT" }
X }
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xwlm/ex.perm_widgets'\"
if test 617 -ne `wc -c <'examples/xwlm/ex.perm_widgets'`; then
echo shar: \"'examples/xwlm/ex.perm_widgets'\" unpacked with wrong size!
fi
# end of 'examples/xwlm/ex.perm_widgets'
fi
if test -f 'examples/xwlm/ex.rotate_page' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xwlm/ex.rotate_page'\"
else
echo shar: Extracting \"'examples/xwlm/ex.rotate_page'\" \(694 characters\)
sed "s/^X//" >'examples/xwlm/ex.rotate_page' <<'END_OF_FILE'
XCuTbl {
X name "rotation page"
X formatString "c\nc\nc\nc."
X CuBmgr {
X name "rotation increment"
X bmgrType "Transient"
X manage "ROTATION INCREMENT"
X CuButton { name "ROTATION INCREMENT" }
X }
X CuBmgr {
X name "switch"
X bmgrType "DoubleToggle"
X manage "ROTATION ON" : Boolean "True"
X manage "ROTATION OFF" : Boolean "False"
X CuTbl {
X CuButton { name "ROTATION ON" }
X CuButton { name "ROTATION OFF" set "True" }
X }
X }
X CuBmgr {
X name "banks"
X bmgrType "AnyOfMany"
X manage "RED" : Int "0", "GRN" : Int "1", "BLU" : Int "2"
X CuTbl {
X CuButton { name "RED" }
X CuButton { name "GRN" }
X CuButton { name "BLU" }
X }
X }
X CuLabel { name "FILEX" } /* current file */
X }
X
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xwlm/ex.rotate_page'\"
if test 695 -ne `wc -c <'examples/xwlm/ex.rotate_page'`; then
echo shar: \"'examples/xwlm/ex.rotate_page'\" unpacked with wrong size!
fi
# end of 'examples/xwlm/ex.rotate_page'
fi
if test -f 'examples/xwlm/ex.wl' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xwlm/ex.wl'\"
else
echo shar: Extracting \"'examples/xwlm/ex.wl'\" \(135 characters\)
sed "s/^X//" >'examples/xwlm/ex.wl' <<'END_OF_FILE'
XCuWlm {
X *shadow "True"
X CuTbl {
X formatString "padding(10);c\nc."
X include "ex.page_widgets"
X include "ex.perm_widgets"
X }
X }
X
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xwlm/ex.wl'\"
if test 136 -ne `wc -c <'examples/xwlm/ex.wl'`; then
echo shar: \"'examples/xwlm/ex.wl'\" unpacked with wrong size!
fi
# end of 'examples/xwlm/ex.wl'
fi
if test -f 'examples/xworld/Imakefile' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xworld/Imakefile'\"
else
echo shar: Extracting \"'examples/xworld/Imakefile'\" \(374 characters\)
sed "s/^X//" >'examples/xworld/Imakefile' <<'END_OF_FILE'
X#ifdef RtArchitecture
X CC = pcc
X#endif
X XCUSRC = ../../src
X INCLUDES = -I$(TOP) -I$(XCUSRC)
X SRCS = world.c
X XCULIB = $(XCUSRC)/libXcu.a
XLOCAL_LIBRARIES = $(XCULIB) $(XAWLIB) $(XMULIB) $(XTOOLLIB) $(XLIB)
X
Xall: world world.wc
X
Xworld.wc : world.wl
X wlc world
X
XSingleProgramTarget(world,world.o,$(LOCAL_LIBRARIES),)
X
XDependTarget()
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xworld/Imakefile'\"
if test 375 -ne `wc -c <'examples/xworld/Imakefile'`; then
echo shar: \"'examples/xworld/Imakefile'\" unpacked with wrong size!
fi
# end of 'examples/xworld/Imakefile'
fi
if test -f 'examples/xworld/world.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xworld/world.c'\"
else
echo shar: Extracting \"'examples/xworld/world.c'\" \(882 characters\)
sed "s/^X//" >'examples/xworld/world.c' <<'END_OF_FILE'
X/***/
X#include <X11/Intrinsic.h>
X#include <X11/StringDefs.h>
X#include <X11/Shell.h>
X/***/
X#include "CuWlm.h"
Xstatic void exit_routine () ;
Xstatic Arg wlm_arg ;
X/***/
Xmain(argc, argv)
X int argc ;
X char **argv ;
X{
XWidget top, wlm_id ;
X/***/
Xtop = XtInitialize ( NULL, "top", NULL, NULL, &argc, argv ) ;
XXtSetArg (wlm_arg, XtNfile, argv[1]) ;
Xwlm_id = XtCreateManagedWidget ( "wlm", cuWlmWidgetClass, top, &wlm_arg, 1 ) ;
X/***/
XCuWlmAddCallback ( wlm_id, NULL, "CuCommand", "exit", "callback", exit_routine, NULL ) ;
XXtRealizeWidget (top) ;
X/***/
Xfor (;;) {
X CuWlmRequest ( wlm_id ) ;
X }
X}
Xstatic void
Xexit_routine ()
X{
Xexit (0) ;
X}
X
X/***/
X#include "CuWlmP.h"
X#include "CuWlm.h"
X#include "CuCommand.h"
X
Xvoid
Xmake_tag_class_list (ww)
X CuWlmWidget ww ;
X{
XTAG_CLASS_ENTRY(ww, "CuWlm", cuWlmWidgetClass) ;
XTAG_CLASS_ENTRY(ww, "CuCommand", cuCommandWidgetClass) ;
Xreturn ;
X}
X/***/
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xworld/world.c'\"
if test 883 -ne `wc -c <'examples/xworld/world.c'`; then
echo shar: \"'examples/xworld/world.c'\" unpacked with wrong size!
fi
# end of 'examples/xworld/world.c'
fi
if test -f 'examples/xworld/world.wc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xworld/world.wc'\"
else
echo shar: Extracting \"'examples/xworld/world.wc'\" \(122 characters\)
sed "s/^X//" >'examples/xworld/world.wc' <<'END_OF_FILE'
X#WLDL
X2
X
X5 CuWlm
X0
X0
X0
X1
X
X 9 CuCommand
X 2
X 5 label 16 (Good-bye, world!) 5 Local
X 4 name 4 (exit) 5 Local
X 0
X 0
X 0
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xworld/world.wc'\"
if test 123 -ne `wc -c <'examples/xworld/world.wc'`; then
echo shar: \"'examples/xworld/world.wc'\" unpacked with wrong size!
fi
# end of 'examples/xworld/world.wc'
fi
if test -f 'examples/xworld/world.wl' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'examples/xworld/world.wl'\"
else
echo shar: Extracting \"'examples/xworld/world.wl'\" \(69 characters\)
sed "s/^X//" >'examples/xworld/world.wl' <<'END_OF_FILE'
XCuWlm {
X CuCommand {
X name "exit"
X label "Good-bye, world!"
X }
X }
END_OF_FILE
echo shar: NEWLINE appended to \"'examples/xworld/world.wl'\"
if test 70 -ne `wc -c <'examples/xworld/world.wl'`; then
echo shar: \"'examples/xworld/world.wl'\" unpacked with wrong size!
fi
# end of 'examples/xworld/world.wl'
fi
if test -f 'man/CuCommand.man' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'man/CuCommand.man'\"
else
echo shar: Extracting \"'man/CuCommand.man'\" \(876 characters\)
sed "s/^X//" >'man/CuCommand.man' <<'END_OF_FILE'
X.TH CuCommand 3X "\fBCornell University Widget Set\fR"
X.ad b
X.de}F
X.ds)H Program of Computer Graphics
X.ev1
X.}E
X.if\\n()s 'sp |\\n(.pu-1v-1p
X.if\\n()t 'sp |\\n(.pu-3v
X.ifn 'sp |\\n(.pu-4v
X.tl\\*()H- % -\\*(]W
X'bp
X.ev
X..
X.SH NAME
XCuCommand \- Display labels in a set or unset state.
X.ne 4
X.SH CLASS HIERARCHY
X\
X.br
XCore / CuSimple / CuLabel / CuCommand
X.ne 4
X.SH NEW RESOURCES
X\
X.br
X.TS
Xallbox tab(;);
Xc s s s.
XCuCommand Resources
X.T&
XlB lB lB lB.
XName;Type;Default;Description
X_
X.T&
XlB l l l.
XXtNcallback;Callback;;Btn1Down and Btn1Up events
XXtNcursor;Cursor;"dot";Provides a default cursor
X.TE
X.ne 4
X.SH DESCRIPTION
X\
X.br
XBehaves pretty much the same as the X11R2 Xaw \fBCommand\fR widget.
X.ne 4
X.SH SEE ALSO
X\
X.br
XCuLabel(3X), CuSimple(3X)
X.ne 4
X.SH AUTHOR
X\
X.br
XGene Dykes, \fIgwd@freedom.tn.cornell.edu\fR
X.br
XProgram of Computer Graphics, Cornell University
X
END_OF_FILE
echo shar: NEWLINE appended to \"'man/CuCommand.man'\"
echo shar: 4 control characters may be missing from \"'man/CuCommand.man'\"
if test 877 -ne `wc -c <'man/CuCommand.man'`; then
echo shar: \"'man/CuCommand.man'\" unpacked with wrong size!
fi
# end of 'man/CuCommand.man'
fi
if test -f 'man/CuFloatR.man' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'man/CuFloatR.man'\"
else
echo shar: Extracting \"'man/CuFloatR.man'\" \(787 characters\)
sed "s/^X//" >'man/CuFloatR.man' <<'END_OF_FILE'
X.TH CuFloatR 3X "\fBCornell University Widget Set\fR"
X.ad b
X.de}F
X.ds)H Program of Computer Graphics
X.ev1
X.}E
X.if\\n()s 'sp |\\n(.pu-1v-1p
X.if\\n()t 'sp |\\n(.pu-3v
X.ifn 'sp |\\n(.pu-4v
X.tl\\*()H- % -\\*(]W
X'bp
X.ev
X..
X.SH NAME
XCuFloatR \- Float resource for CuWidgets
X.sp
X.TS
Xtab(;);
X|c s s s s|.
X_
XCuFloat Resource
X.T&
X|lB |lB |lB |lB s|.
X_
XName;Type;Converter Registration;Converts
X.T&
X|lB |lB |lB |lB cB|.
X ; ; ;From;To
X=
X.T&
X|lB l l l l|.
XXtNlineFactor;float;CuAddStringToFloatConverter();Any string;
X ; ; ;acceptable;float
X ; ; ;to \fBsscanf()\fR;
X_
X.TE
X.ne 4
X.SH NOTE
X\
X.br
XAutomatically called by the class_initialize procedure of \fBCuLabel\fR.
X.ne 4
X.SH AUTHOR
X\
X.br
XGene Dykes, \fIgwd@freedom.tn.cornell.edu\fR
X.br
XProgram of Computer Graphics, Cornell University
X
END_OF_FILE
echo shar: NEWLINE appended to \"'man/CuFloatR.man'\"
echo shar: 4 control characters may be missing from \"'man/CuFloatR.man'\"
if test 788 -ne `wc -c <'man/CuFloatR.man'`; then
echo shar: \"'man/CuFloatR.man'\" unpacked with wrong size!
fi
# end of 'man/CuFloatR.man'
fi
if test -f 'man/CuRc.man' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'man/CuRc.man'\"
else
echo shar: Extracting \"'man/CuRc.man'\" \(1011 characters\)
sed "s/^X//" >'man/CuRc.man' <<'END_OF_FILE'
X.TH CuRc 3X "\fBCornell University Widget Set\fR"
X.ad b
X.de}F
X.ds)H Program of Computer Graphics
X.ev1
X.}E
X.if\\n()s 'sp |\\n(.pu-1v-1p
X.if\\n()t 'sp |\\n(.pu-3v
X.ifn 'sp |\\n(.pu-4v
X.tl\\*()H- % -\\*(]W
X'bp
X.ev
X..
X.SH NAME
XCuRc \- Geometry management according to "row by column" specifications
X.ne 4
X.SH CLASS HIERARCHY
X\
X.br
XCore / Composite / Constraint / CuTbl / CuRc
X
X.ne 4
X.SH DESCRIPTION
X\
X.br
XThe \fBRc\fR geometry manager
Xlays out a fixed number of widgets in an \fInr\fR by \fInc\fR array.
XThe input semantics are simply "\fInr\fR X \fInc\fR", which is
Xconverted into the appropriate \fBCuTbl\fR format.
XAlthough not awfully useful in itself, it should serve as a template for
Xmore ambitious endeavors.
X
X.ne 4
X.SH DIAGNOSTICS
X\
X.br
XLex and yacc parsing errors are reported.
X
X.ne 10
X.SH EXAMPLES
X\
X.br
X.sp
X.TS
Xallbox tab(;);
Xc c c.
X#1;#2;#3
X#4;#5;#6
X.TE
X.sp
X2 X 3
X
X.ne 4
X.SH AUTHOR
X\
X.br
XGene Dykes, \fIgwd@freedom.tn.cornell.edu\fR
X.br
XProgram of Computer Graphics, Cornell University
X
END_OF_FILE
echo shar: NEWLINE appended to \"'man/CuRc.man'\"
echo shar: 4 control characters may be missing from \"'man/CuRc.man'\"
if test 1012 -ne `wc -c <'man/CuRc.man'`; then
echo shar: \"'man/CuRc.man'\" unpacked with wrong size!
fi
# end of 'man/CuRc.man'
fi
if test -f 'src/CuBmgr.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuBmgr.h'\"
else
echo shar: Extracting \"'src/CuBmgr.h'\" \(656 characters\)
sed "s/^X//" >'src/CuBmgr.h' <<'END_OF_FILE'
X#ifndef _Cu_Bmgr_h
X#define _Cu_Bmgr_h
X
X#define XtNsetCallback "setCallback"
X#define XtNunsetCallback "unsetCallback"
X#define XtNillegalCallback "illegalCallback"
X#define XtNdownAction "downAction"
X/*** For future use
X#define XtNminSet "minSet"
X#define XtNmaxSet "maxSet"
X#define XtNselectable "selectable"
X***/
X
X/* Class record constants */
X
Xextern WidgetClass cuBmgrWidgetClass;
X
Xtypedef struct _CuBmgrClassRec *CuBmgrWidgetClass;
Xtypedef struct _CuBmgrRec *CuBmgrWidget;
X
X/* Publically available routines */
X
Xvoid CuBmgrManage () ;
Xvoid CuBmgrSample () ;
Xvoid CuBmgrSetAll () ;
Xvoid CuBmgrUnsetAll () ;
Xvoid CuBmgrToggleAll () ;
X
X#endif _Cu_Bmgr_h
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuBmgr.h'\"
if test 657 -ne `wc -c <'src/CuBmgr.h'`; then
echo shar: \"'src/CuBmgr.h'\" unpacked with wrong size!
fi
# end of 'src/CuBmgr.h'
fi
if test -f 'src/CuBmgrR.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuBmgrR.h'\"
else
echo shar: Extracting \"'src/CuBmgrR.h'\" \(369 characters\)
sed "s/^X//" >'src/CuBmgrR.h' <<'END_OF_FILE'
X#ifndef _Cu_Bmgr_e
X#define _Cu_Bmgr_e
X
Xtypedef enum
X {
X CuBmgrTransient
X ,CuBmgrSingleToggle
X ,CuBmgrDoubleToggle
X ,CuBmgrOneOfMany
X ,CuBmgrAnyOfMany
X ,CuBmgrHelp
X } CuBmgrType ;
X
X#define XtNbmgrType "bmgrType"
X#define XtCCuBmgrType "CuBmgrType"
X#define XtRCuBmgrType "CuBmgrType"
X
Xvoid CuAddStringToBmgrTypeConverter () ;
X
X#endif _Cu_Bmgr_e
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuBmgrR.h'\"
if test 370 -ne `wc -c <'src/CuBmgrR.h'`; then
echo shar: \"'src/CuBmgrR.h'\" unpacked with wrong size!
fi
# end of 'src/CuBmgrR.h'
fi
if test -f 'src/CuButton.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuButton.h'\"
else
echo shar: Extracting \"'src/CuButton.h'\" \(395 characters\)
sed "s/^X//" >'src/CuButton.h' <<'END_OF_FILE'
X
X#ifndef _Cu_Button_h
X#define _Cu_Button_h
X
X/*
X * CuButton Widget
X */
X
X#define XtNcallback "callback"
X#define XtNhighlightThickness "highlightThickness"
X#define XtNtranslations "translations"
X#define XtNset "set"
X
Xextern WidgetClass cuButtonWidgetClass;
X
Xtypedef struct _CuButtonClassRec *CuButtonWidgetClass;
Xtypedef struct _CuButtonRec *CuButtonWidget;
X
X#endif _Cu_Button_h
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuButton.h'\"
if test 396 -ne `wc -c <'src/CuButton.h'`; then
echo shar: \"'src/CuButton.h'\" unpacked with wrong size!
fi
# end of 'src/CuButton.h'
fi
if test -f 'src/CuCommand.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuCommand.h'\"
else
echo shar: Extracting \"'src/CuCommand.h'\" \(447 characters\)
sed "s/^X//" >'src/CuCommand.h' <<'END_OF_FILE'
X#ifndef _Cu_Command_h
X#define _Cu_Command_h
X
X/***********************************************************************
X *
X * CuCommand Widget
X *
X ***********************************************************************/
X
X#include "disclaimer.h"
X#include "CuLabel.h"
X
Xextern WidgetClass cuCommandWidgetClass;
X
Xtypedef struct _CuCommandClassRec *CuCommandWidgetClass;
Xtypedef struct _CuCommandRec *CuCommandWidget;
X
X
X#endif _Cu_Command_h
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuCommand.h'\"
if test 448 -ne `wc -c <'src/CuCommand.h'`; then
echo shar: \"'src/CuCommand.h'\" unpacked with wrong size!
fi
# end of 'src/CuCommand.h'
fi
if test -f 'src/CuCopy_ds.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuCopy_ds.c'\"
else
echo shar: Extracting \"'src/CuCopy_ds.c'\" \(426 characters\)
sed "s/^X//" >'src/CuCopy_ds.c' <<'END_OF_FILE'
X/*
X * Given the address of a pointer to a target character string, and
X * a string to be copied, this function allocates space for the target
X * and copies the string into the target.
X */
X
Xvoid
XCu_copy_ds (destination, source)
X char **destination ;
X char *source ;
X{
Xchar *strcpy() ;
Xchar *temp = source ;
X*destination = (char *) XtMalloc ((strlen(temp)+1) * sizeof (char)) ;
Xstrcpy (*destination, temp) ;
X
Xreturn ;
X}
X
X
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuCopy_ds.c'\"
if test 427 -ne `wc -c <'src/CuCopy_ds.c'`; then
echo shar: \"'src/CuCopy_ds.c'\" unpacked with wrong size!
fi
# end of 'src/CuCopy_ds.c'
fi
if test -f 'src/CuDeck.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuDeck.h'\"
else
echo shar: Extracting \"'src/CuDeck.h'\" \(581 characters\)
sed "s/^X//" >'src/CuDeck.h' <<'END_OF_FILE'
X#ifndef _Cu_Deck_h
X#define _Cu_Deck_h
X
X/*
X * Superclass Public Include File
X */
X
X#include <X11/Composite.h>
X#include "CuResizePR.h"
X
X/*
X * New Resource Names
X */
X
X#define XtNinternalWidth "internalWidth"
X#define XtNinternalHeight "internalHeight"
X
X/*
X * Widget Type Definition
X */
X
Xtypedef struct _CuDeckClassRec *CuDeckWidgetClass;
Xtypedef struct _CuDeckRec *CuDeckWidget;
X
X/*
X * Class Record Pointer
X */
X
Xextern WidgetClass cuDeckWidgetClass;
X
X/*
X * Public Procedures
X */
X
Xvoid CuDeckRaiseWidget () ;
Xvoid CuDeckRaiseLowest () ;
Xvoid CuDeckLowerHighest () ;
X
X#endif _Cu_Deck_h
X
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuDeck.h'\"
if test 582 -ne `wc -c <'src/CuDeck.h'`; then
echo shar: \"'src/CuDeck.h'\" unpacked with wrong size!
fi
# end of 'src/CuDeck.h'
fi
if test -f 'src/CuFloatR.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuFloatR.c'\"
else
echo shar: Extracting \"'src/CuFloatR.c'\" \(990 characters\)
sed "s/^X//" >'src/CuFloatR.c' <<'END_OF_FILE'
X#include <X11/Intrinsic.h>
X#include <X11/StringDefs.h>
X#include "CuFloatR.h"
X
X/**
X *** Resource Converter Name
X **/
X
Xstatic void CvtStringToFloat() ;
X
X/**
X *** Resource Converter AddConverter Routine
X **/
X
Xvoid
XCuAddStringToFloatConverter ()
X{
Xstatic Boolean first_time = True ;
Xif (first_time)
X {
X XtAddConverter( XtRString, XtRFloat, CvtStringToFloat, NULL, 0 ) ;
X first_time = False ;
X }
Xreturn ;
X}
X
X/**
X *** Resource Converter Routine
X **/
X
X#define done(address, type) \
X { (*toVal).size = sizeof(type); (*toVal).addr = (caddr_t) address; }
X
Xstatic void CvtStringToFloat(args, num_args, fromVal, toVal)
X XrmValuePtr args;
X Cardinal *num_args;
X XrmValuePtr fromVal;
X XrmValuePtr toVal;
X{
X static float f;
X
X if (*num_args != 0)
X XtWarning("String to Float conversion needs no extra arguments");
X
X if (sscanf((char *)fromVal->addr, "%f", &f) == 1)
X {
X done (&f, float);
X }
X else
X {
X XtStringConversionWarning((char *) fromVal->addr, "Float");
X }
X}
X
X
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuFloatR.c'\"
if test 991 -ne `wc -c <'src/CuFloatR.c'`; then
echo shar: \"'src/CuFloatR.c'\" unpacked with wrong size!
fi
# end of 'src/CuFloatR.c'
fi
if test -f 'src/CuFloatR.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuFloatR.h'\"
else
echo shar: Extracting \"'src/CuFloatR.h'\" \(161 characters\)
sed "s/^X//" >'src/CuFloatR.h' <<'END_OF_FILE'
X
X#ifndef _Cu_Float_e
X#define _Cu_Float_e
X
X#define XtCLineFactor "LineFactor"
X#define XtRFloat "Float"
X
Xvoid CuAddStringToFloatConverter () ;
X
X#endif _Cu_Float_e
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuFloatR.h'\"
if test 162 -ne `wc -c <'src/CuFloatR.h'`; then
echo shar: \"'src/CuFloatR.h'\" unpacked with wrong size!
fi
# end of 'src/CuFloatR.h'
fi
if test -f 'src/CuGravityR.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuGravityR.h'\"
else
echo shar: Extracting \"'src/CuGravityR.h'\" \(501 characters\)
sed "s/^X//" >'src/CuGravityR.h' <<'END_OF_FILE'
X#ifndef _Cu_Gravity_e
X#define _Cu_Gravity_e
X
X#define XtNgravity "gravity"
X#define XtCGravity "Gravity"
X#define XtRGravity "Gravity"
X
Xtypedef enum
X {
X CuNoGravity
X ,CuNorthGravity /* Move text space to one of the 9 directions */
X ,CuNorthEastGravity
X ,CuEastGravity
X ,CuSouthEastGravity
X ,CuSouthGravity
X ,CuSouthWestGravity
X ,CuWestGravity
X ,CuNorthWestGravity
X ,CuCenterGravity
X } CuGravity ;
X
Xvoid CuAddStringToGravityConverter () ;
X
X#endif _Cu_Gravity_e
X
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuGravityR.h'\"
if test 502 -ne `wc -c <'src/CuGravityR.h'`; then
echo shar: \"'src/CuGravityR.h'\" unpacked with wrong size!
fi
# end of 'src/CuGravityR.h'
fi
if test -f 'src/CuJustifyR.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuJustifyR.h'\"
else
echo shar: Extracting \"'src/CuJustifyR.h'\" \(488 characters\)
sed "s/^X//" >'src/CuJustifyR.h' <<'END_OF_FILE'
X
X#ifndef _Cu_Justify_e
X#define _Cu_Justify_e
X
X/*** Xtk already defines these
X#define XtNjustify "justify"
X#define XtCJustify "Justify"
X#define XtRJustify "Justify"
X***/
X
Xtypedef enum
X {
X CuJustifyLeft, /* justify text to left side of text space */
X CuJustifyCenter, /* justify text in center of text space */
X CuJustifyRight /* justify text to right side of text space */
X } CuJustify;
X
Xvoid CuAddStringToJustifyConverter () ;
X
X#endif _Cu_Justify_e
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuJustifyR.h'\"
if test 489 -ne `wc -c <'src/CuJustifyR.h'`; then
echo shar: \"'src/CuJustifyR.h'\" unpacked with wrong size!
fi
# end of 'src/CuJustifyR.h'
fi
if test -f 'src/CuLabel.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuLabel.h'\"
else
echo shar: Extracting \"'src/CuLabel.h'\" \(356 characters\)
sed "s/^X//" >'src/CuLabel.h' <<'END_OF_FILE'
X#ifndef _Cu_Label_h
X#define _Cu_Label_h
X
X#include "CuJustifyR.h"
X#include "CuGravityR.h"
X
X#define XtNlineFactor "lineFactor"
X#define XtNbiggestLabel "biggestLabel"
X
X/* Class record constants */
X
Xextern WidgetClass cuLabelWidgetClass;
X
Xtypedef struct _CuLabelClassRec *CuLabelWidgetClass;
Xtypedef struct _CuLabelRec *CuLabelWidget;
X
X#endif _Cu_Label_h
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuLabel.h'\"
if test 357 -ne `wc -c <'src/CuLabel.h'`; then
echo shar: \"'src/CuLabel.h'\" unpacked with wrong size!
fi
# end of 'src/CuLabel.h'
fi
if test -f 'src/CuProcedureR.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuProcedureR.h'\"
else
echo shar: Extracting \"'src/CuProcedureR.h'\" \(301 characters\)
sed "s/^X//" >'src/CuProcedureR.h' <<'END_OF_FILE'
X#ifndef _Cu_Procedure_list_h_
X#define _Cu_Procedure_list_h_
X
X#define XtNprocedureList "procedureList"
X#define XtCProcedureList "ProcedureList"
X#define XtRProcedureList "ProcedureList"
X
Xtypedef struct
X {
X String name ;
X XtProc procedure ;
X } XtProcedureList ;
X
X#endif _Cu_Procedure_list_h_
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuProcedureR.h'\"
if test 302 -ne `wc -c <'src/CuProcedureR.h'`; then
echo shar: \"'src/CuProcedureR.h'\" unpacked with wrong size!
fi
# end of 'src/CuProcedureR.h'
fi
if test -f 'src/CuRc.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuRc.h'\"
else
echo shar: Extracting \"'src/CuRc.h'\" \(196 characters\)
sed "s/^X//" >'src/CuRc.h' <<'END_OF_FILE'
X#ifndef _Cu_Rc_h
X#define _Cu_Rc_h
X
X#include "CuTbl.h"
X
Xtypedef struct _CuRcClassRec *CuRcWidgetClass;
Xtypedef struct _CuRcRec *CuRcWidget;
X
Xextern WidgetClass cuRcWidgetClass;
X
X#endif _Cu_Rc_h
X
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuRc.h'\"
if test 197 -ne `wc -c <'src/CuRc.h'`; then
echo shar: \"'src/CuRc.h'\" unpacked with wrong size!
fi
# end of 'src/CuRc.h'
fi
if test -f 'src/CuRc.l' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuRc.l'\"
else
echo shar: Extracting \"'src/CuRc.l'\" \(432 characters\)
sed "s/^X//" >'src/CuRc.l' <<'END_OF_FILE'
X%{
X
X#undef input
X#undef unput
X
X%}
X
X%%
X
X[0-9]+ /* number string */
X {
X yylval.i_val = atoi (yytext) ;
X return NUMBER ;
X }
X
Xx /* x */
X {
X return yytext[0] ;
X }
X
X[ \t\n]* /* white space */
X {
X ;
X }
X
X. /* anything else */
X {
X char *my_text = "Rc.lex error with (%s)\n" ;
X char *etext = (char *) XtMalloc (strlen(my_text) + strlen(yytext)) ;
X sprintf (etext, my_text, yytext) ;
X XtError (etext) ;
X }
X%%
X
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuRc.l'\"
if test 433 -ne `wc -c <'src/CuRc.l'`; then
echo shar: \"'src/CuRc.l'\" unpacked with wrong size!
fi
# end of 'src/CuRc.l'
fi
if test -f 'src/CuRc.y' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuRc.y'\"
else
echo shar: Extracting \"'src/CuRc.y'\" \(472 characters\)
sed "s/^X//" >'src/CuRc.y' <<'END_OF_FILE'
X%{
X
X%}
X
X%start init
X
X%union {
X float f_val ;
X int i_val ;
X char *s_val ;
X char c_val ;
X }
X
X%token <i_val> NUMBER
X%token ERROR
X
X%%
X
Xinit :
X | init row
X ;
X
Xrow : NUMBER x NUMBER
X {
X int i, j ;
X for (i=0; i < $1; i++)
X {
X for (j=0; j < $3; j++)
X {
X *output_format++ = 'c' ;
X *output_format++ = ' ' ;
X }
X if (i < $1 - 1)
X *output_format++ = '\n' ;
X else
X *output_format++ = '.' ;
X }
X }
X
X ;
X
Xx : 'x'
X | 'X'
X ;
X
X%%
X
X#include "CuRc.lex.c"
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuRc.y'\"
if test 473 -ne `wc -c <'src/CuRc.y'`; then
echo shar: \"'src/CuRc.y'\" unpacked with wrong size!
fi
# end of 'src/CuRc.y'
fi
if test -f 'src/CuRcP.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuRcP.h'\"
else
echo shar: Extracting \"'src/CuRcP.h'\" \(1049 characters\)
sed "s/^X//" >'src/CuRcP.h' <<'END_OF_FILE'
X/* CuRc widget private definitions */
X
X#ifndef _Cu_RcP_h
X#define _Cu_RcP_h
X
X#include "CuTblP.h"
X#include "CuRc.h"
X
X#define Dimension int
X#define Cardinal int
X#define Position int
X
Xtypedef struct
X {
X int empty ;
X } CuRcClassPart;
X
Xtypedef struct _CuRcClassRec
X {
X CoreClassPart core_class;
X CompositeClassPart composite_class;
X ConstraintClassPart constraint_class;
X CuTblClassPart tbl_class;
X CuRcClassPart rc_class;
X } CuRcClassRec;
X
Xextern CuRcClassRec cuRcClassRec;
X
Xtypedef struct _CuRcPart
X {
X int empty ;
X } CuRcPart;
X
Xtypedef struct _CuRcRec
X {
X CorePart core;
X CompositePart composite;
X ConstraintPart constraint;
X CuTblPart tbl;
X CuRcPart rc ;
X } CuRcRec;
X
Xtypedef struct _CuRcConstraintsPart
X {
X int empty ;
X } CuRcConstraintsPart;
X
Xtypedef struct _CuRcConstraintsRec
X {
X CuTblConstraintsPart tbl ;
X CuRcConstraintsPart rc ;
X } CuRcConstraintsRec, *CuRcConstraints;
X
X/* Declarations of "Tbl Class" calls */
X
Xstatic String MyString () ;
X
X#endif _Cu_RcP_h
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuRcP.h'\"
if test 1050 -ne `wc -c <'src/CuRcP.h'`; then
echo shar: \"'src/CuRcP.h'\" unpacked with wrong size!
fi
# end of 'src/CuRcP.h'
fi
if test -f 'src/CuResizePR.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuResizePR.h'\"
else
echo shar: Extracting \"'src/CuResizePR.h'\" \(483 characters\)
sed "s/^X//" >'src/CuResizePR.h' <<'END_OF_FILE'
X#ifndef _Cu_ResizeParticipants_e
X#define _Cu_ResizeParticipants_e
X
X#define XtNresizeParticipants "resizeParticipants"
X#define XtCResizeParticipants "ResizeParticipants"
X#define XtRResizeParticipants "ResizeParticipants"
X
X/*
X * Values for XtNresizeParticipants
X */
X
Xtypedef enum
X {
X CuResizeNone = 0
X ,CuResizeInters = 1
X ,CuResizeInternals = 2
X ,CuResizeChildren = 4
X }
X CuResizeParticipants ;
X
Xvoid CuAddStringToResizeParticipantsConverter () ;
X
X#endif _Cu_ResizeParticipants_e
X
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuResizePR.h'\"
if test 484 -ne `wc -c <'src/CuResizePR.h'`; then
echo shar: \"'src/CuResizePR.h'\" unpacked with wrong size!
fi
# end of 'src/CuResizePR.h'
fi
if test -f 'src/CuSimpleI.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuSimpleI.h'\"
else
echo shar: Extracting \"'src/CuSimpleI.h'\" \(349 characters\)
sed "s/^X//" >'src/CuSimpleI.h' <<'END_OF_FILE'
X#define FacetWidth simple->facet_width
X#define BrightGC simple->bright_facet_GC
X#define DimGC simple->dim_facet_GC
X#define BackgroundGC simple->background_GC
X#define Width w->core.width
X#define Height w->core.height
X#define Highlighted simple->highlighted
X#define Highlight_GC simple->highlight_GC
X#define HighlightWidth simple->highlight_width
X
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuSimpleI.h'\"
if test 350 -ne `wc -c <'src/CuSimpleI.h'`; then
echo shar: \"'src/CuSimpleI.h'\" unpacked with wrong size!
fi
# end of 'src/CuSimpleI.h'
fi
if test -f 'src/CuTbl.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuTbl.h'\"
else
echo shar: Extracting \"'src/CuTbl.h'\" \(850 characters\)
sed "s/^X//" >'src/CuTbl.h' <<'END_OF_FILE'
X#ifndef _Cu_Tbl_h
X#define _Cu_Tbl_h
X
X/*
X * Superclass Public Include File
X */
X
X#include <X11/Constraint.h>
X#include "CuGravityR.h"
X#include "CuJustifyR.h"
X#include "CuResizePR.h"
X
X/*
X * New Resource Names
X */
X
X#define XtNalignedColumns "alignedColumns"
X#define XtNclipOnShrink "clipOnShrink"
X#define XtNequalColumns "equalColumns"
X#define XtNequalRows "equalRows"
X#define XtNformatFile "formatFile"
X#define XtNformatString "formatString"
X#define XtNfillColumn "fillColumn"
X#define XtNinterWidth "interWidth"
X#define XtNinterHeight "interHeight"
X#define XtNinternalWidth "internalWidth"
X#define XtNinternalHeight "internalHeight"
X
X/*
X * Widget Type Definition
X */
X
Xtypedef struct _CuTblClassRec *CuTblWidgetClass;
Xtypedef struct _CuTblRec *CuTblWidget;
X
X/*
X * Class Record Pointer
X */
X
Xextern WidgetClass cuTblWidgetClass;
X
X#endif _Cu_Tbl_h
X
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuTbl.h'\"
if test 851 -ne `wc -c <'src/CuTbl.h'`; then
echo shar: \"'src/CuTbl.h'\" unpacked with wrong size!
fi
# end of 'src/CuTbl.h'
fi
if test -f 'src/CuWlm.c.ad' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuWlm.c.ad'\"
else
echo shar: Extracting \"'src/CuWlm.c.ad'\" \(96 characters\)
sed "s/^X//" >'src/CuWlm.c.ad' <<'END_OF_FILE'
X XEvent event ;
X
X XtNextEvent (&event) ;
X XtDispatchEvent (&event) ;
X }
Xreturn ;
X}
X
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuWlm.c.ad'\"
if test 97 -ne `wc -c <'src/CuWlm.c.ad'`; then
echo shar: \"'src/CuWlm.c.ad'\" unpacked with wrong size!
fi
# end of 'src/CuWlm.c.ad'
fi
if test -f 'src/CuWlm.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'src/CuWlm.h'\"
else
echo shar: Extracting \"'src/CuWlm.h'\" \(1013 characters\)
sed "s/^X//" >'src/CuWlm.h' <<'END_OF_FILE'
X#ifndef _Cu_Wlm_h
X#define _Cu_Wlm_h
X
X/*
X * Superclass Public Include File
X */
X
X#include <X11/Composite.h>
X
X/*
X * New Resource Names
X */
X
X#define XtNfile "file"
X#define XtNexposeCallback "exposeCallback"
X
X/*
X * Widget Type Definition
X */
X
Xtypedef struct _CuWlmClassRec *CuWlmWidgetClass;
Xtypedef struct _CuWlmRec *CuWlmWidget;
X
X/*
X * Class Record Pointer
X */
X
Xextern WidgetClass cuWlmWidgetClass;
X
X/*
X * Public Definitions
X */
X
X/* CuWlmAddCallback() argument */
Xtypedef enum
X { CuWlmEvents=0, CuWlmNoSampling=0, CuWlmBypass=1, CuWlmSampling=2 }
X CuWlmConnectionType ;
X
X/*
X * Public Procedures
X */
X
Xvoid CuWlmSetInt () ;
Xvoid CuWlmSetFloat () ;
Xvoid CuWlmSetString () ;
Xvoid CuWlmSetBoolean () ;
Xvoid CuWlmGetInt () ;
Xvoid CuWlmGetFloat () ;
Xvoid CuWlmGetString () ;
Xvoid CuWlmGetBoolean () ;
Xvoid CuWlmGetScan () ;
Xvoid CuWlmAddCallback () ;
X
Xvoid CuWlmRequest () ;
Xvoid CuWlmSample () ;
XBoolean CuWlmEvent () ;
X
XWidget CuWlmInquireWidget () ;
Xvoid CuWlmSetValue () ;
Xvoid CuWlmGetValue () ;
X
X#endif _Cu_Wlm_h
X
END_OF_FILE
echo shar: NEWLINE appended to \"'src/CuWlm.h'\"
if test 1014 -ne `wc -c <'src/CuWlm.h'`; then
echo shar: \"'src/CuWlm.h'\" unpacked with wrong size!
fi
# end of 'src/CuWlm.h'
fi
if test -f 'wlmCompiler/CuCopy_ds.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'wlmCompiler/CuCopy_ds.c'\"
else
echo shar: Extracting \"'wlmCompiler/CuCopy_ds.c'\" \(400 characters\)
sed "s/^X//" >'wlmCompiler/CuCopy_ds.c' <<'END_OF_FILE'
X/*
X * Given the address of a pointer to a target character string, and
X * a string to be copied, this function allocates space for the target
X * and copies the string into the target.
X */
X
Xvoid
XCu_copy_ds (destination, source)
X char **destination ;
X char *source ;
X{
Xchar *temp = source ;
X*destination = XtMalloc ((strlen(temp)+1) * sizeof (char)) ;
Xstrcpy (*destination, temp) ;
X
Xreturn ;
X}
X
X
END_OF_FILE
echo shar: NEWLINE appended to \"'wlmCompiler/CuCopy_ds.c'\"
if test 401 -ne `wc -c <'wlmCompiler/CuCopy_ds.c'`; then
echo shar: \"'wlmCompiler/CuCopy_ds.c'\" unpacked with wrong size!
fi
# end of 'wlmCompiler/CuCopy_ds.c'
fi
if test -f 'wlmCompiler/CuGrow.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'wlmCompiler/CuGrow.c'\"
else
echo shar: Extracting \"'wlmCompiler/CuGrow.c'\" \(601 characters\)
sed "s/^X//" >'wlmCompiler/CuGrow.c' <<'END_OF_FILE'
X#include "CuGrow.h"
X
Xvoid
XCu_grow_create (grow, chunk_size)
X Grow **grow ;
X int chunk_size ;
X{
X(*grow) = (Grow *) malloc (sizeof (Grow)) ;
X(*grow)->chunk = chunk_size ;
X(*grow)->s = (int *) malloc (chunk_size * sizeof (int)) ;
X(*grow)->size = chunk_size ;
X}
X
Xvoid
XCu_grow_check (grow, n)
X Grow *grow ;
X int n ;
X{
Xint old_size ;
Xint *temp ;
X
Xif (n < grow->size)
X return ;
X
Xold_size = grow->size ;
X
Xwhile (n >= grow->size)
X grow->size += grow->chunk ;
X
Xtemp = (int *) malloc (grow->size * sizeof (int)) ;
Xmemcpy (temp, grow->s, old_size * sizeof (int)) ;
Xgrow->s = temp ;
X
Xreturn ;
X}
END_OF_FILE
echo shar: NEWLINE appended to \"'wlmCompiler/CuGrow.c'\"
if test 602 -ne `wc -c <'wlmCompiler/CuGrow.c'`; then
echo shar: \"'wlmCompiler/CuGrow.c'\" unpacked with wrong size!
fi
# end of 'wlmCompiler/CuGrow.c'
fi
if test -f 'wlmCompiler/CuGrow.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'wlmCompiler/CuGrow.h'\"
else
echo shar: Extracting \"'wlmCompiler/CuGrow.h'\" \(144 characters\)
sed "s/^X//" >'wlmCompiler/CuGrow.h' <<'END_OF_FILE'
X#ifndef _Cu_Grow_h
X#define _Cu_Grow_h
X
Xtypedef
Xstruct s_grow
X {
X int chunk ;
X int size ;
X int *s ;
X } Grow ;
X
X#endif _Cu_Grow_h
X
END_OF_FILE
echo shar: NEWLINE appended to \"'wlmCompiler/CuGrow.h'\"
if test 145 -ne `wc -c <'wlmCompiler/CuGrow.h'`; then
echo shar: \"'wlmCompiler/CuGrow.h'\" unpacked with wrong size!
fi
# end of 'wlmCompiler/CuGrow.h'
fi
if test -f 'wlmCompiler/CuStack.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'wlmCompiler/CuStack.h'\"
else
echo shar: Extracting \"'wlmCompiler/CuStack.h'\" \(392 characters\)
sed "s/^X//" >'wlmCompiler/CuStack.h' <<'END_OF_FILE'
X#ifndef _Cu_Stack_h
X#define _Cu_Stack_h
X
X#include "CuGrow.h"
X
X#define STACK_NEXT_POP -1
X#define STACK_NEXT_PULL -2
X
Xtypedef
Xstruct s_stack
X {
X char *name ;
X int n ;
X Grow *grow ;
X } Stack ;
X
Xvoid Cu_stack_create () ;
Xvoid Cu_stack_push () ;
Xint Cu_stack_pull () ;
Xint Cu_stack_pop () ;
Xint Cu_stack_peek () ;
Xvoid Cu_stack_kill () ;
Xint Cu_stack_size () ;
X
X#endif _Cu_Stack_h
END_OF_FILE
echo shar: NEWLINE appended to \"'wlmCompiler/CuStack.h'\"
if test 393 -ne `wc -c <'wlmCompiler/CuStack.h'`; then
echo shar: \"'wlmCompiler/CuStack.h'\" unpacked with wrong size!
fi
# end of 'wlmCompiler/CuStack.h'
fi
if test -f 'wlmCompiler/Imakefile' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'wlmCompiler/Imakefile'\"
else
echo shar: Extracting \"'wlmCompiler/Imakefile'\" \(544 characters\)
sed "s/^X//" >'wlmCompiler/Imakefile' <<'END_OF_FILE'
X#ifdef RtArchitecture
X CC = pcc
X#endif
X XCUSRC = ../src
X INCLUDES = -I$(TOP) -I$(XCUSRC)
X SRCS = wlc.c CuStack.c CuGrow.c CuCopy_ds.c wlc.y wlc.l
X XCULIB = $(XCUSRC)/libXcu.a
XLOCAL_LIBRARIES = $(XAWLIB) $(XMULIB) $(XTOOLLIB) $(XLIB) $(XCULIB)
X
Xall: wlc
X
Xwlc.o : wlc.h wlc.y.c wlc.lex.c
X
XSingleProgramTarget(wlc,wlc.o CuStack.o CuGrow.o CuCopy_ds.o,$(LOCAL_LIBRARIES),)
X
XDependTarget()
X
Xwlc.c : ;
X
Xwlc.lex.c : wlc.l
X lex wlc.l
X mv lex.yy.c wlc.lex.c
X
Xwlc.y.c : wlc.y
X yacc wlc.y
X mv y.tab.c wlc.y.c
X
END_OF_FILE
echo shar: NEWLINE appended to \"'wlmCompiler/Imakefile'\"
if test 545 -ne `wc -c <'wlmCompiler/Imakefile'`; then
echo shar: \"'wlmCompiler/Imakefile'\" unpacked with wrong size!
fi
# end of 'wlmCompiler/Imakefile'
fi
echo shar: End of archive 12 \(of 12\).
cp /dev/null ark12isdone
MISSING=""
for I in 1 2 3 4 5 6 7 8 9 10 11 12 ; do
if test ! -f ark${I}isdone ; then
MISSING="${MISSING} ${I}"
fi
done
if test "${MISSING}" = "" ; then
echo You have unpacked all 12 archives.
rm -f ark[1-9]isdone ark[1-9][0-9]isdone
else
echo You still need to unpack the following archives:
echo " " ${MISSING}
fi
## End of shell archive.
exit 0