aboutsummaryrefslogtreecommitdiff
path: root/lux-cl/source
diff options
context:
space:
mode:
authorEduardo Julian2021-08-09 23:02:01 -0400
committerEduardo Julian2021-08-09 23:02:01 -0400
commit464b6e8f5e6c62f58fa8c7ff61ab2ad215e98bd1 (patch)
tree1ae9d95956cee4251cd29a3e24c246c4360d567d /lux-cl/source
parentf621a133e6e0a516c0586270fea8eaffb4829d82 (diff)
Improved single-line comment syntax (from "##" to "...").
Diffstat (limited to 'lux-cl/source')
-rw-r--r--lux-cl/source/program.lux14
1 files changed, 7 insertions, 7 deletions
diff --git a/lux-cl/source/program.lux b/lux-cl/source/program.lux
index c37367a2e..79991c38a 100644
--- a/lux-cl/source/program.lux
+++ b/lux-cl/source/program.lux
@@ -96,8 +96,8 @@
(elt [int] 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.
+... 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)
@@ -180,11 +180,11 @@
[java/lang/Double [org/armedbear/lisp/DoubleFloat::new]]
[java/lang/String [org/armedbear/lisp/SimpleString::new]]
))
- ## else
+ ... else
(:as org/armedbear/lisp/LispObject sub_value))))))]
(`` (ffi.object [] org/armedbear/lisp/LispObject [program/LuxADT]
[]
- ## Methods
+ ... Methods
(program/LuxADT
[] (getValue self) java/lang/Object
(:as java/lang/Object value))
@@ -237,7 +237,7 @@
(loop [idx 0
output (:as (Array Any) (array.new size))]
(if (n.< size idx)
- ## TODO: Start using "SVREF" instead of "elt" ASAP
+ ... TODO: Start using "SVREF" instead of "elt" ASAP
(case (read (org/armedbear/lisp/LispObject::elt (.int idx) host_object))
(#try.Failure error)
(#try.Failure error)
@@ -271,7 +271,7 @@
(exception.throw ..unknown_kind_of_object (:as java/lang/Object host_object)))
#.None)
- ## else
+ ... else
(exception.throw ..unknown_kind_of_object (:as java/lang/Object host_object))
)))
@@ -367,7 +367,7 @@
(for {@.old
(def: extender
Extender
- ## TODO: Stop relying on coercions ASAP.
+ ... TODO: Stop relying on coercions ASAP.
(<| (:as Extender)
(function (@self handler))
(:as Handler)