From 290bcceb1782bde9f6c58ab5df4425b92a217f13 Mon Sep 17 00:00:00 2001
From: Rudi Grinberg <rudi.grinberg@gmail.com>
Date: Mon, 26 Feb 2018 01:39:16 +0700
Subject: [PATCH] s/capitalize_ascii/capitalize/

---
 src/utop.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/utop.ml b/src/utop.ml
index d4488681..73c24f4b 100644
--- a/src/utop.ml
+++ b/src/utop.ml
@@ -4,7 +4,7 @@ open Build.O
 open! No_io
 
 let exe_name = "utop"
-let main_module_name = String.capitalize_ascii exe_name
+let main_module_name = String.capitalize exe_name
 let main_module_filename = exe_name ^ ".ml"
 
 let pp_ml fmt include_dirs =