From 1a033e7980a0b23ac4294df5651aed96504de4fe Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Mon, 21 Nov 2016 14:21:32 -0800 Subject: [PATCH] fix 16bit --- beautiful-racket/br/demo/wires/main.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/beautiful-racket/br/demo/wires/main.rkt b/beautiful-racket/br/demo/wires/main.rkt index be4bdc6..460dec3 100644 --- a/beautiful-racket/br/demo/wires/main.rkt +++ b/beautiful-racket/br/demo/wires/main.rkt @@ -36,7 +36,7 @@ num-or-wire (hash-ref! val-cache num-or-wire num-or-wire))))) -(define (mod-16bit x) (modulo x 65535)) +(define (mod-16bit x) (modulo x 65536)) (define-macro (define-16bit ID PROC-ID) #'(define ID (compose1 mod-16bit PROC-ID)))