строка в список символов

Я хочу написать функцию, которая принимает строку и возвращает список символов. Вот функция, но я думаю, что она не делает то, что я хочу (я хочу взять строку и вернуть список символов).

let rec string_to_char_list s =
    match s with
      | "" -> []
      | n -> string_to_char_list n