From 061fd8a209bbcaffc2bfb850ac6046752a567d50 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 27 Jul 2021 03:51:10 -0400
Subject: Re-named wrap => in && unwrap => out.

---
 lux-python/source/program.lux | 26 +++++++++++++-------------
 1 file changed, 13 insertions(+), 13 deletions(-)

(limited to 'lux-python/source')

diff --git a/lux-python/source/program.lux b/lux-python/source/program.lux
index f7c167368..8dad70853 100644
--- a/lux-python/source/program.lux
+++ b/lux-python/source/program.lux
@@ -12,7 +12,7 @@
      ["." io (#+ IO io)]
      ["." function]
      [concurrency
-      ["." promise (#+ Promise)]]]
+      ["." async (#+ Async)]]]
     [data
      ["." maybe]
      ["." text ("#\." hash)
@@ -153,10 +153,10 @@
                  (#try.Failure try)
                  
                  (^multi [(#try.Success tag) (#try.Success flag) (#try.Success value)]
-                         [(read tag)
-                          (#try.Success tag)]
-                         [(read value)
-                          (#try.Success value)])
+                         {(read tag)
+                          (#try.Success tag)}
+                         {(read value)
+                          (#try.Success value)})
                  (#try.Success [tag
                                 (: Any
                                    (case (ffi.check org/python/core/PyNone flag)
@@ -289,7 +289,7 @@
                   (def: (ingest context content)
                     (|> content
                         (\ utf8.codec decode)
-                        try.assume
+                        try.assumed
                         (:as (_.Statement Any))))
 
                   (def: (re_learn context custom content)
@@ -329,7 +329,7 @@
                          (def: define! define!)
 
                          (def: (ingest context content)
-                           (|> content (\ utf8.codec decode) try.assume (:as (_.Statement Any))))
+                           (|> content (\ utf8.codec decode) try.assumed (:as (_.Statement Any))))
 
                          (def: (re_learn context content)
                            (execute! content))
@@ -358,7 +358,7 @@
                                {inputs [org/python/core/PyObject]}
                                {keywords [java/lang/String]})
                   org/python/core/PyObject
-                  (try.assume
+                  (try.assumed
                    (case (array.to_list inputs)
                      (^ (list))
                      (\ try.monad wrap (host_phase (list) phase))
@@ -429,10 +429,10 @@
                    (:as Operation)
                    (function (_ state))
                    (:as Try)
-                   try.assume
+                   try.assumed
                    (:as Try)
                    (do try.monad
-                     [handler (try.from_maybe (..ensure_function handler))
+                     [handler (try.of_maybe (..ensure_function handler))
                       output (org/python/core/PyFunction::__call__ (|> (ffi.array org/python/core/PyObject 5)
                                                                        (ffi.array_write 0 (org/python/core/PyString::new name))
                                                                        (ffi.array_write 1 (:as org/python/core/PyObject (phase_wrapper phase)))
@@ -479,8 +479,8 @@
                                       _.none)))))
 
 (def: (declare_success! _)
-  (-> Any (Promise Any))
-  (promise.future (\ world/program.default exit +0)))
+  (-> Any (Async Any))
+  (async.future (\ world/program.default exit +0)))
 
 (def: (scope body)
   (-> (_.Statement Any) (_.Statement Any))
@@ -497,7 +497,7 @@
 
 (program: [{service /cli.service}]
   (let [extension ".py"]
-    (exec (do promise.monad
+    (exec (do async.monad
             [_ (/.compiler {#/static.host @.python
                             #/static.host_module_extension extension
                             #/static.target (/cli.target service)
-- 
cgit v1.2.3