Mercurial > hg > xemacs-beta

comparison src/EmacsFrame.c @ 16:0293115a14e9 r19-15b91

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b91
author cvs
date Mon, 13 Aug 2007 08:49:20 +0200
parents ac2d302a0011
children ec9a17fef872
comparison
equal deleted inserted replaced
15:ad457d5f7d04 16:0293115a14e9
83 offset (scrollbar_width), XtRImmediate, (XtPointer)-1}, 83 offset (scrollbar_width), XtRImmediate, (XtPointer)-1},
84 {XtNscrollBarHeight, XtCScrollBarHeight, XtRInt, sizeof (int), 84 {XtNscrollBarHeight, XtCScrollBarHeight, XtRInt, sizeof (int),
85 offset (scrollbar_height), XtRImmediate, (XtPointer)-1}, 85 offset (scrollbar_height), XtRImmediate, (XtPointer)-1},
86 {XtNscrollBarPlacement, XtCScrollBarPlacement, XtRScrollBarPlacement, 86 {XtNscrollBarPlacement, XtCScrollBarPlacement, XtRScrollBarPlacement,
87 sizeof(unsigned char), offset(scrollbar_placement), XtRImmediate, 87 sizeof(unsigned char), offset(scrollbar_placement), XtRImmediate,
88 #if defined (LWLIB_SCROLLBARS_MOTIF) || defined (LWLIB_SCROLLBARS_LUCID) 88 #if defined (LWLIB_SCROLLBARS_MOTIF) || defined (LWLIB_SCROLLBARS_LUCID) || \
89 defined (LWLIB_SCROLLBARS_ATHENA3D)
89 (XtPointer) XtBOTTOM_RIGHT 90 (XtPointer) XtBOTTOM_RIGHT
90 #else 91 #else
91 (XtPointer) XtBOTTOM_LEFT 92 (XtPointer) XtBOTTOM_LEFT
92 #endif 93 #endif
93 }, 94 },
479 || ((mask & CWHeight) && ok_height != request->height)) 480 || ((mask & CWHeight) && ok_height != request->height))
480 return XtGeometryAlmost; 481 return XtGeometryAlmost;
481 else 482 else
482 return XtGeometryYes; 483 return XtGeometryYes;
483 } 484 }
484 /**** string-to-scrollbar-placement converter: modelled after edge-type 485
485 converter in Xaw/Form.c ****/ 486 /* Xt string-to-scrollbar-placement converter */
486 487 /* ### Convert this to a `new-style' converter (See XtAddTypeConverter) */
487 #define done(address, type) \ 488
489 /* This variable cannot be a stack variable. */
490 static unsigned char cvt_string_scrollbar_placement;
491
492 /* ARGSUSED */
493 static void
494 _CvtStringToScrollBarPlacement (XrmValuePtr args, /* unused */
495 Cardinal *num_args, /* unused */
496 XrmValuePtr fromVal,
497 XrmValuePtr toVal)
498 {
499 #define done(address, type) \
488 toVal->size = sizeof(type); \ 500 toVal->size = sizeof(type); \
489 toVal->addr = (XtPointer) address; \ 501 toVal->addr = (XtPointer) address; \
490 return /* `;' supplied by caller */ 502 return /* `;' supplied by caller */
491 503
492 /* This variable cannot be a stack variable. */
493 static unsigned char cvt_string_scrollbar_placement;
494
495 /* ARGSUSED */
496 static void
497 _CvtStringToScrollBarPlacement (args, num_args, fromVal, toVal)
498 XrmValuePtr args; /* unused */
499 Cardinal *num_args; /* unused */
500 XrmValuePtr fromVal;
501 XrmValuePtr toVal;
502 {
503 XrmQuark q; 504 XrmQuark q;
504 char lowerName[1000]; 505 char lowerName[1000];
505 506
506 XmuCopyISOLatin1Lowered (lowerName, (char*)fromVal->addr); 507 XmuCopyISOLatin1Lowered (lowerName, (char*)fromVal->addr);
507 q = XrmStringToQuark(lowerName); 508 q = XrmStringToQuark(lowerName);
526 done (&cvt_string_scrollbar_placement, unsigned char); 527 done (&cvt_string_scrollbar_placement, unsigned char);
527 } 528 }
528 XtStringConversionWarning (fromVal->addr, "scrollBarPlacement"); 529 XtStringConversionWarning (fromVal->addr, "scrollBarPlacement");
529 toVal->addr = NULL; 530 toVal->addr = NULL;
530 toVal->size = 0; 531 toVal->size = 0;
532 #undef done
531 } 533 }
532 534
533 static void 535 static void
534 EmacsFrameClassInitialize (void) 536 EmacsFrameClassInitialize (void)
535 { 537 {