lin_xs: set promiseJobsFlag in fxQueuePromiseJobs

This lets the lin_xs_cli platform run the promise queue to quiescence, a technique taken from xsl.
dckc · Dec 27, 2019 · dd39fd6 · dd39fd6
1 parent 2f7f8c2
commit dd39fd6
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 0 deletions.
diff --git a/xs/platforms/lin_xs.c b/xs/platforms/lin_xs.c
@@ -71,6 +71,7 @@ void fxDeleteMachinePlatform(txMachine* the)
 
 void fxQueuePromiseJobs(txMachine* the)
 {
+	the->promiseJobsFlag = 1;
 	GSource* idle_source = g_idle_source_new();
 	g_source_set_callback(idle_source, fxQueuePromiseJobsCallback, the, NULL);
 	g_source_set_priority(idle_source, G_PRIORITY_DEFAULT);

diff --git a/xs/platforms/lin_xs.h b/xs/platforms/lin_xs.h
@@ -87,6 +87,7 @@ extern void fxQueueWorkerJob(void* machine, void* job);
 	void* waiterCondition; \
 	void* waiterData; \
 	void* waiterLink; \
+	gboolean promiseJobsFlag; \
 	GMainContext* workerContext; \
 	GMutex workerMutex; \
 	txWorkerJob* workerQueue;