15 classVariableNames: '' |
15 classVariableNames: '' |
16 poolDictionaries:'' |
16 poolDictionaries:'' |
17 category:'Interface-Graphics' |
17 category:'Interface-Graphics' |
18 ! |
18 ! |
19 |
19 |
20 GLXWorkstation comment:' |
|
21 COPYRIGHT (c) 1993 by Claus Gittinger |
|
22 All Rights Reserved |
|
23 |
|
24 $Header: /cvs/stx/stx/libview/GLXWorkstation.st,v 1.36 1995-11-10 21:19:55 cg Exp $ |
|
25 '! |
|
26 |
|
27 !GLXWorkstation class methodsFor:'documentation'! |
20 !GLXWorkstation class methodsFor:'documentation'! |
28 |
21 |
29 copyright |
22 copyright |
30 " |
23 " |
31 COPYRIGHT (c) 1993 by Claus Gittinger |
24 COPYRIGHT (c) 1993 by Claus Gittinger |
352 lastRequestCode = event->request_code; |
343 lastRequestCode = event->request_code; |
353 lastMinorCode = event->minor_code; |
344 lastMinorCode = event->minor_code; |
354 lastResource = event->resourceid; |
345 lastResource = event->resourceid; |
355 |
346 |
356 if (@global(ErrorPrinting) == true) { |
347 if (@global(ErrorPrinting) == true) { |
357 fprintf(stderr, "XWORKSTAT: x-error cought maj=%d (0x%x) min=%d (0x%x) resource=%x\n", |
348 fprintf(stderr, "XWORKSTAT: x-error cought maj=%d (0x%x) min=%d (0x%x) resource=%x\n", |
358 event->request_code, event->request_code, |
349 event->request_code, event->request_code, |
359 event->minor_code, event->minor_code, event->resourceid); |
350 event->minor_code, event->minor_code, event->resourceid); |
360 fprintf(stderr, "XWORKSTAT: x-error message is '%s'\n", lastErrorMsg); |
351 fprintf(stderr, "XWORKSTAT: x-error message is '%s'\n", lastErrorMsg); |
361 } |
352 } |
362 |
353 |
363 __errorInterruptWithIDAndParameter__(@symbol(DisplayError), __MKOBJ(dpy)); |
354 __errorInterruptWithIDAndParameter__(@symbol(DisplayError), __MKOBJ(dpy)); |
364 return 0; |
355 return 0; |
365 } |
356 } |