再帰関数でスタックオーバーフロー

Question

私は整数とリストを渡す再帰関数を作成しようとしています。 「 - 」私は特定の数の追加したい次のようにリストの長さが整数未満の場合は、リストに（ダッシュ）：私は、スタックオーバーフローを取得し、私はよく分からないが

let rec dashes (longest, l1) = 
    if length l1 = longest then l1 
    else ["-"]@l1@dashes(longest,l1);; 

なぜ。

Answer 1

dashesへの再帰呼び出しでは、元のl1引数が渡されるため、リストの長さは増加せず、終了条件はfalseのままです。