From 43a114278e63709b1683fb82651e1c1598fd3938 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Todor=20Kondi=C4=87?= <todor.kondic@uni.lu>
Date: Sat, 2 May 2020 11:31:51 +0200
Subject: [PATCH] Add state creation function
* R/mix.R(new_state): New state (monad).
---
R/mix.R | 8 ++++++++
1 file changed, 8 insertions(+)
diff --git a/R/mix.R b/R/mix.R
index c14b30e..716bf93 100644
--- a/R/mix.R
+++ b/R/mix.R
@@ -601,3 +601,11 @@ write_conf <- function(conf,fn) {
read_conf <- function(fn) {
yaml::yaml.load_file(fn)
}
+
+
+new_state <- function(conf,GUI) {
+ m <- list()
+ m$conf <- conf
+ m$GUI <- GUI
+ m
+}
--
GitLab