From 081209bd2f2b1aa60427de8fc1433891d30b7583 Mon Sep 17 00:00:00 2001 From: Thomas Hintz Date: Sat, 18 Apr 2015 11:36:35 -0700 Subject: [PATCH] Using size_t instead of int. --- websockets.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/websockets.scm b/websockets.scm index 2576dd3..7a928bb 100644 --- a/websockets.scm +++ b/websockets.scm @@ -184,21 +184,21 @@ (u8vector-set! tmaskkey 2 (vector-ref frame-masking-key 2)) (u8vector-set! tmaskkey 3 (vector-ref frame-masking-key 3)) - ((foreign-lambda* void ((blob wsmaskkey) (int wslen) (scheme-pointer wsv)) + ((foreign-lambda* void ((blob wsmaskkey) (size_t wslen) (scheme-pointer wsv)) " const unsigned char* maskkey2 = wsmaskkey; const unsigned int kd = *(unsigned int*)maskkey2; const unsigned char* __restrict kb = maskkey2; - int i; + size_t i; for (i = wslen >> 2; i != 0; --i) { *((unsigned int*)wsv) ^= kd; wsv += 4; } - const int rem = wslen & 3; + const size_t rem = wslen & 3; for (i = 0; i < rem; ++i) { *((unsigned int*)wsv++) ^= kb[i];