From 118895081d97279a796cc704e6c23bf92ed79e5e Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 30 Mar 2019 21:45:45 -0400
Subject: Re-named "do-template" to "template".

---
 .../luxc/lang/translation/common-lisp/procedure/common.jvm.lux    | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux')

diff --git a/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
index b140a11eb..3eaa60821 100644
--- a/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
@@ -142,7 +142,7 @@
       ))
 
 ## [[Bits]]
-(do-template [<name> <op>]
+(template [<name> <op>]
   [(def: (<name> [subjectO paramO])
      Binary
      (<op> paramO subjectO))]
@@ -182,7 +182,7 @@
   (#static MIN_VALUE Double)
   (#static MAX_VALUE Double))
 
-(do-template [<name> <const> <encode>]
+(template [<name> <const> <encode>]
   [(def: (<name> _)
      Nullary
      (<encode> <const>))]
@@ -192,7 +192,7 @@
   [frac//max      Double::MAX_VALUE            _.double]
   )
 
-(do-template [<name> <op>]
+(template [<name> <op>]
   [(def: (<name> [subjectO paramO])
      Binary
      (|> subjectO (<op> paramO)))]
@@ -206,7 +206,7 @@
   [int//< _.<]
   )
 
-(do-template [<name> <op>]
+(template [<name> <op>]
   [(def: (<name> [subjectO paramO])
      Binary
      (<op> paramO subjectO))]
-- 
cgit v1.2.3