Ta fonction doit être int -> int ? Sinon, en int -> string je verrais bien un truc comme ça :

let rec miroir x =
  let chiffre = x % 10 in
  let reste = x / 10 in
  if reste == 0 then
    string_of_int(chiffre)
  else
    string_of_int(chiffre) ^ (miroir reste)
;;

Enfin, tu peux toujours utiliser une fonction qui appelle cette fonction et renvoie le résultat converti en entier.