erlang - 如何修复 Erlang 中不正确的列表？

Question

我不小心做了(相当于)以下操作:

lists:foldl(fun(X, Acc) -> [X|Acc] end, 0, List).

注意累加器的非列表初始值。

这导致了不正确的列表。这意味着 length 等对其不起作用。

鉴于我的“等效项”运行了一个小时，并且我不想再次运行它，我该如何修复不正确的列表？

有关不正确列表及其导致的问题的更简单示例:

1> L = [1|[2|[3|4]]].
[1,2,3|4]
2> length(L).
** exception error: bad argument
     in function  length/1
        called as length([1,2,3|4])

Answer 1

如果你想保留“不正确的尾部”，这就足够了:

Fix = fun Fix([H | T]) -> [H | Fix(T)];
          Fix(T) -> [T]
      end.