networks: Fix the comments for make-state and make-network-from-functions.

This commit is contained in:
Sergiu Ivanov 2020-02-23 08:47:16 +01:00
parent daf2e079ae
commit 5fd1b95d5c

View File

@ -72,14 +72,14 @@
(hash-set! new-s x (f s)))) (hash-set! new-s x (f s))))
new-s)) new-s))
;;; A version of make-hash restricted to creating network states (see ;;; A version of make-immutable-hash restricted to creating network
;;; contract). ;;; states (see contract).
(define (make-state mappings) (make-immutable-hash mappings)) (define (make-state mappings) (make-immutable-hash mappings))
;;; A shortcut for make-state. ;;; A shortcut for make-state.
(define-syntax-rule (st mappings) (make-state mappings)) (define-syntax-rule (st mappings) (make-state mappings))
;;; A version of make-hash restricted to creating networks. ;;; A version of make-immutable-hash restricted to creating networks.
(define (make-network-from-functions funcs) (make-immutable-hash funcs)) (define (make-network-from-functions funcs) (make-immutable-hash funcs))