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

networks: Remove an extra call to booleanize-state.

Browse source
This commit is contained in:
Sergiu Ivanov 2020-02-26 21:02:44 +01:00
parent b53639839f
commit 63b676b1ba
1 changed files with 0 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
networks.rkt
View file

@ -113,8 +113,6 @@
(define (booleanize-state s) (define (booleanize-state s)
(for/hash ([(x val) s]) (match val [0 (values x #f)] [1 (values x #t)]))) (for/hash ([(x val) s]) (match val [0 (values x #f)] [1 (values x #t)])))
(booleanize-state (st '((a . 1) (b . 0))))
;;; A shortcut for make-state-booleanize. ;;; A shortcut for make-state-booleanize.
(define-syntax-rule (stb s) (booleanize-state s)) (define-syntax-rule (stb s) (booleanize-state s))