Back to index

plt-scheme  4.2.1
xwScrollTextP.h
Go to the documentation of this file.
00001 /*
00002  * Copyright 2004-2009 PLT Scheme Inc.
00003  * Copyright 1992 The University of Newcastle upon Tyne
00004  * 
00005  * Permission to use, copy, modify and distribute this software and its
00006  * documentation for any purpose other than its commercial exploitation
00007  * is hereby granted without fee, provided that the above copyright
00008  * notice appear in all copies and that both that copyright notice and
00009  * this permission notice appear in supporting documentation, and that
00010  * the name of The University of Newcastle upon Tyne not be used in
00011  * advertising or publicity pertaining to distribution of the software
00012  * without specific, written prior permission. The University of
00013  * Newcastle upon Tyne makes no representations about the suitability of
00014  * this software for any purpose. It is provided "as is" without express
00015  * or implied warranty.
00016  * 
00017  * THE UNIVERSITY OF NEWCASTLE UPON TYNE DISCLAIMS ALL WARRANTIES WITH
00018  * REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF
00019  * MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL THE UNIVERSITY OF
00020  * NEWCASTLE UPON TYNE BE LIABLE FOR ANY SPECIAL, INDIRECT OR
00021  * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
00022  * USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
00023  * OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
00024  * PERFORMANCE OF THIS SOFTWARE.
00025  * 
00026  * Author:  Jim Wight (j.k.wight@newcastle.ac.uk)
00027  *          Department of Computing Science
00028  *          University of Newcastle upon Tyne, UK
00029  */
00030 
00031 #ifndef _ScrollingTextP_h
00032 #define _ScrollingTextP_h
00033 
00034 #include <X11/Xaw/PortholeP.h>
00035 #include <xwScrollText.h>
00036 
00037 typedef struct {
00038     XtPointer       extension;
00039     XtTranslations  translations;
00040 } ScrollingTextClassPart;
00041 
00042 typedef struct _ScrollingTextClassRec {
00043     CoreClassPart          core_class;
00044     CompositeClassPart     composite_class;
00045     PortholeClassPart      porthole_class;
00046     ScrollingTextClassPart scrolling_text_class;
00047 } ScrollingTextClassRec;
00048 
00049 extern ScrollingTextClassRec scrollingTextClassRec;
00050 
00051 typedef struct {                   /* new fields in widget */
00052     /* resources... */
00053     Boolean         scroll_on_movement;
00054     Widget          text_widget;
00055 
00056     /* private data... */
00057     int             font_width;
00058     XtActionHookId  action_hook;
00059     XtWorkProcId    work_proc;
00060 } ScrollingTextPart;
00061 
00062 typedef struct _ScrollingTextRec {
00063     CorePart          core;
00064     CompositePart     composite;
00065     PortholePart      porthole;
00066     ScrollingTextPart scrollingText;
00067 } ScrollingTextRec;
00068 
00069 #endif /* _ScrollingTextP_h */