diff options
author | Eduardo Julian | 2022-06-05 01:39:29 -0400 |
---|---|---|
committer | Eduardo Julian | 2022-06-05 01:39:29 -0400 |
commit | f623de52d76ad8ec96feb048cd95a3fb150717e1 (patch) | |
tree | 92a53eb8e5a25287e59eb104716abe5cc2ebd60a /lux-cl | |
parent | 75e8244fd7914d2ac0c3622d2277b84c4bfa7ffb (diff) |
De-sigil-ification: : [Part 1]
Diffstat (limited to 'lux-cl')
-rw-r--r-- | lux-cl/source/program.lux | 38 |
1 files changed, 19 insertions, 19 deletions
diff --git a/lux-cl/source/program.lux b/lux-cl/source/program.lux index 2d56463d8..0e0db5007 100644 --- a/lux-cl/source/program.lux +++ b/lux-cl/source/program.lux @@ -63,33 +63,33 @@ ["[1][0]" cli] ["[1][0]" static]]]) -(ffi.import: java/lang/String +(ffi.import java/lang/String "[1]::[0]") -(ffi.import: (java/lang/Class a) +(ffi.import (java/lang/Class a) "[1]::[0]" ("static" forName [java/lang/String] "try" (java/lang/Class java/lang/Object))) -(ffi.import: java/lang/Object +(ffi.import java/lang/Object "[1]::[0]" (toString [] java/lang/String) (getClass [] (java/lang/Class java/lang/Object))) -(ffi.import: java/lang/Long +(ffi.import java/lang/Long "[1]::[0]" (intValue [] java/lang/Integer)) -(ffi.import: java/lang/Integer +(ffi.import java/lang/Integer "[1]::[0]" (longValue [] long)) -(ffi.import: java/lang/Number +(ffi.import java/lang/Number "[1]::[0]" (intValue [] java/lang/Integer) (longValue [] long) (doubleValue [] double)) -(ffi.import: org/armedbear/lisp/LispObject +(ffi.import org/armedbear/lisp/LispObject "[1]::[0]" (length [] int) (NTH [int] org/armedbear/lisp/LispObject) @@ -99,56 +99,56 @@ ... The org/armedbear/lisp/Interpreter must be imported before the ... other ones, because there is an order dependency in their static initialization. -(ffi.import: org/armedbear/lisp/Interpreter +(ffi.import org/armedbear/lisp/Interpreter "[1]::[0]" ("static" getInstance [] org/armedbear/lisp/Interpreter) ("static" createInstance [] "?" org/armedbear/lisp/Interpreter) (eval [java/lang/String] "try" org/armedbear/lisp/LispObject)) -(ffi.import: org/armedbear/lisp/Symbol +(ffi.import org/armedbear/lisp/Symbol "[1]::[0]" ("static" T org/armedbear/lisp/Symbol)) -(ffi.import: org/armedbear/lisp/DoubleFloat +(ffi.import org/armedbear/lisp/DoubleFloat "[1]::[0]" (new [double]) (doubleValue [] double)) -(ffi.import: org/armedbear/lisp/SimpleString +(ffi.import org/armedbear/lisp/SimpleString "[1]::[0]" (new [java/lang/String]) (getStringValue [] java/lang/String)) -(ffi.import: org/armedbear/lisp/LispInteger +(ffi.import org/armedbear/lisp/LispInteger "[1]::[0]") -(ffi.import: org/armedbear/lisp/Bignum +(ffi.import org/armedbear/lisp/Bignum "[1]::[0]" (longValue [] long) ("static" getInstance [long] org/armedbear/lisp/LispInteger)) -(ffi.import: org/armedbear/lisp/Fixnum +(ffi.import org/armedbear/lisp/Fixnum "[1]::[0]" (longValue [] long) ("static" getInstance [int] org/armedbear/lisp/Fixnum)) -(ffi.import: org/armedbear/lisp/Nil +(ffi.import org/armedbear/lisp/Nil "[1]::[0]" ("static" NIL org/armedbear/lisp/Symbol)) -(ffi.import: org/armedbear/lisp/SimpleVector +(ffi.import org/armedbear/lisp/SimpleVector "[1]::[0]") -(ffi.import: org/armedbear/lisp/Cons +(ffi.import org/armedbear/lisp/Cons "[1]::[0]") -(ffi.import: org/armedbear/lisp/Closure +(ffi.import org/armedbear/lisp/Closure "[1]::[0]") (ffi.interface: LuxADT (getValue [] java/lang/Object)) -(ffi.import: program/LuxADT +(ffi.import program/LuxADT "[1]::[0]" (getValue [] java/lang/Object)) |