2011-03-24 10:25:02 +00:00
|
|
|
|
2011-05-11 18:22:58 +01:00
|
|
|
/* This file, hlocals.h, was generated automatically by "yap -L misc/buildlocalglobal"
|
2011-03-24 10:25:02 +00:00
|
|
|
please do not update, update misc/LOCALS instead */
|
|
|
|
|
|
|
|
|
|
|
|
typedef struct worker_local {
|
|
|
|
|
2011-05-11 18:22:58 +01:00
|
|
|
int c_input_stream_;
|
|
|
|
int c_output_stream_;
|
|
|
|
int c_error_stream_;
|
|
|
|
|
|
|
|
CELL* OldASP_;
|
|
|
|
CELL* OldLCL0_;
|
|
|
|
tr_fr_ptr OldTR_;
|
|
|
|
CELL* OldGlobalBase_;
|
|
|
|
CELL* OldH_;
|
|
|
|
CELL* OldH0_;
|
|
|
|
ADDR OldTrailBase_;
|
|
|
|
ADDR OldTrailTop_;
|
|
|
|
ADDR OldHeapBase_;
|
|
|
|
ADDR OldHeapTop_;
|
|
|
|
Int ClDiff_;
|
|
|
|
Int GDiff_;
|
|
|
|
Int HDiff_;
|
|
|
|
Int GDiff0_;
|
2011-05-23 16:19:47 +01:00
|
|
|
CELL* GSplit_;
|
2011-05-11 18:22:58 +01:00
|
|
|
Int LDiff_;
|
|
|
|
Int TrDiff_;
|
|
|
|
Int XDiff_;
|
|
|
|
Int DelayDiff_;
|
|
|
|
Int BaseDiff_;
|
|
|
|
|
|
|
|
YAP_ULONG_LONG ReductionsCounter_;
|
|
|
|
YAP_ULONG_LONG PredEntriesCounter_;
|
|
|
|
YAP_ULONG_LONG RetriesCounter_;
|
|
|
|
int ReductionsCounterOn_;
|
|
|
|
int PredEntriesCounterOn_;
|
|
|
|
int RetriesCounterOn_;
|
|
|
|
|
|
|
|
|
|
|
|
union CONSULT_OBJ* ConsultSp_;
|
|
|
|
|
|
|
|
UInt ConsultCapacity_;
|
|
|
|
|
|
|
|
union CONSULT_OBJ* ConsultBase_;
|
|
|
|
|
|
|
|
union CONSULT_OBJ* ConsultLow_;
|
|
|
|
|
|
|
|
Term GlobalArena_;
|
|
|
|
UInt GlobalArenaOverflows_;
|
|
|
|
Int ArenaOverflows_;
|
|
|
|
Int DepthArenas_;
|
|
|
|
int ArithError_;
|
|
|
|
struct pred_entry* LastAssertedPred_;
|
|
|
|
int DebugOn_;
|
|
|
|
char* ScannerStack_;
|
|
|
|
struct scanner_extra_alloc* ScannerExtraBlocks_;
|
|
|
|
struct DB_TERM* BallTerm_;
|
|
|
|
UInt ActiveSignals_;
|
|
|
|
UInt IPredArity_;
|
|
|
|
yamop* ProfEnd_;
|
|
|
|
int UncaughtThrow_;
|
|
|
|
int DoingUndefp_;
|
|
|
|
Int StartLine_;
|
|
|
|
scratch_block ScratchPad_;
|
2011-03-24 10:25:02 +00:00
|
|
|
#ifdef COROUTINING
|
2011-05-11 18:22:58 +01:00
|
|
|
Term WokenGoals_;
|
|
|
|
Term AttsMutableList_;
|
2011-03-24 10:25:02 +00:00
|
|
|
#endif
|
|
|
|
|
2011-05-11 18:22:58 +01:00
|
|
|
Term GcGeneration_;
|
|
|
|
Term GcPhase_;
|
|
|
|
UInt GcCurrentPhase_;
|
|
|
|
UInt GcCalls_;
|
|
|
|
Int TotGcTime_;
|
|
|
|
YAP_ULONG_LONG TotGcRecovered_;
|
|
|
|
Int LastGcTime_;
|
|
|
|
Int LastSSTime_;
|
|
|
|
|
|
|
|
Int total_marked_;
|
|
|
|
Int total_oldies_;
|
|
|
|
struct choicept* current_B_;
|
|
|
|
CELL* prev_HB_;
|
|
|
|
CELL* HGEN_;
|
|
|
|
CELL** iptop_;
|
2011-05-05 17:41:05 +01:00
|
|
|
#if defined(GC_NO_TAGS)
|
2011-05-11 18:22:58 +01:00
|
|
|
char* bp_;
|
2011-03-24 10:25:02 +00:00
|
|
|
#endif
|
2011-05-11 18:22:58 +01:00
|
|
|
tr_fr_ptr sTR_;
|
|
|
|
tr_fr_ptr sTR0_;
|
|
|
|
tr_fr_ptr new_TR_;
|
|
|
|
struct gc_mark_continuation* cont_top0_;
|
|
|
|
struct gc_mark_continuation* cont_top_;
|
|
|
|
int discard_trail_entries_;
|
|
|
|
gc_ma_hash_entry gc_ma_hash_table_[GC_MAVARS_HASH_SIZE];
|
|
|
|
gc_ma_hash_entry* gc_ma_h_top_;
|
|
|
|
gc_ma_hash_entry* gc_ma_h_list_;
|
|
|
|
UInt gc_timestamp_;
|
|
|
|
ADDR db_vec_;
|
|
|
|
ADDR db_vec0_;
|
|
|
|
struct RB_red_blk_node* db_root_;
|
|
|
|
struct RB_red_blk_node* db_nil_;
|
|
|
|
sigjmp_buf gc_restore_;
|
2011-12-13 10:01:51 +00:00
|
|
|
CELL* extra_gc_cells_;
|
|
|
|
CELL* extra_gc_cells_base_;
|
|
|
|
CELL* extra_gc_cells_top_;
|
|
|
|
UInt extra_gc_cells_size_;
|
2011-05-11 18:22:58 +01:00
|
|
|
struct array_entry* DynamicArrays_;
|
|
|
|
struct static_array_entry* StaticArrays_;
|
|
|
|
struct global_entry* GlobalVariables_;
|
|
|
|
int AllowRestart_;
|
|
|
|
|
|
|
|
struct mem_blk* CMemFirstBlock_;
|
|
|
|
UInt CMemFirstBlockSz_;
|
|
|
|
|
|
|
|
Int* LabelFirstArray_;
|
|
|
|
UInt LabelFirstArraySz_;
|
|
|
|
|
|
|
|
struct PL_local_data* PL_local_data_p_;
|
2011-03-24 10:25:02 +00:00
|
|
|
#ifdef THREADS
|
2011-05-11 18:22:58 +01:00
|
|
|
struct thandle ThreadHandle_;
|
2011-05-09 19:55:06 +01:00
|
|
|
#endif /* THREADS */
|
2011-05-09 19:36:51 +01:00
|
|
|
#if defined(YAPOR) || defined(TABLING)
|
2011-05-11 18:22:58 +01:00
|
|
|
struct local_optyap_data optyap_data_;
|
2011-05-09 19:36:51 +01:00
|
|
|
#endif /* YAPOR || TABLING */
|
2011-05-11 18:22:58 +01:00
|
|
|
int InterruptsDisabled_;
|
|
|
|
struct open_query_struct* execution_;
|
|
|
|
#if LOW_LEVEL_TRACER
|
|
|
|
Int total_choicepoints_;
|
|
|
|
#endif
|
|
|
|
int consult_level_;
|
|
|
|
#if defined(YAPOR) || defined(THREADS)
|
|
|
|
lockvar SignalLock_;
|
|
|
|
#endif
|
2011-05-23 16:19:47 +01:00
|
|
|
|
|
|
|
ADDR LocalBase_;
|
|
|
|
ADDR GlobalBase_;
|
|
|
|
ADDR TrailBase_;
|
|
|
|
ADDR TrailTop_;
|
|
|
|
char* ErrorMessage_;
|
|
|
|
Term Error_Term_;
|
|
|
|
#ifdef THREADS
|
|
|
|
Term Error_TYPE_;
|
|
|
|
#else
|
|
|
|
yap_error_number Error_TYPE_;
|
|
|
|
#endif
|
|
|
|
UInt Error_Size_;
|
|
|
|
char ErrorSay_[MAX_ERROR_MSG_SIZE];
|
|
|
|
jmp_buf IOBotch_;
|
|
|
|
TokEntry* tokptr_;
|
|
|
|
TokEntry* toktide_;
|
|
|
|
VarEntry* VarTable_;
|
|
|
|
VarEntry* AnonVarTable_;
|
2011-06-12 17:23:10 +01:00
|
|
|
Term Comments_;
|
|
|
|
CELL* CommentsTail_;
|
|
|
|
CELL* CommentsNextChar_;
|
|
|
|
wchar_t* CommentsBuff_;
|
|
|
|
size_t CommentsBuffPos_;
|
|
|
|
size_t CommentsBuffLim_;
|
2011-05-23 16:19:47 +01:00
|
|
|
sigjmp_buf RestartEnv_;
|
|
|
|
char FileNameBuf_[YAP_FILENAME_MAX];
|
|
|
|
char FileNameBuf2_[YAP_FILENAME_MAX];
|
2011-05-25 16:40:36 +01:00
|
|
|
|
|
|
|
Int PrologMode_;
|
|
|
|
int CritLocks_;
|
|
|
|
|
|
|
|
|
|
|
|
#ifdef ANALYST
|
|
|
|
YAP_ULONG_LONG opcount_[_std_top+1];
|
|
|
|
YAP_ULONG_LONG 2opcount[_std_top+1][_std_top+1]_;
|
|
|
|
#endif /* ANALYST */
|
|
|
|
|
|
|
|
struct db_globs* s_dbg_;
|
|
|
|
|
|
|
|
yap_error_number matherror_;
|
|
|
|
|
|
|
|
int heap_overflows_;
|
|
|
|
Int total_heap_overflow_time_;
|
|
|
|
int stack_overflows_;
|
|
|
|
Int total_stack_overflow_time_;
|
|
|
|
int delay_overflows_;
|
|
|
|
Int total_delay_overflow_time_;
|
|
|
|
int trail_overflows_;
|
|
|
|
Int total_trail_overflow_time_;
|
|
|
|
int atom_table_overflows_;
|
|
|
|
Int total_atom_table_overflow_time_;
|
|
|
|
|
|
|
|
#ifdef LOAD_DYLD
|
2011-08-16 14:34:44 +01:00
|
|
|
int dl_errno_;
|
2011-05-25 16:40:36 +01:00
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifdef LOW_LEVEL_TRACER
|
|
|
|
int do_trace_primitives_;
|
|
|
|
#endif
|
2011-08-16 14:34:44 +01:00
|
|
|
|
|
|
|
struct export_atom_hash_entry_struct **ExportAtomHashChain_;
|
|
|
|
UInt ExportAtomHashTableSize_;
|
|
|
|
UInt ExportAtomHashTableNum_;
|
|
|
|
struct export_functor_hash_entry_struct **ExportFunctorHashChain_;
|
|
|
|
UInt ExportFunctorHashTableSize_;
|
|
|
|
UInt ExportFunctorHashTableNum_;
|
2011-08-24 04:11:54 +01:00
|
|
|
struct export_pred_entry_hash_entry_struct **ExportPredEntryHashChain_;
|
|
|
|
UInt ExportPredEntryHashTableSize_;
|
|
|
|
UInt ExportPredEntryHashTableNum_;
|
2011-08-31 21:59:30 +01:00
|
|
|
struct export_dbref_hash_entry_struct **ExportDBRefHashChain_;
|
|
|
|
UInt ExportDBRefHashTableSize_;
|
|
|
|
UInt ExportDBRefHashTableNum_;
|
2011-08-24 04:11:54 +01:00
|
|
|
struct import_atom_hash_entry_struct **ImportAtomHashChain_;
|
|
|
|
UInt ImportAtomHashTableSize_;
|
|
|
|
UInt ImportAtomHashTableNum_;
|
|
|
|
struct import_functor_hash_entry_struct **ImportFunctorHashChain_;
|
|
|
|
UInt ImportFunctorHashTableSize_;
|
|
|
|
UInt ImportFunctorHashTableNum_;
|
|
|
|
struct import_opcode_hash_entry_struct **ImportOPCODEHashChain_;
|
|
|
|
UInt ImportOPCODEHashTableSize_;
|
|
|
|
struct import_pred_entry_hash_entry_struct **ImportPredEntryHashChain_;
|
|
|
|
UInt ImportPredEntryHashTableSize_;
|
|
|
|
UInt ImportPredEntryHashTableNum_;
|
2011-08-31 21:59:30 +01:00
|
|
|
struct import_dbref_hash_entry_struct **ImportDBRefHashChain_;
|
|
|
|
UInt ImportDBRefHashTableSize_;
|
|
|
|
UInt ImportDBRefHashTableNum_;
|
|
|
|
yamop *ImportFAILCODE_;
|
2011-03-24 10:25:02 +00:00
|
|
|
} w_local;
|