[Search for users] [Overall Top Noters] [List of all Conferences] [Download this site]

Conference bulova::decw_jan-89_to_nov-90

Title:DECWINDOWS 26-JAN-89 to 29-NOV-90
Notice:See 1639.0 for VMS V5.3 kit; 2043.0 for 5.4 IFT kit
Moderator:STAR::VATNE
Created:Mon Oct 30 1989
Last Modified:Mon Dec 31 1990
Last Successful Update:Fri Jun 06 1997
Number of topics:3726
Total number of notes:19516

1454.0. "x$synchronize in pascal" by PIOPIO::DEDIEGO (Fernando de Diego) Mon Sep 18 1989 10:44

  I wish to call the X$SYNCHRONIZE routine in my Dwt-UIL-PASCAL program, since 
I would like to debug it; however, I have gotten only failures. If you Know how 
to do it, could you answer my questions, please????
	1.) How have I to declare the after_function parameter:?
	2.) What should I do to use the default after_function GET INPUT FOCUS.?
	3.) How and where in the program must I call the X$SYNCHRONIZE routine?
	4.) Might I employ the Xtoolkit DISPLAY INITIALIZE routine for it,
	    like is suggested en the description of this routine?

	state = x$synchronize(display,onoff,after_function)
		state.wl.v = previous state
		display.rlu.r = on/off flag
		onoff.rl.r = on/off flag
		after_function.wa.vp = after function

[ASYNCHRONOUS] FUNCTION x$synchronize (display : UNSIGNED;
					onoff : INTEGER;
					%IMMED [UNBOUND, ASYNCHONOUS]
						PROCEDURE after_function)
					INTEGER; EXTERNAL;

THANks you
T.RTitleUserPersonal
Name		DateLines
1454.1YABO?EPIK::BUEHLERLive today, for tommorrow isn't here yetMon Sep 18 1989 18:1820
    Yet another binding oddity.  Forget the VMS binding of this routine. 
    Just call the C binding using the following function declaration.
    
       [HIDDEN] FUNCTION XSynchronize(%IMMED display : UNSIGNED;
                                      %IMMED flags : INTEGER) : UNSIGNED;
    
          EXTERN;
    
    e.g.
    
    	XSynchronize(display, 1)
    
    to turn on synchronous mode and
    
    	XSynchronize(display, 0)
    
    to turn it off.
    
John