From 8dbeaa9e5544ee95033f07fe53fa46f952266bfc Mon Sep 17 00:00:00 2001 From: Sergiu Ivanov Date: Sat, 16 May 2020 00:16:44 +0200 Subject: [PATCH] read-context-sequence: Replace read-org-sexp by string->any. read-org-sexp changed a couple commits earlier, so it doesn't work in the same way as before in read-context-sequence. --- rs.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/rs.rkt b/rs.rkt index bb19216..4c2c6cf 100644 --- a/rs.rkt +++ b/rs.rkt @@ -107,7 +107,7 @@ ;;; Reads a context sequence from an Org sexp corresponding to a list. (define (read-context-sequence str) - (map (compose list->set read-symbol-list) (flatten (read-org-sexp str)))) + (map (compose list->set read-symbol-list) (flatten (string->any str)))) ;;; Converts a reaction to a triple of strings. (define/match (reaction->str-triple r)