From 8c90251c12a4d0d4cc191bfb273bb5eb51bb0356 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 8 May 2018 22:30:03 -0400
Subject: - Re-named "lux process concurrency-level" to "lux process
 parallelism-level". - Merged the functionality of "lux process future" into
 "lux process schedule".

---
 new-luxc/test/test/luxc/lang/analysis/procedure/common.lux | 6 +-----
 new-luxc/test/test/luxc/lang/translation/common.lux        | 2 +-
 2 files changed, 2 insertions(+), 6 deletions(-)

(limited to 'new-luxc/test')

diff --git a/new-luxc/test/test/luxc/lang/analysis/procedure/common.lux b/new-luxc/test/test/luxc/lang/analysis/procedure/common.lux
index a482c4265..4cee3dce3 100644
--- a/new-luxc/test/test/luxc/lang/analysis/procedure/common.lux
+++ b/new-luxc/test/test/luxc/lang/analysis/procedure/common.lux
@@ -299,11 +299,7 @@
          timeC (|> r.nat (:: @ map code.nat))]
         ($_ seq
             (test "Can query the level of concurrency."
-                  (check-success+ "lux process concurrency-level" (list) Nat))
-            (test "Can run an IO computation concurrently."
-                  (check-success+ "lux process future"
-                                  (list (` ("lux function" (~' _) (~' _) (~ primC))))
-                                  Top))
+                  (check-success+ "lux process parallelism-level" (list) Nat))
             (test "Can schedule an IO computation to run concurrently at some future time."
                   (check-success+ "lux process schedule"
                                   (list timeC
diff --git a/new-luxc/test/test/luxc/lang/translation/common.lux b/new-luxc/test/test/luxc/lang/translation/common.lux
index 25d3c4dc9..cfc96fbcf 100644
--- a/new-luxc/test/test/luxc/lang/translation/common.lux
+++ b/new-luxc/test/test/luxc/lang/translation/common.lux
@@ -529,7 +529,7 @@
   (-> Runner Test)
   ($_ seq
       (test "Can query the concurrency level of the machine."
-            (|> (run (` ("lux process concurrency-level")))
+            (|> (run (` ("lux process parallelism-level")))
                 (case> (#e.Success valueV)
                        (n/>= +1 (:! Nat valueV))
 
-- 
cgit v1.2.3