aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/compiler/default/phase/analysis.lux
diff options
context:
space:
mode:
authorEduardo Julian2018-08-03 22:53:33 -0400
committerEduardo Julian2018-08-03 22:53:33 -0400
commitc1f900baea30dbca55489c6afaf80dcfcda8813b (patch)
tree3222b069d0371481cad69e325b490e74617c3174 /stdlib/source/lux/compiler/default/phase/analysis.lux
parent1251b22ebc01795d19a67246350805654d8e6666 (diff)
Moved default compiler process to stdlib (with caching temporarily disabled).
Diffstat (limited to 'stdlib/source/lux/compiler/default/phase/analysis.lux')
-rw-r--r--stdlib/source/lux/compiler/default/phase/analysis.lux10
1 files changed, 10 insertions, 0 deletions
diff --git a/stdlib/source/lux/compiler/default/phase/analysis.lux b/stdlib/source/lux/compiler/default/phase/analysis.lux
index b0776141a..974fc2473 100644
--- a/stdlib/source/lux/compiler/default/phase/analysis.lux
+++ b/stdlib/source/lux/compiler/default/phase/analysis.lux
@@ -280,3 +280,13 @@
(#error.Error error)
(#error.Error error))))))
+
+(do-template [<name> <type> <field> <value>]
+ [(def: #export (<name> value)
+ (-> <type> (Operation Any))
+ (extension.update (set@ <field> <value>)))]
+
+ [set-source-code Source #.source value]
+ [set-current-module Text #.current-module (#.Some value)]
+ [set-cursor Cursor #.cursor value]
+ )