From 3fe27b00588c442af4fca49f9c106c0486bd235a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Thu, 30 Apr 2020 18:18:23 +0200
Subject: Add global basedir var.

---
 module/global.scm | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 module/global.scm

(limited to 'module/global.scm')

diff --git a/module/global.scm b/module/global.scm
new file mode 100644
index 00000000..f8d0cd7f
--- /dev/null
+++ b/module/global.scm
@@ -0,0 +1,10 @@
+(define-module (global))
+
+;; TODO encapsulating these in
+;; atomic boxes might be a good
+;; idea.
+
+(define-once basedir #f)
+
+(export basedir)
+
-- 
cgit v1.2.3