From ac8e63c5f465309a98bbd97f2e3e774e4bd0fd16 Mon Sep 17 00:00:00 2001 From: Sergiu Ivanov Date: Sat, 22 Feb 2020 23:20:10 +0100 Subject: [PATCH] networks: Make the state an immutable hash table by default. --- networks.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/networks.rkt b/networks.rkt index 500cdc5..cda1dc7 100644 --- a/networks.rkt +++ b/networks.rkt @@ -70,7 +70,7 @@ ;;; A version of make-hash restricted to creating network states (see ;;; contract). -(define (make-state mappings) (make-hash mappings)) +(define (make-state mappings) (make-immutable-hash mappings)) ;;; A shortcut for make-state. (define-syntax-rule (st mappings) (make-state mappings))