Fix platforms with more than 3 segments in system info string

src/platform_ffi.erl

@@ -8,7 +8,8 @@ os() ->
     Tokens = string:tokens(ArchitectureString, "-"),
     unicode:characters_to_binary(
         case length(Tokens) of
-            n when n >= 3 -> lists:nth(3, Tokens);
+            4 -> lists:nth(3, Tokens);
+            3 -> lists:nth(3, Tokens);
             2 -> lists:nth(2, Tokens)
         end
     ).