[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[PATCH v1 2/6] tools/ocaml/xenstored: fix deprecation warning


  • To: <xen-devel@xxxxxxxxxxxxxxxxxxxx>
  • From: Edwin Török <edvin.torok@xxxxxxxxxx>
  • Date: Fri, 14 Aug 2020 23:11:42 +0100
  • Authentication-results: esa1.hc3370-68.iphmx.com; dkim=none (message not signed) header.i=none
  • Cc: Edwin Török <edvin.torok@xxxxxxxxxx>, "Christian Lindig" <christian.lindig@xxxxxxxxxx>, David Scott <dave@xxxxxxxxxx>, "Ian Jackson" <ian.jackson@xxxxxxxxxxxxx>, Wei Liu <wl@xxxxxxx>
  • Delivery-date: Fri, 14 Aug 2020 22:12:48 +0000
  • Ironport-sdr: VRvqjG0Z9Mii4Qho8718sZXP81D4c5CkfE7hbkOyWgAzlSlmlT1PvrS9bXzuUa3RLdBPVilUmF XqSvTvYm0ejKdlYLNLlttH4vzu+WO/5uBcqARR1edle/G12D4uhks0WxHj0TV9OgZ6atM+7POY f/gufhcM35e8/OcAwkVpOrAaHcyIz9oAdfujTOTw3Rrs/RnG+0F90xRPAcUvKCHiNO9aJpjvhK tAVZXS7YN2nzVLmD6FnrPEIUQPwa7Z0t/OY3x2CVHVrzLkcbEYharJIyhclc5eJOXQPsfrAxE+ Q+k=
  • List-id: Xen developer discussion <xen-devel.lists.xenproject.org>

```
File "xenstored/disk.ml", line 33, characters 9-23:
33 |    let c = Char.lowercase c in
              ^^^^^^^^^^^^^^
(alert deprecated): Stdlib.Char.lowercase
Use Char.lowercase_ascii instead.
```

Signed-off-by: Edwin Török <edvin.torok@xxxxxxxxxx>
---
 tools/ocaml/xenstored/disk.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/ocaml/xenstored/disk.ml b/tools/ocaml/xenstored/disk.ml
index 4739967b61..1ca0e2a95e 100644
--- a/tools/ocaml/xenstored/disk.ml
+++ b/tools/ocaml/xenstored/disk.ml
@@ -30,7 +30,7 @@ let undec c =
        | _          -> raise (Failure "undecify")
 
 let unhex c =
-       let c = Char.lowercase c in
+       let c = Char.lowercase_ascii c in
        match c with
        | '0' .. '9' -> (Char.code c) - (Char.code '0')
        | 'a' .. 'f' -> (Char.code c) - (Char.code 'a') + 10
-- 
2.25.1




 


Rackspace

Lists.xenproject.org is hosted with RackSpace, monitoring our
servers 24x7x365 and backed by RackSpace's Fanatical Support®.