diff options
author | Eduardo Julian | 2019-02-24 12:26:17 -0400 |
---|---|---|
committer | Eduardo Julian | 2019-02-24 12:26:17 -0400 |
commit | a72e34d30eaf3557f9b76ced9605a95759ce8eca (patch) | |
tree | 5fd88f66ac3b2b0abb5561521f806afb93c5134e /new-luxc/source/luxc/lang/host/jvm/inst.lux | |
parent | 950ac7c3311ad8ff4499164a30610fca2e57d5c9 (diff) |
Got new-luxc to compile/build again.
Diffstat (limited to '')
-rw-r--r-- | new-luxc/source/luxc/lang/host/jvm/inst.lux | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/new-luxc/source/luxc/lang/host/jvm/inst.lux b/new-luxc/source/luxc/lang/host/jvm/inst.lux index 9a26f8df0..5311f39d9 100644 --- a/new-luxc/source/luxc/lang/host/jvm/inst.lux +++ b/new-luxc/source/luxc/lang/host/jvm/inst.lux @@ -9,13 +9,13 @@ [text format] [collection - ["." list ("list/." Functor<List>)]]] + ["." list ("#/." functor)]]] ["." host (#+ import: do-to)] [macro ["." code] ["s" syntax (#+ syntax:)]] ["." function] - [platform + [tool [compiler [phase (#+ Operation)]]]] ["." // (#+ Primitive Inst) @@ -134,12 +134,12 @@ (do-to visitor (MethodVisitor::visitLdcInsn (<prepare> value)))))] - [boolean Bit id] + [boolean Bit function.identity] [int Int host.long-to-int] - [long Int id] - [double Frac id] + [long Int function.identity] + [double Frac function.identity] [char Nat (|>> .int host.long-to-int host.int-to-char)] - [string Text id] + [string Text function.identity] ) (syntax: (prefix {base s.local-identifier}) @@ -380,7 +380,7 @@ (-> (List Inst) Inst) (case insts #.Nil - id + function.identity (#.Cons singleton #.Nil) singleton |