From 2f37138dedb34651ddb2efd687a8d860b0138778 Mon Sep 17 00:00:00 2001
From: Matias Goldfeld <mg2277@cornell.edu>
Date: Fri, 29 Jan 2021 13:42:34 -0500
Subject: Reverted attempts to add 32-bit compatibility

---
 lib/gateway/sharder.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/gateway/sharder.ml')

diff --git a/lib/gateway/sharder.ml b/lib/gateway/sharder.ml
index 14763ca..31275b2 100644
--- a/lib/gateway/sharder.ml
+++ b/lib/gateway/sharder.ml
@@ -130,7 +130,7 @@ module Shard = struct
 
     let request_guild_members ?(query="") ?(limit=0) ~guild shard =
         let payload = `Assoc
-            [ "guild_id", `String (Int.to_string guild)
+            [ "guild_id", `String (Int64.to_string guild)
             ; "query", `String query
             ; "limit", `Int limit
             ]
-- 
cgit v1.2.3