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 */ |