scolobb/dds
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

read-context-sequence: Replace read-org-sexp by string->any.

Browse source 
read-org-sexp changed a couple commits earlier, so it doesn't work in
the same way as before in read-context-sequence.
This commit is contained in:
Sergiu Ivanov 2020-05-16 00:16:44 +02:00
parent c5d2ff629c
commit 8dbeaa9e55
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
rs.rkt
View file

@ -107,7 +107,7 @@
;;; Reads a context sequence from an Org sexp corresponding to a list. ;;; Reads a context sequence from an Org sexp corresponding to a list.
(define (read-context-sequence str) (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. ;;; Converts a reaction to a triple of strings.
(define/match (reaction->str-triple r) (define/match (reaction->str-triple r)