From e1cf2d9780de765fc925b0ea3c9b29d532e70c2e Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 8 Jul 2018 03:53:57 -0400
Subject: - Ported caching machinery for Lux Meta-Compiler to stdlib.

---
 new-luxc/source/luxc/cache/influences.lux | 27 ---------------------------
 1 file changed, 27 deletions(-)
 delete mode 100644 new-luxc/source/luxc/cache/influences.lux

(limited to 'new-luxc/source/luxc/cache/influences.lux')

diff --git a/new-luxc/source/luxc/cache/influences.lux b/new-luxc/source/luxc/cache/influences.lux
deleted file mode 100644
index bbddd79aa..000000000
--- a/new-luxc/source/luxc/cache/influences.lux
+++ /dev/null
@@ -1,27 +0,0 @@
-(.module:
-  lux
-  (lux (data [text]
-             (coll [list "list/" Fold<List>]
-                   (dictionary ["dict" unordered #+ Dict])))))
-
-(type: #export Influences (Dict Text (List Text)))
-
-(def: #export (track to from)
-  (-> Text Text Influences Influences)
-  (|>> (dict.update~ from (list) (|>> (#.Cons to)))
-       (dict.update~ to (list) id)))
-
-(def: (effluents module influences)
-  (-> Text Influences (Maybe (List Text)))
-  (dict.get module influences))
-
-(def: #export (untrack module influences)
-  (-> Text Influences Influences)
-  (case (effluents module influences)
-    (#.Some effluents)
-    (list/fold untrack (dict.remove module influences) effluents)
-
-    #.None
-    influences))
-
-(def: #export empty Influences (dict.new text.Hash<Text>))
-- 
cgit v1.2.3