From 54ab659064990ff37a9234c9792102a3b88277d6 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Wed, 8 Sep 2021 22:24:08 -0400 Subject: De-bracing | part 1 --- stdlib/source/documentation/lux.lux | 2 +- stdlib/source/documentation/lux/control/concurrency/actor.lux | 8 ++++---- stdlib/source/documentation/lux/debug.lux | 2 +- 3 files changed, 6 insertions(+), 6 deletions(-) (limited to 'stdlib/source/documentation') diff --git a/stdlib/source/documentation/lux.lux b/stdlib/source/documentation/lux.lux index d7eba1182..e9c09dfee 100644 --- a/stdlib/source/documentation/lux.lux +++ b/stdlib/source/documentation/lux.lux @@ -752,7 +752,7 @@ \n "Useful in situations where the result of a branch depends on further refinements on the values being matched.") [(case (split (size static) uri) (^multi (#Some [chunk uri']) - {(text\= static chunk) #1}) + [(text\= static chunk) #1]) (match_uri endpoint? parts' uri') _ diff --git a/stdlib/source/documentation/lux/control/concurrency/actor.lux b/stdlib/source/documentation/lux/control/concurrency/actor.lux index 1bbb4febe..c0701a367 100644 --- a/stdlib/source/documentation/lux/control/concurrency/actor.lux +++ b/stdlib/source/documentation/lux/control/concurrency/actor.lux @@ -56,7 +56,7 @@ .let [_ (debug.log! "AFTER")]] (in output))) - (message: .public (push {value a} state self) + (message: .public (push [value a] state self) (List a) (let [state' (#.Item value state)] (async.resolved (#try.Success [state' state']))))]) @@ -64,7 +64,7 @@ (actor: .public counter Nat - [(message: .public (count! {increment Nat} state self) + [(message: .public (count! [increment Nat] state self) Any (let [state' (n.+ increment state)] (async.resolved (#try.Success [state' state'])))) @@ -80,8 +80,8 @@ (documentation: /.actor (format "Defines an anonymous actor, with its behavior and internal state." \n "Messages for the actor must be defined after the on_mail handler.") - [(actor {Nat - 123} + [(actor [Nat + 123] ((on_mail message state self) (message (++ state) self)))]) diff --git a/stdlib/source/documentation/lux/debug.lux b/stdlib/source/documentation/lux/debug.lux index a78fea166..f4f38a373 100644 --- a/stdlib/source/documentation/lux/debug.lux +++ b/stdlib/source/documentation/lux/debug.lux @@ -58,7 +58,7 @@ bar +456 baz +789.0] (: Any - (here {foo %.nat} baz))) + (here [foo %.nat] baz))) "=>" "foo: 123" "baz: +789.0" -- cgit v1.2.3