![]() |
GNU PROLOG with UTF8 support
|
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <setjmp.h>
#include "gp_config.h"
#include "set_locale.h"
#include <sys/param.h>
#include "engine_pl.h"
#include "../Linedit/linedit.h"
#include "../TopComp/prolog_path.c"
Macros | |
#define | ENGINE_FILE |
#define | ERR_DIRECTIVE_FAILED "warning: %s:%d: %s directive failed\n" |
Functions | |
static void | Call_Prolog_Fail (void) |
static void | Call_Prolog_Success (void) |
static Bool | Call_Next (CodePtr codep) |
void | Pl_Call_Compiled (CodePtr codep) |
int | Pl_Start_Prolog (int argc, char *argv[]) |
void | Pl_Stop_Prolog (void) |
void | Pl_Reset_Prolog (void) |
void | Pl_Reset_Prolog_In_Signal (void) |
void | Pl_Set_Heap_Actual_Start (WamWord *new_heap_actual_start) |
void | Pl_Execute_Directive (int pl_file, int pl_line, Bool is_system, CodePtr proc) |
Bool | Pl_Try_Execute_Top_Level (void) |
Bool | Pl_Call_Prolog (CodePtr codep) |
Bool | Pl_Call_Prolog_Next_Sol (WamWord *query_b) |
void | Pl_Keep_Rest_For_Prolog (WamWord *query_b) |
void | Pl_Exit_With_Exception (void) |
void | Pl_Execute_A_Continuation (CodePtr codep) |
Variables | |
void(* | pl_init_stream_supp )() |
static WamWord * | heap_actual_start |
static int | nb_user_directives = 0 |
static sigjmp_buf * | p_jumper |
static WamWord * | p_buff_save |
static CodePtr | cont_jmp |
#define ENGINE_FILE |
#define ERR_DIRECTIVE_FAILED "warning: %s:%d: %s directive failed\n" |
|
static |
|
static |
(defined(M_x86_64) && defined(_MSC_VER))
|
static |
void Pl_Call_Compiled | ( | CodePtr | codep | ) |
Bool Pl_Call_Prolog | ( | CodePtr | codep | ) |
void Pl_Execute_A_Continuation | ( | CodePtr | codep | ) |
void Pl_Execute_Directive | ( | int | pl_file, |
int | pl_line, | ||
Bool | is_system, | ||
CodePtr | proc | ||
) |
void Pl_Exit_With_Exception | ( | void | ) |
void Pl_Keep_Rest_For_Prolog | ( | WamWord * | query_b | ) |
void Pl_Reset_Prolog | ( | void | ) |
void Pl_Reset_Prolog_In_Signal | ( | void | ) |
void Pl_Set_Heap_Actual_Start | ( | WamWord * | new_heap_actual_start | ) |
int Pl_Start_Prolog | ( | int | argc, |
char * | argv[] | ||
) |
void Pl_Stop_Prolog | ( | void | ) |
Bool Pl_Try_Execute_Top_Level | ( | void | ) |
|
static |
|
static |
|
static |
|
static |
|
static |
void(* pl_init_stream_supp) () |