aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program
diff options
context:
space:
mode:
authorEduardo Julian2019-03-30 21:45:45 -0400
committerEduardo Julian2019-03-30 21:45:45 -0400
commit118895081d97279a796cc704e6c23bf92ed79e5e (patch)
tree1ea654e3f913bfc5f978bba46620c535e7a4a7bc /stdlib/source/program
parent5009bfaa56119a58e675a1e6008623790b54cc1c (diff)
Re-named "do-template" to "template".
Diffstat (limited to 'stdlib/source/program')
-rw-r--r--stdlib/source/program/compositor/cli.lux2
-rw-r--r--stdlib/source/program/licentia/document.lux2
-rw-r--r--stdlib/source/program/licentia/license/definition.lux2
-rw-r--r--stdlib/source/program/licentia/license/term.lux2
-rw-r--r--stdlib/source/program/licentia/output.lux16
-rw-r--r--stdlib/source/program/scriptum.lux4
6 files changed, 14 insertions, 14 deletions
diff --git a/stdlib/source/program/compositor/cli.lux b/stdlib/source/program/compositor/cli.lux
index e08c83c7e..5c8e697a1 100644
--- a/stdlib/source/program/compositor/cli.lux
+++ b/stdlib/source/program/compositor/cli.lux
@@ -19,7 +19,7 @@
(#Compilation Configuration)
(#Interpretation Configuration))
-(do-template [<name> <long>]
+(template [<name> <long>]
[(def: #export <name>
(CLI Text)
(cli.named <long> cli.any))]
diff --git a/stdlib/source/program/licentia/document.lux b/stdlib/source/program/licentia/document.lux
index c04cd9d72..1fd0189eb 100644
--- a/stdlib/source/program/licentia/document.lux
+++ b/stdlib/source/program/licentia/document.lux
@@ -27,7 +27,7 @@
(|>> (list;map ..sentence)
(text.join-with text.new-line)))
-(do-template [<name> <word>]
+(template [<name> <word>]
[(def: #export <name>
(-> (List Text) Text)
(text.join-with (format ", " <word> " ")))]
diff --git a/stdlib/source/program/licentia/license/definition.lux b/stdlib/source/program/licentia/license/definition.lux
index 681f521e7..fea7b91f4 100644
--- a/stdlib/source/program/licentia/license/definition.lux
+++ b/stdlib/source/program/licentia/license/definition.lux
@@ -43,7 +43,7 @@
(def: covered-work-description
"work of authorship")
-(do-template [<name> <term> <meaning>]
+(template [<name> <term> <meaning>]
[(def: #export <name>
Definition
{#term <term>
diff --git a/stdlib/source/program/licentia/license/term.lux b/stdlib/source/program/licentia/license/term.lux
index 9e81cf666..31b3e4b5d 100644
--- a/stdlib/source/program/licentia/license/term.lux
+++ b/stdlib/source/program/licentia/license/term.lux
@@ -6,7 +6,7 @@
[//
["." definition]])
-(do-template [<term> <definition>]
+(template [<term> <definition>]
[(def: #export <term>
Text
(get@ #definition.term <definition>))]
diff --git a/stdlib/source/program/licentia/output.lux b/stdlib/source/program/licentia/output.lux
index 29d61dd42..43080697e 100644
--- a/stdlib/source/program/licentia/output.lux
+++ b/stdlib/source/program/licentia/output.lux
@@ -43,7 +43,7 @@
(def: #export (grant termination)
(-> Termination Text)
- (`` (format (~~ (do-template [<title> <content>]
+ (`` (format (~~ (template [<title> <content>]
[($.block ($.section {#$.title <title>
#$.content <content>}))]
@@ -65,7 +65,7 @@
(def: #export limitation
Text
- (`` (format (~~ (do-template [<title> <content>]
+ (`` (format (~~ (template [<title> <content>]
[($.block ($.section {#$.title <title>
#$.content <content>}))]
@@ -80,7 +80,7 @@
(def: #export assurance
Text
- (`` (format (~~ (do-template [<title> <content>]
+ (`` (format (~~ (template [<title> <content>]
[($.block ($.section {#$.title <title>
#$.content <content>}))]
@@ -92,7 +92,7 @@
(def: #export (liability value)
(-> Liability Text)
- (`` (format (~~ (do-template [<title> <condition> <content>]
+ (`` (format (~~ (template [<title> <condition> <content>]
[(if <condition>
($.block ($.section {#$.title <title>
#$.content <content>}))
@@ -120,7 +120,7 @@
(def: #export (distribution distribution)
(-> Distribution Text)
- (`` (format (~~ (do-template [<title> <condition> <content>]
+ (`` (format (~~ (template [<title> <condition> <content>]
[(if <condition>
($.block ($.section {#$.title <title>
#$.content <content>}))
@@ -141,7 +141,7 @@
(def: #export (commercial value)
(-> Commercial Text)
- (`` (format (~~ (do-template [<title> <condition> <content>]
+ (`` (format (~~ (template [<title> <condition> <content>]
[(if <condition>
($.block ($.section {#$.title <title>
#$.content <content>}))
@@ -168,7 +168,7 @@
#.None
[false ""])]
- (`` (format (~~ (do-template [<condition> <title> <content>]
+ (`` (format (~~ (template [<condition> <title> <content>]
[(if <condition>
($.block ($.section {#$.title <title>
#$.content <content>}))
@@ -210,7 +210,7 @@
(def: #export (miscellaneous identified?)
(-> Bit Text)
- (`` (format (~~ (do-template [<title> <condition> <content>]
+ (`` (format (~~ (template [<title> <condition> <content>]
[(if <condition>
($.block ($.section {#$.title <title>
#$.content <content>}))
diff --git a/stdlib/source/program/scriptum.lux b/stdlib/source/program/scriptum.lux
index defca9477..23b1d575b 100644
--- a/stdlib/source/program/scriptum.lux
+++ b/stdlib/source/program/scriptum.lux
@@ -46,7 +46,7 @@
(Sequence Text)
(|> 0 (sequence.iterate inc) (sequence;map parameter-type-name)))
-(do-template [<name> <partition>]
+(template [<name> <partition>]
[(def: (<name> id)
(-> Nat Bit)
(<partition> id))]
@@ -408,7 +408,7 @@
(list;fold (function.flip md.then)
(md.heading/2 "Macros"))))
-(do-template [<singular> <plural> <header>]
+(template [<singular> <plural> <header>]
[(def: (<singular> module type)
(-> Text Type (Markdown Block))
(md.code (pprint-type (dec 0) "?" module type)))