From ef437d6584d8fd863c0dab276e5a3d4dc094767b Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 29 Aug 2021 21:59:48 -0400
Subject: De-taggification | part 0

---
 lux-cl/source/program.lux | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

(limited to 'lux-cl')

diff --git a/lux-cl/source/program.lux b/lux-cl/source/program.lux
index 3122dc31e..3b52fcdd2 100644
--- a/lux-cl/source/program.lux
+++ b/lux-cl/source/program.lux
@@ -67,7 +67,7 @@
 
 (ffi.import: (java/lang/Class a)
   ["#::."
-   (#static forName [java/lang/String] #try (java/lang/Class java/lang/Object))])
+   ("static" forName [java/lang/String] "try" (java/lang/Class java/lang/Object))])
 
 (ffi.import: java/lang/Object
   ["#::."
@@ -94,19 +94,19 @@
    (NTH [int] org/armedbear/lisp/LispObject)
    (SVREF [int] org/armedbear/lisp/LispObject)
    (elt [int] org/armedbear/lisp/LispObject)
-   (execute [org/armedbear/lisp/LispObject org/armedbear/lisp/LispObject] #try org/armedbear/lisp/LispObject)])
+   (execute [org/armedbear/lisp/LispObject org/armedbear/lisp/LispObject] "try" org/armedbear/lisp/LispObject)])
 
 ... 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
   ["#::."
-   (#static getInstance [] org/armedbear/lisp/Interpreter)
-   (#static createInstance [] #? org/armedbear/lisp/Interpreter)
-   (eval [java/lang/String] #try org/armedbear/lisp/LispObject)])
+   ("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
   ["#::."
-   (#static T org/armedbear/lisp/Symbol)])
+   ("static" T org/armedbear/lisp/Symbol)])
 
 (ffi.import: org/armedbear/lisp/DoubleFloat
   ["#::."
@@ -123,16 +123,16 @@
 (ffi.import: org/armedbear/lisp/Bignum
   ["#::."
    (longValue [] long)
-   (#static getInstance [long] org/armedbear/lisp/LispInteger)])
+   ("static" getInstance [long] org/armedbear/lisp/LispInteger)])
 
 (ffi.import: org/armedbear/lisp/Fixnum
   ["#::."
    (longValue [] long)
-   (#static getInstance [int] org/armedbear/lisp/Fixnum)])
+   ("static" getInstance [int] org/armedbear/lisp/Fixnum)])
 
 (ffi.import: org/armedbear/lisp/Nil
   ["#::."
-   (#static NIL org/armedbear/lisp/Symbol)])
+   ("static" NIL org/armedbear/lisp/Symbol)])
 
 (ffi.import: org/armedbear/lisp/SimpleVector)
 
-- 
cgit v1.2.3