From 7e44ee8a2cfb14e35f6283a9eb8d6a2ddc8bd99a Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 31 Jul 2018 20:22:15 -0400
Subject: Now implementing process functionality in stdlib instead of the
 compiler.

---
 .../lang/translation/ruby/procedure/common.jvm.lux     | 18 ------------------
 .../source/luxc/lang/translation/ruby/runtime.jvm.lux  | 14 --------------
 2 files changed, 32 deletions(-)

(limited to 'new-luxc/source/luxc/lang/translation/ruby')

diff --git a/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux
index 96d42a4a9..1f995b44b 100644
--- a/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux
@@ -412,23 +412,6 @@
           (install "read" (unary box//read))
           (install "write" (binary box//write)))))
 
-## [[Processes]]
-(def: (process//parallelism-level [])
-  Nullary
-  (ruby.int 1))
-
-(def: (process//schedule [milli-secondsO procedureO])
-  Binary
-  (runtimeT.process//schedule milli-secondsO procedureO))
-
-(def: process-procs
-  Bundle
-  (<| (prefix "process")
-      (|> (dict.new text.Hash<Text>)
-          (install "parallelism-level" (nullary process//parallelism-level))
-          (install "schedule" (binary process//schedule))
-          )))
-
 ## [Bundles]
 (def: #export procedures
   Bundle
@@ -441,5 +424,4 @@
           (dict.merge array-procs)
           (dict.merge io-procs)
           (dict.merge box-procs)
-          (dict.merge process-procs)
           )))
diff --git a/new-luxc/source/luxc/lang/translation/ruby/runtime.jvm.lux b/new-luxc/source/luxc/lang/translation/ruby/runtime.jvm.lux
index 32ab5b10c..02de3dc7b 100644
--- a/new-luxc/source/luxc/lang/translation/ruby/runtime.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/ruby/runtime.jvm.lux
@@ -230,19 +230,6 @@
   Runtime
   (format @@box//write))
 
-(runtime: (process//schedule milli-seconds procedure)
-  (ruby.block!
-   (list (format "(Thread.new {"
-                 (ruby.when! (ruby.not (ruby.= (ruby.int 0) milli-seconds))
-                             (ruby.statement (ruby.apply "sleep" (list (ruby./ (ruby.float 1_000.0) milli-seconds)))))
-                 (ruby.statement (ruby.call (list ..unit) procedure))
-                 "})")
-         (ruby.return! ..unit))))
-
-(def: runtime//process
-  Runtime
-  @@process//schedule)
-
 (def: runtime
   Runtime
   (format runtime//lux "\n"
@@ -251,7 +238,6 @@
           runtime//text "\n"
           runtime//array "\n"
           runtime//box "\n"
-          runtime//process "\n"
           ))
 
 (def: #export artifact Text (format prefix ".rb"))
-- 
cgit v1.2.3