! Resource file for xlint v1.1
! 
! Uses WCL 2.2
!
! CAUTION: Not very much in this file is modifiable by the user.
!          The fontList resource can be modified to user's taste
!          but caution is advised so as not to cause the forms to loose
!          text. The changes that can be made are localized to the 
!          Fonts: section below.
!          If you make modifications to this file, make sure you save
!          a copy of the original before proceeding.
!
! Default Actions:                           (eg., xtAction == Xref->Tree)
*lsAction.wcCallback:  doSetToggle(3:this)
*ltAction.wcCallback:  doSetToggle(3:this)
*lxAction.wcCallback:  doSetToggle(3:this)
*tsAction.wcCallback:  doSetToggle(3:this)
*txAction.wcCallback:  doSetToggle(3:this)
*xsAction.wcCallback:  doSetToggle(3:this)
*xtAction.wcCallback:  doSetToggle(3:this)
!comment line out with "!" to deactivate action (or change 3:this to 2:this)

! Fonts:
!*source.fontList:                *-r*17-*
*sourcetitle*fontList:            *-helvetica-medium-r-*-140-*-p-*
*lint.fontList:                   6x13
*tree*XmPushButton.fontList:      *-helvetica-medium-r*14-*
*xref.fontList:                   *-helvetica-medium-r*14-*
*cpanel.status.fontList:          *-helvetica-medium-r-*-140-*-p-*
*cpanel.status_val.fontList:      *-helvetica-medium-r-*-120-*-p-*
*cpanel.input.fontList:           *-helvetica-medium-r-*-120-*-p-*
*cpanel.inplabel.fontList:        *-helvetica-medium-r-*-140-*-p-*
*xrpmenu*fontList:                *-helvetica-medium-r-*-140-*-p-*
*trpmenu*fontList:                *-helvetica-medium-r-*-140-*-p-*
*lipmenu*fontList:                *-helvetica-medium-r-*-140-*-p-*
!*XmText.font:                    *-medium-r-*-120-*-m-*
*XmText.fontList:                 *-medium-r-*-120-*-m-*
*source*fontList:                 *-courier-medium-r-*-14-*-m-*
*configOpts*fontList:             *-helvetica-medium-r-*-14-*-p-*

XLINT.wcChildren:               main
xlint.wcChildren:               main
XLINT.title:                    xlint v1.1
xlint.title:                    xlint v1.1
*main.wcCreate:                 XmCreateMainWindow
*main.wcChildren:               menubar panes

! make default widget a pushbutton
*wcCreate:                      XmPushButton
!*panes*traversalOn:            False
*XmToggleButton.visibleWhenOff: True

! ************************ menubar ***********************
! menubar itself
*menubar.wcCreate:              XmCreateMenubar
*menubar.wcPopups:              filemenu searchmenu buildmenu helpmenu
*menubar.wcChildren:            file search build help
*menubar.wcAfterChildren:       WcSetValue( this.menuHelpWidget: this.help)
 
! "file" menubar button
*file.wcCreate:                 XmCascadeButton
*file.subMenuId:                ^*filemenu

! "search" menubar button
*search.wcCreate:               XmCascadeButton
*search.subMenuId:              ^*searchmenu

! "build" menubar button
*build.wcCreate:               XmCascadeButton
*build.subMenuId:              ^*buildmenu

! "help" menubar button
*help.wcCreate:                 XmCascadeButton
*help.subMenuId:                ^*helpmenu

! "file" menubar pulldown
*filemenu.wcCreate:                     XmCreatePulldownMenu
*filemenu.wcChildren:                   loaddb loadsrc savesrc editable quit
*filemenu.quit.wclabelString:           Quit
*filemenu.quit.activateCallback:        Quit()

! "database" selection on "file" menubar pulldown
*loaddb.wcCreate:               XmPushButton
*loaddb.labelString:            Load Database
*loaddb.wcPopups:               fsbDialog
*loaddb.activateCallback:       WcManage(this*fsbDialog)
*loaddb*Title:                  Load Database

! file selection dialog box for "browse" selection on "file" menubar pulldown
*fsbDialog.wcCreate:             XmCreateFileSelectionDialog
*fsbDialog.cancelCallback:       WcUnmanage(this)
*fsbDialog.okCallback:           WcUnmanage(this) \
                                 doLoadDb() 
*fsbDialog.pattern:              *.fdb
*fsbDialog*Title:                Database

! "source" selection on "file" menubar pulldown
*loadsrc.wcCreate:                 XmPushButton
*loadsrc.labelString:              View File
*loadsrc.wcPopups:                 fsoDialog
*loadsrc.activateCallback:         WcManage(this*fsoDialog)
*loadsrc*Title:                    View Source File

! "source" selection on "file" menubar pulldown
*savesrc.wcCreate:                 XmPushButton
*savesrc.wcCallback:               WcSetInsensitive(this)
*savesrc.labelString:              Save File
*savesrc.activateCallback:         doSaveFile() 

! "source" selection on "file" menubar pulldown
*editable.wcCreate:                 XmPushButton
*editable.labelString:              Enable editing
*editable.activateCallback:         doEditable()

! file selection dialog box for "open" selection on "file" menubar pulldown
*fsoDialog.wcCreate:             XmCreateFileSelectionDialog
*fsoDialog.cancelCallback:       WcUnmanage(this)
*fsoDialog.okCallback:           WcUnmanage(this) \
                                 doLoadFile(*source)
*fsoDialog.pattern:              *.for

! "search" menubar pulldown
*searchmenu.wcCreate:           XmCreatePulldownMenu
*searchmenu.wcChildren:         previous next goto

! "previous" selection on "search" menubar pulldown
*previous.labelString:          Previous Text
*previous.activateCallback:     doFindPrevAny()

! "next" selection on "search" menubar pulldown
*next.labelString:              Next Text
*next.activateCallback:         doFindNextAny()

! "goto" selection on "search" menubar pulldown
*goto.labelString:              Go To Line
*goto.activateCallback:         doGotoLine(*source)

! "build" menubar pulldown
*buildmenu.wcCreate:           XmCreatePulldownMenu
*buildmenu.wcChildren:         configure rebuild kill_rebuild use_rebuilt build_output 

! "configure" selection on "build" menubar pulldown
*configure.wcCreate:               XmPushButton
*configure.labelString:          Configure
*configure*Title:                Configure
*configure.wcPopups:             configDialog
*configure.activateCallback:     WcManage(this*configDialog)

! "rebuild" selection on "build" menubar pulldown
*rebuild.labelString:          Rebuild
*rebuild.activateCallback:     doRebuild()
*rebuild.wcCallback:           WcSetInsensitive(this)

! "rebuild" selection on "build" menubar pulldown
*kill_rebuild.labelString:          Kill Rebuild Process
*kill_rebuild.activateCallback:     doKillRebuild()
*kill_rebuild.wcCallback:           WcSetInsensitive(this)

! "use_rebuilt" selection on "build" menubar pulldown
*use_rebuilt.labelString:          Use Rebuilt Database
*use_rebuilt.activateCallback:     doUseRebuilt()
*use_rebuilt.wcCallback:           WcSetInsensitive(this)

! "use_rebuilt" selection on "build" menubar pulldown
*build_output.labelString:          View Build Output
*build_output*Title:                Build Output
*build_output.activateCallback:     doViewBuild() \
                                    WcManage(this*build_outputDialog)
*build_output.wcCallback:           WcSetInsensitive(this)
*build_output.wcPopups:             build_outputDialog

*build_outputDialog.wcCreate:        XmCreatePromptDialog
*build_outputDialog.wcCallback:      cleanDialog(s) 
*build_outputDialog.okCallback:      WcUnmanage(this)
*build_outputDialog.wcChildren:      build_text_w

*build_text_w.wcCreate:              XmScrolledWindow
*build_text_w.wcChildren:            build_text
*build_text.wcCreate:                XmText
*build_text.rows:                    20
*build_text.columns:                 80
*build_text.editable:                False
*build_text.editMode:                MULTI_LINE_EDIT

*configDialog.wcCreate:        XmCreatePromptDialog
*configDialog.wcCallback:      cleanDialog(s)
*configDialog.okCallback:      doSetRebuild() \
                               WcUnmanage(this)
*configDialog.wcChildren:      configOpt

*configOpt.wcCreate:                     XmRowColumn
*configOpt.wcChildren:                   database configOpts miscOpts configXref configFiles

*configOpt.database.wcCreate:          XmRowColumn
*configOpt.database.wcChildren:        database_label database_name
*configOpt.database.orientation:                  HORIZONTAL
*configOpt.database.database_label.wcCreate:        XmLabel
*configOpt.database.database_label.labelString:     Database:
*configOpt.database.database_name.wcCreate:              XmText
*configOpt.database.database_name.highlightThickness:    1
*configOpt.database.database_name.shadowThickness:       1
*configOpt.database.database_name.columns:              35

/* ======================= F90 begins ====================== */
*miscOpts.wcCreate:                     XmRowColumn
*miscOpts.wcChildren:                   label value
*miscOpts.orientation:                  HORIZONTAL
*miscOpts.label.wcCreate:        XmLabel
*miscOpts.label.labelString:     Miscellaneous options:
*miscOpts.value.wcCreate:                 XmText
*miscOpts.value.columns:             70
*miscOpts.value.highlightThickness:       1
*miscOpts.value.shadowThickness:          1                               
/* ======================= F90 ends ======================== */

*configXref.wcCreate:                     XmRowColumn
*configXref.wcChildren:                   label value
*configXref.orientation:                  HORIZONTAL
*configXref.label.wcCreate:        XmLabel
*configXref.label.labelString:     Cross reference options:
*configXref.value.wcCreate:                 XmText
*configXref.value.columns:             70
*configXref.value.highlightThickness:       1
*configXref.value.shadowThickness:          1                               
*configXref.value.value:                    line                            

*configFiles.wcCreate:                     XmRowColumn
*configFiles.wcChildren:                   label value
*configFiles.orientation:                  HORIZONTAL
*configFiles.label.wcCreate:        XmLabel
*configFiles.label.labelString:     Source files:
*configFiles.value.wcCreate:                 XmText
*configFiles.value.columns:             80
*configFiles.value.highlightThickness:       1
*configFiles.value.shadowThickness:          1                               

*configOpts.wcCreate:                     XmRowColumn
*configOpts.wcChildren:                   src sep1 ver sep2 cpp sep3 port sep4 lvl 
*configOpts.orientation:                  HORIZONTAL
*configOpts.sep1.wcCreate:               XmSeparator
*configOpts.sep1.orientation:            VERTICAL
*configOpts.sep2.wcCreate:               XmSeparator
*configOpts.sep2.orientation:            VERTICAL
*configOpts.sep3.wcCreate:               XmSeparator
*configOpts.sep3.orientation:            VERTICAL
*configOpts.sep4.wcCreate:               XmSeparator
*configOpts.sep4.orientation:            VERTICAL
*configOpts.sep5.wcCreate:               XmSeparator
*configOpts.sep5.orientation:            VERTICAL
*configOpts*packing:                  PACK_TIGHT
*configOpts.src.WcCreate:                     XmRowColumn
*configOpts.src.wcChildren:               lbl debug wide two f77
*configOpts.src.lbl.WcCreate:             XmLabel
*configOpts.src.lbl.labelString:          source configuration    
*configOpts.src*WcCreate:                 XmToggleButton
*configOpts.src.debug.labelString:        -d  Process debug lines
*configOpts.src.wide.labelString:         -e  132-column source lines
*configOpts.src.two.labelString:          -2  2-byte logicals & ints
*configOpts.src.f77.labelString:          -7  Run on Fortran 77
*configOpts.ver.WcCreate:                     XmRowColumn
*configOpts.ver.wcChildren:               label rdo
*configOpts.ver.packing:                  PACK_TIGHT
*configOpts.ver.label.wcCreate:        XmLabel
*configOpts.ver.label.labelString:     dialect
*configOpts.ver.rdo.WcCreate:             XmRowColumn
*configOpts.ver.rdo.wcChildren:           sys_ansi sys_ansi90 sys_cray \
                                          sys_decnt sys_decunix sys_decvms \
                                          sys_epc sys_hpux sys_lahey \
                                          sys_ncube sys_os32 sys_sgi sys_sun
*configOpts.ver.rdo.packing:                  PACK_TIGHT
*configOpts.ver.rdo.radioBehavior:            True
*configOpts.ver.rdo*WcCreate:                 XmToggleButton
*configOpts.ver.rdo.sys_ansi.labelString:       ANSI 77 
*configOpts.ver.rdo.sys_ansi90.labelString:     ANSI 90
*configOpts.ver.rdo.sys_cray.labelString:       CRAY    
*configOpts.ver.rdo.sys_decnt.labelString:      DECNT
*configOpts.ver.rdo.sys_decunix.labelString:    DECUNIX
*configOpts.ver.rdo.sys_decvms.labelString:     DECVMS
*configOpts.ver.rdo.sys_epc.labelString:        EPC
*configOpts.ver.rdo.sys_hpux.labelString:       HP/UX   
*configOpts.ver.rdo.sys_lahey.labelString:      LAHEY
*configOpts.ver.rdo.sys_ncube.labelString:      NCUBE   
*configOpts.ver.rdo.sys_os32.labelString:       OS32    
*configOpts.ver.rdo.sys_sgi.labelString:        SGI     
*configOpts.ver.rdo.sys_sun.labelString:        SUN     

*configOpts.cpp.WcCreate:                     XmRowColumn
*configOpts.cpp.wcChildren:               label all defines incpath
*configOpts.cpp.all.wcCreate:                 XmToggleButton
*configOpts.cpp.all.labelString:              -p  CPP all sources
*configOpts.cpp.label.wcCreate:        XmLabel
*configOpts.cpp.label.labelString:     preprocessor

*configOpts.cpp.defines.WcCreate:                     XmRowColumn
*configOpts.cpp.defines.wcChildren:                   label value
*configOpts.cpp.defines.label.wcCreate:        XmLabel
*configOpts.cpp.defines.label.labelString:     #Defines:
*configOpts.cpp.defines.value.wcCreate:                 XmText
*configOpts.cpp.defines.value.highlightThickness:       1
*configOpts.cpp.defines.value.shadowThickness:          1 

*configOpts.cpp.incpath.WcCreate:                     XmRowColumn
*configOpts.cpp.incpath.wcChildren:                   label value
*configOpts.cpp.incpath.label.wcCreate:        XmLabel
*configOpts.cpp.incpath.label.labelString:     Include file search path:
*configOpts.cpp.incpath.value.wcCreate:                 XmText
*configOpts.cpp.incpath.value.highlightThickness:       1
*configOpts.cpp.incpath.value.shadowThickness:          1 

*configOpts.port.WcCreate:                     XmRowColumn
*configOpts.port.wcChildren:      label port_ansi port_ansi90 port_cray \
                                  port_decnt port_decunix port_decvms \
                                  port_epc port_hpux port_lahey \
                                  port_ncube port_os32 port_sgi port_sun
*configOpts.port*WcCreate:                 XmToggleButton
*configOpts.port.label.wcCreate:        XmLabel
*configOpts.port.label.labelString:     portability
*configOpts.port.port_ansi.labelString:       ANSI 77
*configOpts.port.port_ansi90.labelString:     ANSI 90
*configOpts.port.port_cray.labelString:       CRAY
*configOpts.port.port_decnt.labelString:      DECNT 
*configOpts.port.port_decunix.labelString:    DECUNIX
*configOpts.port.port_decvms.labelString:     DECVMS 
*configOpts.port.port_epc.labelString:        EPC
*configOpts.port.port_hpux.labelString:       HP/UX
*configOpts.port.port_lahey.labelString:      LAHEY
*configOpts.port.port_ncube.labelString:      NCUBE
*configOpts.port.port_os32.labelString:       OS32
*configOpts.port.port_sgi.labelString:        SGI
*configOpts.port.port_sun.labelString:        SUN
*configOpts.lvl.WcCreate:                     XmRowColumn
*configOpts.lvl.WcCreate:                     XmRowColumn
*configOpts.lvl.wcChildren:               lbl usg wrn fyi imp glo
*configOpts.lvl.lbl.WcCreate:             XmLabel
*configOpts.lvl.lbl.labelString:          levels of analysis      
*configOpts.lvl*WcCreate:                 XmToggleButton
*configOpts.lvl.usg.labelString:          -u  data usage checking
*configOpts.lvl.usg.wcCallback:           doSetToggle(3:this)
*configOpts.lvl.wrn.labelString:          -w  warnings
*configOpts.lvl.wrn.wcCallback:           doSetToggle(3:this)
*configOpts.lvl.fyi.labelString:          -f  informational (FYI)
*configOpts.lvl.fyi.wcCallback:           doSetToggle(3:this)
*configOpts.lvl.imp.labelString:          -m  implicit typing
*configOpts.lvl.glo.labelString:          -g  global analysis
*configOpts.lvl.glo.wcCallback:           doSetToggle(3:this)


! "help" menubar pulldown
*helpmenu.wcCreate:             XmCreatePulldownMenu
*helpmenu*Title:                Help
*helpmenu.wcPopups:             helpDialog
*helpmenu.wcChildren:           help1 help2a help2b help2c help3 help4 help5 help6 help7
*help1.labelString:             Overview
*help1.activateCallback:        WcSetValue(~*helpDialog.messageString: \
----------     Overview     ----------  \n\n\
Xlint is a tool for browsing FORTRAN       \n\
source files.                              \n\
                                           \n\
A database must first                      \n\
be generated from the source files by      \n\
running FORTRAN-lint, either from within   \n\
the build menu, or on a command line.      \n\
                                           \n\
A pre-existing database file (.fdb) can    \n\
be given on the command line, and xlint    \n\
will start up using it.                    \n\
                                           \n\
Once the database is loaded, the lint      \n\
messages (if any) should be shown in the   \n\
lint window (second from top).             \n\
                                           \n\
Double-clicking on any item in the lower   \n\
three windows (lint/tree/xref) will cause  \n\
the other windows to display related       \n\
information. Highlighting a symbol in the  \n\
in the source window and pressing "lookup" \n\
will affect the tree and cross reference   \n\
windows. Typing a symbol name in the       \n\
"Select" box and hitting return has the    \n\
same effect.                               \n\
                                           \n\
There are pop-up menus in all four windows \n\
(via the right mouse button), that allow   \n\
you to select what to put in that window.  \n\
These pop-up menus also let you change     \n\
what a double-click in that window will do.     ) \
                                WcManage(~*helpDialog)
*help2a.labelString:             File Menu
*help2a.activateCallback:        WcSetValue(~*helpDialog.messageString: \
----------     File Menu    ----------  \n\n\
The "File" menu is used to select the       \n\
database or source file.                    \n\
                                            \n\
"Load Database" is used to load a pre-      \n\
existing database. A database must be       \n\
loaded before symbol information can be     \n\
displayed in the windows.                   \n\
                                            \n\
"View File" is used to load an arbitrary    \n\
file into the source window. It will stay   \n\
loaded until an action from another window  \n\
calls up a different source file.           \n\
                                            \n\
"Save File" is used to save any edits made  \n\
to the file in the source window.  Editing  \n\
must be enabled first.                      \n\
                                            \n\
"Enable Editing" allows the file in the     \n\
source window to be modified and saved.     \n\
Changes are only saved when the "Save File" \n\
menu item is selected.                      \n\
                                            \n\
"Quit" exits xlint.                         \n\
                                            ) \
                                WcManage(~*helpDialog)
*help2b.labelString:             Search Menu
*help2b.activateCallback:        WcSetValue(~*helpDialog.messageString: \
----------    Search Menu   ----------  \n\n\
The "Search" menu allows text searches on   \n\
the source window, using the currently      \n\
selected (highlighted) text as the search   \n\
string.                                     \n\
                                            \n\
"Previous" searches backwards for the       \n\
selected text.                              \n\
                                            \n\
"Next" searches forwards for the selected   \n\
text.                                       \n\
                                            \n\
"Go To Line" uses the selected text as a    \n\
line number and goes to that line.          \n\
                                            ) \
                                WcManage(~*helpDialog)
*help2c.labelString:             Build Menu
*help2c.activateCallback:        WcSetValue(~*helpDialog.messageString: \
----------    Build Menu    ----------  \n\n\
The "Build" menu is used to regenerate      \n\
a database.  A separate program, FORTRAN-   \n\
lint, generates the database by parsing     \n\
the FORTRAN source and writing its output   \n\
to the database file.                       \n\
                                            \n\
The status on the control bar shows the     \n\
current status of the last rebuild.         \n\
                                            \n\
"Configure" is used to select the name of   \n\
the database, the source files, and options \n\
used during source processing.              \n\
                                            \n\
"Rebuild" runs FORTRAN-lint with the        \n\
configured options and files to regenerate  \n\
the database file.                          \n\
                                            \n\
"Kill Rebuild Process" stops the source     \n\
processing.  This is only available during  \n\
a rebuild.                                  \n\
                                            \n\
"Use Rebuilt Database" loads the database   \n\
that was last rebuilt by the "Rebuild" menu \n\
selection.  This has the same effect as     \n\
loading the database from within the "File" \n\
menu.                                       \n\
                                            \n\
"View Build Output" pops up a window which  \n\
shows the output from FORTRAN-lint during   \n\
the rebuild process.  This can be used to   \n\
determine why a rebuild failed.             \n\
                                            ) \
                                WcManage(~*helpDialog)
*help3.labelString:             Source window
*help3.activateCallback:        WcSetValue(~*helpDialog.messageString: \
---------   Source Window   ---------  \n\n\
The source window shows the source code.  \n\
Actions in other windows will cause files \n\
to load automatically and jump to the     \n\
appropriate point in the source. The pop- \n\
up menu (right mouse button) can be used  \n\
to select source related to what is       \n\
currently highlighted in the other windows. \n\
In particular, you can step through the   \n\
cross reference entries one by one, or    \n\
repeat a text search with a click of the  \n\
mouse.                                    ) \
                                WcManage(~*helpDialog)
*help4.labelString:             Control Panel
*help4.activateCallback:        WcSetValue(~*helpDialog.messageString: \
----------   Control Panel   ----------      \n\n\
The bar between the source window and the    \n\
line window contains a text input field      \n\
and three buttons.                           \n\
                                             \n\
The LOOKUP button will use the highlighted   \n\
text from the source window to affect the    \n\
windows selected for action by the source    \n\
window's popup menu. If there is no text     \n\
highlighted, then the value in the text      \n\
input field to the left is used. If text     \n\
is entered into this field and <return> is   \n\
pressed, the entered text is used regardless \n\
of what is highlighted in the source window. \n\
                                             \n\
The XREF FILTER button calls up a selection  \n\
box to select the types of symbols to show   \n\
in the cross reference window. Any amount of \n\
these may be selected at once.               \n\
                                             \n\
The TREE OPTIONS button brings up a           \n\
selection box to select parent and child      \n\
depth of the call tree, as well as condensing \n\
of multiple calls. Parent depth is the number \n\
of levels shown upward in the call stack in   \n\
relation to the selected tree routine. Child  \n\
depth is similar but in a downward direction. \n\
The toggle for condensed mode causes multiple \n\
calls from one routine to another to be shown \n\
as one link, rather than duplicated. Library  \n\
includes library routines in tree (from .LBT), \n\
and the undefined toggle shows called routines \n\
which do not exist.                           ) \
                                WcManage(~*helpDialog)
*help5.labelString:             Lint window
*help5.activateCallback:        WcSetValue(~*helpDialog.messageString:   \
----------   Lint Window   ----------     \n\n\
This window contains messages which are   \n\
the result of a FORTRAN-lint analysis.    \n\
Initially, a summary is shown. Double     \n\
clicking on any message in the summary    \n\
calls up the actual instances of that     \n\
message. Double clicking on a message     \n\
instance causes lookups in the windows    \n\
selected for action.                      \n\
                                          \n\
The lint window has a pop-up menu which   \n\
is activated with a click of the third    \n\
mouse button. This menu is used to select \n\
what to put in this window, as well as to \n\
select the action taken when a message    \n\
instance is double clicked.             ) \
                                WcManage(~*helpDialog)
*help6.labelString:             Tree window
*help6.activateCallback:        WcSetValue(~*helpDialog.messageString: \
----------   Tree Window   ----------     \n\n\
This window contains a graphical diagram  \n\
of the program's call structure, centered \n\
around a given routine. The selected      \n\
routine is placed in the center, with the \n\
routines to the right the descendants and \n\
the routines to the left the originators. \n\
                                          \n\
Double clicking on any routine in the tree \n\
brings that node to the center. Clicking  \n\
once on a routine highlights it and makes \n\
it available as a selection from the popup \n\
menus of the other windows.               \n\
                                          \n\
The size of the tree can be changed from  \n\
the options in the TREE OPTIONS menu on   \n\
the control panel.                        \n\
                                          \n\
Double clicking on a routine while holding \n\
the shift key causes lookups in the other \n\
windows specified for action in the tree's \n\
popup menu.                               \n\
                                          \n\
The popup menu in the tree window is      \n\
activated by the third mouse button, and  \n\
allows the tree root to be set from the   \n\
current routine in the source, lint, or   \n\
xref windows. The SELECTED ROUTINE menu   \n\
item uses the the currently highlighted   \n\
routine name from the source window or    \n\
the text input field. The LINT menu item  \n\
is the routine containing the current     \n\
lint message, and the XREF menu item is   \n\
the routine contiaing the current xref    \n\
entry. The ACTION menu item selects the   \n\
affected windows when a shift-doubleclick \n\
is done on a tree routine.              ) \
                                WcManage(~*helpDialog)
*help7.labelString:             Xref window
*help7.activateCallback:        WcSetValue(~*helpDialog.messageString: \
----------   Xref Window   ----------     \n\n\
This window shows a cross reference for \n\
the selected symbol. Symbols may be    \n\
selected by name, and may contain      \n\
wildcard characters. The Xref entries  \n\
shown are filtered by the settings in  \n\
the Xref selection box (see control    \n\
panel).                                \n\
                                       \n\
The wildcard characters accepted are:  \n\
                                       \n\
    *     zero or more characters      \n\
    ?     any character                \n\
                                       \n\
Double clicking on a cross reference   \n\
entry calls up the source and/or call  \n\
tree related to that entry (depending  \n\
on the action settings).               \n\
                                       \n\
Use the pop-up menu to look up symbols \n\
from other windows, or to change the   \n\
double-click action settings.          ) \
                                WcManage(~*helpDialog)

*helpDialog.wcCreate:		XmCreateMessageDialog
*helpDialog.wcCallback:         cleanDialog(m)


! ************************ windows ***********************
! sliding pane manager
*panes.wcCreate:                XmPanedWindow
*panes.wcChildren:              sourceform cpanel lint treewin xref
*panes.sashIndent:              -50
*panes.sashWidth:               20

! source file window
*sourceform.wcCreate:           XmForm
*sourceform.wcChildren:         sourcetitle sourcebody
!*sourceform.orientation:       XmVERTICAL
!*sourceform.adjustLast:        False

! source file title (shows current subprogram(s))
*sourcetitle.wcCreate:          XmMainWindow
*sourcetitle.leftAttachment:    XmATTACH_FORM
*sourcetitle.rightAttachment:   XmATTACH_FORM
*sourcetitle.topAttachment:     XmATTACH_FORM
*sourcetitle.wcChildren:        sourcetitlel
*sourcetitlel.wcCreate:         XmLabel
*sourcetitlel.labelString:      <no database loaded>

! source file body (everything but the title)
*sourcebody.wcCreate:           XmForm
*sourcebody.wcChildren:         linenumb sourcew
*sourcebody.leftAttachment:     XmATTACH_FORM
*sourcebody.rightAttachment:    XmATTACH_FORM
*sourcebody.topAttachment:      XmATTACH_WIDGET
*sourcebody.topWidget:          *sourcetitle
*sourcebody.bottomAttachment:   XmATTACH_FORM
!*sourcebody.orientation:       XmHORIZONTAL
!*sourcebody.adjustLast:        False

! line number portion of source file window
*linenumb.wcCreate:                     XmMainWindow
*linenumb.leftAttachment:               XmATTACH_FORM
*linenumb.topAttachment:                XmATTACH_FORM
*linenumb.bottomAttachment:             XmATTACH_FORM
*linenumb.wcChildren:                   linenums
*linenums.wcCreate:                     XmCreateScrolledText
*linenums.cursorPositionVisible:        False
*linenums.columns:                      5
!*linenums.shadowThickness:             0
*linenums.editMode:                     MULTI_LINE_EDIT
*linenums.editable:                     False
*linenums.scrollVertical:               False

! text portion of source file window
*sourcew.wcCreate:                      XmScrolledWindow
*sourcew.wcChildren:                    source
*sourcebody.sourcew.wcAfterChildren:    doFloop(*sourcew)
*sourcew.leftAttachment:                XmATTACH_WIDGET
*sourcew.leftWidget:                    *linenumb
*sourcew.rightAttachment:               XmATTACH_FORM
*sourcew.topAttachment:                 XmATTACH_FORM
*sourcew.bottomAttachment:              XmATTACH_FORM
*sourcew.WcDumpResources:               False
*source.wcCreate:                       XmText
*source.rows:                           10
*source.columns:                        80
*source.editable:                       False
*source.editMode:                       MULTI_LINE_EDIT
!*source.cursorPositionVisible:         False
*source.wcPopups:                       srcmenu
*source.translations:           #augment <Btn3Down>:  doSrcPopup(*srcmenu)
!*source.motionVerifyCallback:          doMoveLineNums()

! control panel (input fields & buttons in between source & message windows)
*cpanel.wcCreate:                       XmRowColumn
*cpanel.wcChildren:                     inplabel input lookup filter options status status_val
*cpanel.orientation:                    HORIZONTAL
*cpanel.paneMaximum:                    37
*cpanel.paneMinimum:                    37
*cpanel.input.wcCreate:                 XmText
*cpanel.input.activateCallback:         doLookup(ret)
*cpanel.input.highlightThickness:       1
*cpanel.input.shadowThickness:          1                               
*cpanel.input.valueChangedCallback:     doClearSelection(*source) \
                                        doClearSelection(*linenums)
*cpanel.inplabel.wcCreate:              XmLabel
*cpanel.inplabel.labelString:           Select:
*cpanel.lookup.labelString:             Lookup
*cpanel.lookup.activateCallback:        doLookup(btn)
*cpanel.filter.labelString:             Xref Filter
*cpanel.filter*Title:                   Xref Filter
*cpanel.filter.wcPopups:                filterDialog
*cpanel.filter.activateCallback:        WcManage(this*filterDialog)
*cpanel.options.labelString:            Tree Options
*cpanel.options*Title:                  Tree Options
*cpanel.options.wcPopups:               optionsDialog
*cpanel.options.activateCallback:       WcManage(this*optionsDialog)
*cpanel.status.wcCreate:                XmLabel
*cpanel.status.labelString:             \ \ Status:
*cpanel.status_val.wcCreate:            XmLabel
*cpanel.status_val.labelString:         No database loaded

*filterDialog.wcCreate:                 XmCreatePromptDialog
*filterDialog.wcCallback:               cleanDialog(s)
*filterDialog.okCallback:               WcUnmanage(this)
*filterDialog.wcChildren:               togglebox

*togglebox.wcCreate:            XmRowColumn
*togglebox.wcChildren:          fiProg fiBlkd fiSub fiFunc fiModule fiCommon fiStrct fiArr fiVar fiPar
*togglebox.numcolumns:          2
*togglebox.packing:             PACK_COLUMN
*togglebox.fiProg.wcCreate:     XmToggleButton
*togglebox.fiProg.labelString:  Program
*togglebox.fiProg.wcCallback:   doSetToggle(1:this)
*togglebox.fiBlkd.wcCreate:     XmToggleButton
*togglebox.fiBlkd.labelString:  Block Data
*togglebox.fiBlkd.wcCallback:   doSetToggle(1:this)
*togglebox.fiSub.wcCreate:      XmToggleButton
*togglebox.fiSub.labelString:   Subroutines
*togglebox.fiSub.wcCallback:    doSetToggle(1:this)
*togglebox.fiFunc.wcCreate:     XmToggleButton
*togglebox.fiFunc.labelString:  Functions
*togglebox.fiFunc.wcCallback:   doSetToggle(1:this)
*togglebox.fiModule.wcCreate:   XmToggleButton
*togglebox.fiModule.labelString: Module
*togglebox.fiModule.wcCallback: doSetToggle(1:this)
*togglebox.fiStrct.wcCreate:    XmToggleButton
*togglebox.fiStrct.labelString: Structures
*togglebox.fiStrct.wcCallback:  doSetToggle(1:this)
*togglebox.fiCommon.wcCreate:   XmToggleButton
*togglebox.fiCommon.labelString: Common Blocks
*togglebox.fiCommon.wcCallback: doSetToggle(1:this)
*togglebox.fiArr.wcCreate:      XmToggleButton
*togglebox.fiArr.labelString:   Arrays
*togglebox.fiArr.wcCallback:    doSetToggle(1:this)
*togglebox.fiVar.wcCreate:      XmToggleButton
*togglebox.fiVar.labelString:   Variables
*togglebox.fiVar.wcCallback:    doSetToggle(1:this)
*togglebox.fiPar.wcCreate:      XmToggleButton
*togglebox.fiPar.labelString:   Parameters
*togglebox.fiPar.wcCallback:    doSetToggle(1:this)
                                                                  
*optionsDialog.wcCreate:        XmCreatePromptDialog
*optionsDialog.wcCallback:      cleanDialog(s)
*optionsDialog.okCallback:      WcUnmanage(this)
*optionsDialog.wcChildren:      treeOpts

*treeOpts.wcCreate:                     XmRowColumn
*treeOpts.wcChildren:                   sonDepth parentDepth condensed undefined library
*treeOpts.wcPopups:                     trim alphab
*treeOpts.packing:                      PACK_TIGHT
*treeOpts.sonDepth.wcCreate:            XmScale
*treeOpts.sonDepth.titleString:         Child Depth
*treeOpts.sonDepth.maximum:             10
*treeOpts.sonDepth.orientation:         XmHORIZONTAL
*treeOpts.sonDepth.showValue:           True
*treeOpts.sonDepth.value:               2
*treeOpts.sonDepth.valueChangedCallback: doTreeRefresh(scale)
!*treeOpts.sonDepth.dragCallback:       doTreeRefresh(scale)
*treeOpts.parentDepth.wcCreate:         XmScale
*treeOpts.parentDepth.titleString:      Parent Depth
*treeOpts.parentDepth.maximum:          10
*treeOpts.parentDepth.orientation:      XmHORIZONTAL
*treeOpts.parentDepth.showValue:        True
*treeOpts.parentDepth.value:            2
*treeOpts.parentDepth.valueChangedCallback: doTreeRefresh(scale)
!*treeOpts.parentDepth.dragCallback:    doTreeRefresh(scale)
*treeOpts.trim.wcCreate:                XmToggleButton
*treeOpts.trim.labelString:             Trim
*treeOpts.trim.activateCallback:        doTreeRefresh(toggle)
*treeOpts.condensed.wcCreate:           XmToggleButton
*treeOpts.condensed.labelString:        Condense
*treeOpts.condensed.wcCallback:         doSetToggle(1:this)
*treeOpts.condensed.valueChangedCallback:   doTreeRefresh(toggle)
*treeOpts.library.wcCreate:             XmToggleButton
*treeOpts.library.labelString:          Library
*treeOpts.library.wcCallback:           doSetToggle(1:this)
*treeOpts.library.valueChangedCallback: doTreeRefresh(toggle)
*treeOpts.undefined.wcCreate:           XmToggleButton
*treeOpts.undefined.labelString:        Undefined
*treeOpts.undefined.wcCallback:         doSetToggle(1:this)
*treeOpts.undefined.valueChangedCallback:   doTreeRefresh(toggle)

*treeOpts.alphab.wcCreate:              XmToggleButton
*treeOpts.alphab.labelString:           Alphabetical
*treeOpts.alphab.activateCallback:      doTreeRefresh(toggle)
                                                                  
! lint analysis message window
*lint.wcCreate:                 XmCreateScrolledList
!*lint.wcCallback:               loadLint(sum)
*lint.visibleItemCount:         10
*lint.defaultActionCallback:    doPickList(*lint)
*panes.lint.traversalOn:        True
*lint.wcPopups:                 lipmenu
*lint.translations:             #augment <Btn3Down>:  doSrcPopup(*lipmenu)

! call tree window
*treewin.wcCreate:              XmScrolledWindow
*treewin.scrollingPolicy:       XmAUTOMATIC
!*tree*XmPushButton.shadowThickness:  0
*tree*XmPushButton.activateCallback: doTreeSelect()
*tree*XmPushButton.armCallback: doTreeSelect()
*tree*borderWidth:  0
*Tree.verticalSpace:            0
!*tree.allowResize:             True
!*tree.height:                  50
!*tree.rows:                    7
!*tree.editable:                False
!*tree.editMode:                MULTI_LINE_EDIT
!*tree.cursorPositionVisible:   False
*treewin.wcPopups:               trpmenu
*treewin.translations:           #augment <Btn3Down>:  doSrcPopup(*trpmenu)

! cross reference window
*xref.wcCreate:                 XmCreateScrolledList
*xref.visibleItemCount:         6
*xref.defaultActionCallback:    doPickList(*xref)
*xref.wcPopups:                 xrpmenu
*xref.translations:             #augment <Btn3Down>:  doSrcPopup(*xrpmenu)
*panes.xref.traversalOn:        True

!************************** popup menus ***********************
! source window popup menu
*srcmenu.wcCreate:              XmCreatePopupMenu
*srcmenu.wcChildren:            srchPrevious srchCurrent srchNext \
                                srchTextPrev srchTextNext srpLint srpTree
*srcmenu.wcPopups:              srchTextMenu

*srchPrevious.wcCreate:	        XmCreateCascadeButton
*srchPrevious.labelString:	Previous Xref
*srchPrevious.activateCallback: doIndPickList(P:*xref)

*srchCurrent.wcCreate:          XmCreateCascadeButton
*srchCurrent.labelString:	Current Xref
*srchCurrent.activateCallback:  doIndPickList(C:*xref)

*srchNext.wcCreate:             XmCreateCascadeButton
*srchNext.labelString:	        Next Xref
*srchNext.activateCallback:     doIndPickList(N:*xref)

*srchTextPrev.wcCreate:         XmCreateCascadeButton
*srchTextPrev.labelString:      Previous Text
*srchTextPrev.activateCallback: doFindPrevAny()

*srchTextNext.wcCreate:         XmCreateCascadeButton
*srchTextNext.labelString:      Next Text
*srchTextNext.activateCallback: doFindNextAny()

*srpLint.wcCreate:              XmCreateCascadeButton
*srpLint.labelString:	        Lint
*srpLint.activateCallback:      doLink(ls)

*srpTree.wcCreate:              XmCreateCascadeButton
*srpTree.labelString:	        Tree
*srpTree.activateCallback:      doLink(ts)

! lint window popup menu
*lipmenu.wcCreate:              XmCreatePopupMenu
*lipmenu.wcChildren:            lipSum lipAll lipAction
*lipmenu.wcPopups:              lAction

*lipSum.wcCreate:               XmPushButton
*lipSum.labelString:            Summary
*lipSum.activateCallback:       loadLint(sum)
*lipAll.wcCreate:               XmPushButton
*lipAll.labelString:            All Messages
*lipAll.activateCallback:       loadLint(all)
!*lipFilterSel.wcCreate:         XmPushButton
!*lipFilterSel.labelString:      Filter by Selected Routine
!*lipFilterTree.wcCreate:        XmPushButton
!*lipFilterTree.labelString:     Filter by Tree Routine
!*lipFilterTree.activateCallback: doLink(tf)
*lipLint.wcCreate:              XmPushButton
*lipLint.labelString:           Lint References
*lipLint.activateCallback:      doLink(lx)

*lipAction.wcCreate:            XmCascadeButton
*lipAction.labelString:	        Action
*lipAction.subMenuId:           *lAction

*lAction.wcCreate:              XmCreatePulldownMenu
*lAction*WcCreate:              XmToggleButton
*lAction.wcChildren:            lsAction ltAction lxAction
*lsAction.labelString:          Source
*ltAction.labelString:          Tree
*lxAction.labelString:          Xref Lookup
!*lfAction.labelString:          Xref Filter

! tree window popup menu
*trpmenu.wcCreate:              XmCreatePopupMenu
*trpmenu.wcChildren:            trpSel trpLint trpXref trpAction
*trpmenu.wcPopups:              tAction

*trpSel.wcCreate:               XmPushButton
*trpSel.labelString:            Selected routine
*trpSel.activateCallback:       doLink(st)
*trpLint.wcCreate:              XmPushButton
*trpLint.labelString:           Routine Containing Lint
*trpLint.activateCallback:      doLink(lt)
*trpXref.wcCreate:              XmPushButton
*trpXref.labelString:           Routine Containing Xref
*trpXref.activateCallback:      doLink(xt)

*trpAction.wcCreate:            XmCascadeButton
*trpAction.labelString:	        Action (shift-dblclick)
*trpAction.subMenuId:           *tAction

*tAction.wcCreate:              XmCreatePulldownMenu
*tAction*WcCreate:              XmToggleButton
*tAction.wcChildren:            tsAction txAction
*tAction.wcPopups:              tlAction
*tsAction.labelString:          Source
*tlAction.labelString:          Lint
*txAction.labelString:          Xref Lookup
!*tfAction.labelString:          Xref Filter

! xref window popup menu
*xrpmenu.wcCreate:              XmCreatePopupMenu
*xrpmenu.wcChildren:            xrpLookSel xrpLookTree xrpLint xrpAction
*xrpmenu.wcPopups:              xAction

*xrpLookSel.wcCreate:           XmPushButton
*xrpLookSel.labelString:        Lookup Selected Symbol
*xrpLookSel.activateCallback:   doLink(sx)
*xrpLookTree.wcCreate:          XmPushButton
*xrpLookTree.labelString:       Lookup Tree Routine
*xrpLookTree.activateCallback:  doLink(tx)
!*xrpFilterSel.wcCreate:         XmPushButton
!*xrpFilterSel.labelString:      Filter by Selected Routine
!*xrpFilterTree.wcCreate:        XmPushButton
!*xrpFilterTree.labelString:     Filter by Tree Routine
!*xrpFilterTree.activateCallback: doLink(tf)
*xrpLint.wcCreate:              XmPushButton
*xrpLint.labelString:           Lint References
*xrpLint.activateCallback:      doLink(lx)

*xrpAction.wcCreate:            XmCascadeButton
*xrpAction.labelString:	        Action
*xrpAction.subMenuId:           *xAction

*xAction.wcCreate:              XmCreatePulldownMenu
*xAction*WcCreate:              XmToggleButton
*xAction.wcPopups:              xlAction
*xAction.wcChildren:            xsAction xtAction
*xsAction.labelString:          Source
*xlAction.labelString:          Lint
*xtAction.labelString:          Tree
!*xfAction.labelString:          Xref Filter


