1 files changed, 13 insertions, 1 deletions
diff --git a/dialoguer/context_script.r b/dialoguer/context_script.r
index 1d59dd8..8629f2a 100644
--- a/dialoguer/context_script.r
+++ b/dialoguer/context_script.r
@@ -123,7 +123,19 @@ import_variable <- function() {
 }
 
 evaluate_expression <- function () {
-
+	arg_count <- recv(con, FALSE, "integer")
+	send(con, TRUE)
+	method_name <- recv(con, FALSE, "character")
+	send(con, TRUE)
+	args <- list()
+	if (arg_count > 0) {
+		for (i in 1:arg_count) {
+		args <- c(args, recv(con, TRUE))
+		send(con, TRUE)
+		}
+	}
+	result <- do.call(method_name, args)
+	send(con, result, TRUE)
 }
 
 con <- find_connection()