aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/tool/compiler/phase/generation/jvm/runtime.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux/tool/compiler/phase/generation/jvm/runtime.lux32
1 files changed, 16 insertions, 16 deletions
diff --git a/stdlib/source/lux/tool/compiler/phase/generation/jvm/runtime.lux b/stdlib/source/lux/tool/compiler/phase/generation/jvm/runtime.lux
index 5968ed6c8..bd9cc1850 100644
--- a/stdlib/source/lux/tool/compiler/phase/generation/jvm/runtime.lux
+++ b/stdlib/source/lux/tool/compiler/phase/generation/jvm/runtime.lux
@@ -41,12 +41,12 @@
[variable
[partial
["#/." count]]]]]
- ["/#" //
- ["/#" //
- [//
- [arity (#+ Arity)]
- [reference (#+ Register)]
- ["." synthesis]]]]])
+ ["//#" ///
+ [//
+ [arity (#+ Arity)]
+ [reference (#+ Register)]
+ ["." synthesis]
+ ["." generation]]]])
(type: #export Byte-Code Binary)
@@ -58,17 +58,17 @@
[(type: #export <name>
(<base> Anchor (Bytecode Any) Definition))]
- [Operation ///.Operation]
- [Phase ///.Phase]
- [Handler ///.Handler]
- [Bundle ///.Bundle]
+ [Operation generation.Operation]
+ [Phase generation.Phase]
+ [Handler generation.Handler]
+ [Bundle generation.Bundle]
)
(type: #export (Generator i)
(-> Phase i (Operation (Bytecode Any))))
(type: #export Host
- (///.Host (Bytecode Any) Definition))
+ (generation.Host (Bytecode Any) Definition))
(def: #export class (type.class "LuxRuntime" (list)))
@@ -513,8 +513,8 @@
..try::method))
(row.row)))]
(do ////.monad
- [_ (///.execute! class [class bytecode])]
- (///.save! .false ["" class] [class bytecode]))))
+ [_ (generation.execute! class [class bytecode])]
+ (generation.save! .false ["" class] [class bytecode]))))
(def: generate-function
(Operation Any)
@@ -569,8 +569,8 @@
(list& <init>::method apply::method+)
(row.row)))]
(do ////.monad
- [_ (///.execute! class [class bytecode])]
- (///.save! .false ["" class] [class bytecode]))))
+ [_ (generation.execute! class [class bytecode])]
+ (generation.save! .false ["" class] [class bytecode]))))
(def: #export generate
(Operation Any)
@@ -584,4 +584,4 @@
## This shift is done to avoid the possibility of forged labels
## to be in the range of the labels that are generated automatically
## during the evaluation of Bytecode expressions.
- (:: ////.monad map (i64.left-shift shift) ///.next)))
+ (:: ////.monad map (i64.left-shift shift) generation.next)))