summaryrefslogtreecommitdiff
path: root/src/bg_thread.dummy.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/bg_thread.dummy.sml')
-rw-r--r--src/bg_thread.dummy.sml9
1 files changed, 9 insertions, 0 deletions
diff --git a/src/bg_thread.dummy.sml b/src/bg_thread.dummy.sml
new file mode 100644
index 00000000..699fa741
--- /dev/null
+++ b/src/bg_thread.dummy.sml
@@ -0,0 +1,9 @@
+(*
+ Dummy implementation. Threading is only supported in MLton.
+ All other implementations just immediately run the background tasks
+*)
+structure BgThread:> BGTHREAD = struct
+ fun queueBgTask filename f = f ()
+ fun hasBgTasks () = false
+ fun runBgTaskForABit () = ()
+end