From f623de52d76ad8ec96feb048cd95a3fb150717e1 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 5 Jun 2022 01:39:29 -0400
Subject: De-sigil-ification: : [Part 1]

---
 lux-scheme/source/program.lux | 38 +++++++++++++++++++-------------------
 1 file changed, 19 insertions(+), 19 deletions(-)

(limited to 'lux-scheme')

diff --git a/lux-scheme/source/program.lux b/lux-scheme/source/program.lux
index b91b74727..05f5bb3b3 100644
--- a/lux-scheme/source/program.lux
+++ b/lux-scheme/source/program.lux
@@ -65,75 +65,75 @@
    ["[1][0]" cli]
    ["[1][0]" static]]])
 
-(ffi.import: java/lang/Boolean
+(ffi.import java/lang/Boolean
   "[1]::[0]")
 
-(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]")
 
-(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 [] java/lang/Long))
 
-(ffi.import: gnu/math/IntNum
+(ffi.import gnu/math/IntNum
   "[1]::[0]"
   (new "manual" [int])
   (longValue [] long))
 
-(ffi.import: gnu/math/DFloNum
+(ffi.import gnu/math/DFloNum
   "[1]::[0]"
   (doubleValue [] double))
 
-(ffi.import: gnu/lists/FString
+(ffi.import gnu/lists/FString
   "[1]::[0]"
   (toString [] String))
 
-(ffi.import: gnu/lists/IString
+(ffi.import gnu/lists/IString
   "[1]::[0]"
   (toString [] String))
 
-(ffi.import: gnu/lists/Pair
+(ffi.import gnu/lists/Pair
   "[1]::[0]"
   (getCar [] java/lang/Object)
   (getCdr [] java/lang/Object))
 
-(ffi.import: gnu/lists/EmptyList
+(ffi.import gnu/lists/EmptyList
   "[1]::[0]"
   ("static" emptyList gnu/lists/EmptyList))
 
-(ffi.import: (gnu/lists/FVector E)
+(ffi.import (gnu/lists/FVector E)
   "[1]::[0]"
   (getBufferLength [] int)
   (getRaw [int] E))
 
-(ffi.import: gnu/lists/U8Vector
+(ffi.import gnu/lists/U8Vector
   "[1]::[0]")
 
-(ffi.import: gnu/mapping/Procedure
+(ffi.import gnu/mapping/Procedure
   "[1]::[0]"
   (apply2 [java/lang/Object java/lang/Object] "try" java/lang/Object)
   (applyN [[java/lang/Object]] "try" java/lang/Object))
 
-(ffi.import: gnu/mapping/Environment
+(ffi.import gnu/mapping/Environment
   "[1]::[0]")
 
-(ffi.import: gnu/expr/Language
+(ffi.import gnu/expr/Language
   "[1]::[0]"
   (eval [java/lang/String] "try" java/lang/Object))
 
-(ffi.import: kawa/standard/Scheme
+(ffi.import kawa/standard/Scheme
   "[1]::[0]"
   ("static" getR7rsInstance [] kawa/standard/Scheme))
 
@@ -163,7 +163,7 @@
   [(ffi.interface: <name>
      (getValue [] java/lang/Object))
 
-   (`` (ffi.import: (~~ (template.symbol ["program/" <name>]))
+   (`` (ffi.import (~~ (template.symbol ["program/" <name>]))
          "[1]::[0]"
          (getValue [] java/lang/Object)))]
 
-- 
cgit v1.2.3