Как преобразовать отрицательные целые числа в строки в SML со знаком минус вместо тильды?

Стандартная функция библиотеки SML Int.toString префикс отрицательных чисел с помощью ~ вместо - . Есть ли библиотечная функция для использования - вместо записи

fun i2s i =
    if i < 0 then "-" ^ Int.toString (~i) else Int.toString i