aboutsummaryrefslogtreecommitdiff
path: root/c/main.c
diff options
context:
space:
mode:
Diffstat (limited to 'c/main.c')
-rw-r--r--c/main.c9
1 files changed, 9 insertions, 0 deletions
diff --git a/c/main.c b/c/main.c
index 045d31c..d2ae07b 100644
--- a/c/main.c
+++ b/c/main.c
@@ -23,6 +23,7 @@ WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance,
HWND hWnd;
MSG msg;
INITCOMMONCONTROLSEX icc;
+ //term_t t;
WNDCLASSEX wc;
/* Initialize Prolog. */
@@ -33,6 +34,14 @@ WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance,
if (!PL_initialise(1, rgArgs))
PL_halt(1);
+ //t = PL_new_term_refs(1);
+ //if (!PL_put_atom_chars(t+0, "false"))
+ // return 0;
+ //if (!PL_call_predicate(NULL, PL_Q_NORMAL,
+ // PL_predicate("set_prolog_gc_thread", 1, "user"),
+ // t))
+ // return 0;
+
Attach();
/* Create window. */