1 2 /* This file, rglobals.h, was generated automatically by "yap -L misc/buildheap" 3 please do not update, update misc/GLOBALS instead */ 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 RestoreWorker(int wid)23static void RestoreWorker(int wid) { 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 FOREIGN_WL(wid)->global_arena = TermToGlobalOrAtomAdjust(FOREIGN_WL(wid)->global_arena); 67 68 69 70 71 72 73 74 75 76 77 RestoreBallTerm(wid); 78 79 80 81 82 83 84 85 #ifdef COROUTINING 86 FOREIGN_WL(wid)->woken_goals = TermToGlobalAdjust(FOREIGN_WL(wid)->woken_goals); 87 FOREIGN_WL(wid)->atts_mutable_list = TermToGlobalAdjust(FOREIGN_WL(wid)->atts_mutable_list); 88 #endif 89 90 FOREIGN_WL(wid)->gc_generation = TermToGlobalAdjust(FOREIGN_WL(wid)->gc_generation); 91 FOREIGN_WL(wid)->gc_phase = TermToGlobalAdjust(FOREIGN_WL(wid)->gc_phase); 92 93 94 95 96 97 98 #if LOW_LEVEL_TRACER 99 100 #endif 101 102 103 #if defined(YAPOR) || defined(THREADS) 104 REINIT_LOCK(FOREIGN_WL(wid)->signal_lock); 105 106 107 108 109 #if DEBUG && COROUTINING 110 111 #endif 112 113 114 115 116 #if GC_NO_TAGS 117 118 #endif 119 #if defined(TABLING) || defined(SBA) 120 121 122 123 #else 124 125 126 127 #endif 128 129 130 131 132 133 134 135 136 137 138 139 #endif /* defined(YAPOR) || defined(THREADS) */ 140 141 FOREIGN_WL(wid)->dynamic_arrays = PtoArrayEAdjust(FOREIGN_WL(wid)->dynamic_arrays); 142 FOREIGN_WL(wid)->static_arrays = PtoArraySAdjust(FOREIGN_WL(wid)->static_arrays); 143 FOREIGN_WL(wid)->global_variables = PtoGlobalEAdjust(FOREIGN_WL(wid)->global_variables); 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 #if (defined(YAPOR) || defined(TABLING)) && defined(THREADS) 162 163 #endif 164 #ifdef THREADS 165 166 #define FOREIGN_ThreadHandle(wid) (Yap_WLocal[(wid)].thread_handle) 167 #define MY_ThreadHandle (Yap_WLocal[worker_id].thread_handle) 168 #endif 169 170 } 171 RestoreGlobal(void)172static void RestoreGlobal(void) { 173 174 #if THREADS 175 176 177 178 179 180 181 #endif 182 183 #if defined(YAPOR) || defined(THREADS) 184 185 REINIT_LOCK(Yap_global->bgl); 186 #endif 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 #if HAVE_LIBREADLINE 208 209 210 #endif 211 212 #ifdef THREADS 213 REINIT_LOCK(Yap_global->thread_handles_lock); 214 #endif 215 216 #if defined(YAPOR) || defined(TABLING) 217 218 219 #endif 220 221 222 223 224 225 226 227 } 228