aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux')
-rw-r--r--stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux52
1 files changed, 26 insertions, 26 deletions
diff --git a/stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux b/stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux
index 5ba07b362..069ec4e1a 100644
--- a/stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux
+++ b/stdlib/source/lux/compiler/default/phase/extension/analysis/host.jvm.lux
@@ -231,7 +231,7 @@
(wrap (#analysis.Extension extension-name (list arrayA))))
_
- (////.throw bundle.incorrect-arity [extension-name 1 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 1 (list.size args)]))))
(def: array::new
Handler
@@ -270,7 +270,7 @@
lengthA))))
_
- (////.throw bundle.incorrect-arity [extension-name 1 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 1 (list.size args)]))))
(def: (check-jvm objectT)
(-> Type (Operation Text))
@@ -344,7 +344,7 @@
(wrap (#analysis.Extension extension-name (list (analysis.text elem-class) idxA arrayA))))
_
- (////.throw bundle.incorrect-arity [extension-name 2 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 2 (list.size args)]))))
(def: array::write
Handler
@@ -366,7 +366,7 @@
(wrap (#analysis.Extension extension-name (list (analysis.text elem-class) idxA valueA arrayA))))
_
- (////.throw bundle.incorrect-arity [extension-name 3 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 3 (list.size args)]))))
(def: bundle::array
Bundle
@@ -389,7 +389,7 @@
(wrap (#analysis.Extension extension-name (list))))
_
- (////.throw bundle.incorrect-arity [extension-name 0 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 0 (list.size args)]))))
(def: object::null?
Handler
@@ -404,7 +404,7 @@
(wrap (#analysis.Extension extension-name (list objectA))))
_
- (////.throw bundle.incorrect-arity [extension-name 1 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 1 (list.size args)]))))
(def: object::synchronized
Handler
@@ -419,7 +419,7 @@
(wrap (#analysis.Extension extension-name (list monitorA exprA))))
_
- (////.throw bundle.incorrect-arity [extension-name 2 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 2 (list.size args)]))))
(host.import: java/lang/Object
(equals [Object] boolean))
@@ -516,7 +516,7 @@
(wrap (#analysis.Extension extension-name (list exceptionA))))
_
- (////.throw bundle.incorrect-arity [extension-name 1 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 1 (list.size args)]))))
(def: object::class
Handler
@@ -531,10 +531,10 @@
(wrap (#analysis.Extension extension-name (list (analysis.text class)))))
_
- (////.throw bundle.invalid-syntax extension-name))
+ (////.throw ///.invalid-syntax extension-name))
_
- (////.throw bundle.incorrect-arity [extension-name 1 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 1 (list.size args)]))))
(def: object::instance?
Handler
@@ -554,10 +554,10 @@
(////.throw cannot-possibly-be-an-instance (format object-class " !<= " class))))
_
- (////.throw bundle.invalid-syntax extension-name))
+ (////.throw ///.invalid-syntax extension-name))
_
- (////.throw bundle.incorrect-arity [extension-name 2 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 2 (list.size args)]))))
(def: (java-type-to-class jvm-type)
(-> java/lang/reflect/Type (Operation Text))
@@ -739,7 +739,7 @@
" For value: " (%code valueC) "\n"))))
_
- (////.throw bundle.invalid-syntax extension-name))))
+ (////.throw ///.invalid-syntax extension-name))))
(def: bundle::object
Bundle
@@ -828,10 +828,10 @@
(wrap (#analysis.Extension extension-name (list (analysis.text class) (analysis.text field)))))
_
- (////.throw bundle.invalid-syntax extension-name))
+ (////.throw ///.invalid-syntax extension-name))
_
- (////.throw bundle.incorrect-arity [extension-name 2 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 2 (list.size args)]))))
(def: static::put
Handler
@@ -850,10 +850,10 @@
(wrap (#analysis.Extension extension-name (list (analysis.text class) (analysis.text field) valueA))))
_
- (////.throw bundle.invalid-syntax extension-name))
+ (////.throw ///.invalid-syntax extension-name))
_
- (////.throw bundle.incorrect-arity [extension-name 3 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 3 (list.size args)]))))
(def: virtual::get
Handler
@@ -869,10 +869,10 @@
(wrap (#analysis.Extension extension-name (list (analysis.text class) (analysis.text field) objectA))))
_
- (////.throw bundle.invalid-syntax extension-name))
+ (////.throw ///.invalid-syntax extension-name))
_
- (////.throw bundle.incorrect-arity [extension-name 3 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 3 (list.size args)]))))
(def: virtual::put
Handler
@@ -893,10 +893,10 @@
(wrap (#analysis.Extension extension-name (list (analysis.text class) (analysis.text field) valueA objectA))))
_
- (////.throw bundle.invalid-syntax extension-name))
+ (////.throw ///.invalid-syntax extension-name))
_
- (////.throw bundle.incorrect-arity [extension-name 4 (list.size args)]))))
+ (////.throw ///.incorrect-arity [extension-name 4 (list.size args)]))))
(def: (java-type-to-parameter type)
(-> java/lang/reflect/Type (Operation Text))
@@ -1155,7 +1155,7 @@
(analysis.text outputJC) (decorate-inputs argsT argsA)))))
_
- (////.throw bundle.invalid-syntax extension-name))))
+ (////.throw ///.invalid-syntax extension-name))))
(def: invoke::virtual
Handler
@@ -1178,7 +1178,7 @@
(analysis.text outputJC) objectA (decorate-inputs argsT argsA)))))
_
- (////.throw bundle.invalid-syntax extension-name))))
+ (////.throw ///.invalid-syntax extension-name))))
(def: invoke::special
Handler
@@ -1195,7 +1195,7 @@
(analysis.text outputJC) (decorate-inputs argsT argsA)))))
_
- (////.throw bundle.invalid-syntax extension-name))))
+ (////.throw ///.invalid-syntax extension-name))))
(def: invoke::interface
Handler
@@ -1216,7 +1216,7 @@
(decorate-inputs argsT argsA)))))
_
- (////.throw bundle.invalid-syntax extension-name))))
+ (////.throw ///.invalid-syntax extension-name))))
(def: invoke::constructor
Handler
@@ -1231,7 +1231,7 @@
(wrap (#analysis.Extension extension-name (list& (analysis.text class) (decorate-inputs argsT argsA)))))
_
- (////.throw bundle.invalid-syntax extension-name))))
+ (////.throw ///.invalid-syntax extension-name))))
(def: bundle::member
Bundle