| Guido van Rossum | a330996 | 1993-07-28 09:05:47 +0000 | [diff] [blame] | 1 | #ifndef Py_CEVAL_H | 
 | 2 | #define Py_CEVAL_H | 
 | 3 | #ifdef __cplusplus | 
 | 4 | extern "C" { | 
 | 5 | #endif | 
 | 6 |  | 
| Guido van Rossum | f70e43a | 1991-02-19 12:39:46 +0000 | [diff] [blame] | 7 | /*********************************************************** | 
| Guido van Rossum | 9bfef44 | 1993-03-29 10:43:31 +0000 | [diff] [blame] | 8 | Copyright 1991, 1992, 1993 by Stichting Mathematisch Centrum, | 
 | 9 | Amsterdam, The Netherlands. | 
| Guido van Rossum | f70e43a | 1991-02-19 12:39:46 +0000 | [diff] [blame] | 10 |  | 
 | 11 |                         All Rights Reserved | 
 | 12 |  | 
 | 13 | Permission to use, copy, modify, and distribute this software and its  | 
 | 14 | documentation for any purpose and without fee is hereby granted,  | 
 | 15 | provided that the above copyright notice appear in all copies and that | 
 | 16 | both that copyright notice and this permission notice appear in  | 
 | 17 | supporting documentation, and that the names of Stichting Mathematisch | 
 | 18 | Centrum or CWI not be used in advertising or publicity pertaining to | 
 | 19 | distribution of the software without specific, written prior permission. | 
 | 20 |  | 
 | 21 | STICHTING MATHEMATISCH CENTRUM DISCLAIMS ALL WARRANTIES WITH REGARD TO | 
 | 22 | THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND | 
 | 23 | FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH CENTRUM BE LIABLE | 
 | 24 | FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | 
 | 25 | WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | 
 | 26 | ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT | 
 | 27 | OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | 
 | 28 |  | 
 | 29 | ******************************************************************/ | 
 | 30 |  | 
| Guido van Rossum | ff4949e | 1992-08-05 19:58:53 +0000 | [diff] [blame] | 31 | /* Interface to random parts in ceval.c */ | 
| Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 32 |  | 
| Guido van Rossum | a049031 | 1991-07-27 21:33:03 +0000 | [diff] [blame] | 33 | object *call_object PROTO((object *, object *)); | 
 | 34 |  | 
| Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 35 | object *getglobals PROTO((void)); | 
 | 36 | object *getlocals PROTO((void)); | 
| Guido van Rossum | eb6b33a | 1993-05-25 09:38:27 +0000 | [diff] [blame] | 37 | object *getowner PROTO((void)); | 
| Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 38 |  | 
| Guido van Rossum | 3165fe6 | 1992-09-25 21:59:05 +0000 | [diff] [blame] | 39 | void printtraceback PROTO((object *)); | 
| Guido van Rossum | 704a26c | 1992-03-27 17:29:31 +0000 | [diff] [blame] | 40 | void flushline PROTO((void)); | 
| Guido van Rossum | ff4949e | 1992-08-05 19:58:53 +0000 | [diff] [blame] | 41 |  | 
 | 42 |  | 
 | 43 | /* Interface for threads. | 
 | 44 |  | 
 | 45 |    A module that plans to do a blocking system call (or something else | 
 | 46 |    that lasts a long time and doesn't touch Python data) can allow other | 
 | 47 |    threads to run as follows: | 
 | 48 |  | 
 | 49 | 	...preparations here... | 
 | 50 | 	BGN_SAVE | 
 | 51 | 	...blocking system call here... | 
 | 52 | 	END_SAVE | 
 | 53 | 	...interpretr result here... | 
 | 54 |  | 
 | 55 |    The BGN_SAVE/END_SAVE pair expands to a {}-surrounded block. | 
 | 56 |    To leave the block in the middle (e.g., with return), you must insert | 
 | 57 |    a line containing RET_SAVE before the return, e.g. | 
 | 58 |  | 
 | 59 | 	if (...premature_exit...) { | 
 | 60 | 		RET_SAVE | 
 | 61 | 		err_errno(IOError); | 
 | 62 | 		return NULL; | 
 | 63 | 	} | 
 | 64 |  | 
 | 65 |    An alternative is: | 
 | 66 |  | 
 | 67 | 	RET_SAVE | 
 | 68 | 	if (...premature_exit...) { | 
 | 69 | 		err_errno(IOError); | 
 | 70 | 		return NULL; | 
 | 71 | 	} | 
 | 72 | 	RES_SAVE | 
 | 73 |  | 
 | 74 |    For convenience, that the value of 'errno' is restored across | 
 | 75 |    END_SAVE and RET_SAVE. | 
 | 76 |  | 
 | 77 |    WARNING: NEVER NEST CALLS TO BGN_SAVE AND END_SAVE!!! | 
 | 78 |  | 
 | 79 |    The function init_save_thread() should be called only from | 
 | 80 |    initthread() in "threadmodule.c". | 
 | 81 |  | 
 | 82 |    Note that not yet all candidates have been converted to use this | 
 | 83 |    mechanism! | 
 | 84 | */ | 
 | 85 |  | 
 | 86 | extern void init_save_thread PROTO((void)); | 
| Guido van Rossum | 04691fc | 1992-08-12 15:35:34 +0000 | [diff] [blame] | 87 | extern object *save_thread PROTO((void)); | 
 | 88 | extern void restore_thread PROTO((object *)); | 
| Guido van Rossum | ff4949e | 1992-08-05 19:58:53 +0000 | [diff] [blame] | 89 |  | 
 | 90 | #ifdef USE_THREAD | 
 | 91 |  | 
 | 92 | #define BGN_SAVE { \ | 
| Guido van Rossum | 04691fc | 1992-08-12 15:35:34 +0000 | [diff] [blame] | 93 | 			object *_save; \ | 
| Guido van Rossum | ff4949e | 1992-08-05 19:58:53 +0000 | [diff] [blame] | 94 | 			_save = save_thread(); | 
 | 95 | #define RET_SAVE	restore_thread(_save); | 
 | 96 | #define RES_SAVE	_save = save_thread(); | 
 | 97 | #define END_SAVE	restore_thread(_save); \ | 
 | 98 | 		 } | 
 | 99 |  | 
 | 100 | #else /* !USE_THREAD */ | 
 | 101 |  | 
 | 102 | #define BGN_SAVE { | 
 | 103 | #define RET_SAVE | 
 | 104 | #define RES_SAVE | 
 | 105 | #define END_SAVE } | 
 | 106 |  | 
 | 107 | #endif /* !USE_THREAD */ | 
| Guido van Rossum | a330996 | 1993-07-28 09:05:47 +0000 | [diff] [blame] | 108 |  | 
 | 109 | #ifdef __cplusplus | 
 | 110 | } | 
 | 111 | #endif | 
 | 112 | #endif /* !Py_CEVAL_H */ |