From 7a00f761db31ada5098d3e4a2ce995fa775c47c9 Mon Sep 17 00:00:00 2001 From: code Date: Mon, 10 Nov 2014 22:04:35 +0100 Subject: Update for Racket 6.1. --- salsa-chacha.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'salsa-chacha.rkt') diff --git a/salsa-chacha.rkt b/salsa-chacha.rkt index bf7a6ee..9a07820 100644 --- a/salsa-chacha.rkt +++ b/salsa-chacha.rkt @@ -133,7 +133,7 @@ (: times (All (a) ((a -> a) Integer -> (a -> a)))) (define (times fn n) - (for/fold ([acc (inst identity a)]) + (for/fold ([acc : (a -> a) (inst identity a)]) ([i (in-range 0 n)]) (compose fn acc))) -- cgit v1.2.3