From bdc418f7df352181b1fc4bf9f1aabe226f6ce6c6 Mon Sep 17 00:00:00 2001 From: malc Date: Thu, 25 Oct 2012 01:56:22 +0400 Subject: [PATCH] Cosmetics --- main.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/main.ml b/main.ml index 72034d6..bae9ea2 100644 --- a/main.ml +++ b/main.ml @@ -214,7 +214,7 @@ let cbgetg b circular dir = else rc ) ) - else max 0 (min rc (b.len-1)) + else bound rc 0 (b.len-1) in b.rc <- rc; b.store.(rc); -- 2.11.4.GIT