aboutsummaryrefslogtreecommitdiffstats
path: root/lib/dialyzer/test/small_SUITE_data/src/flatten.erl
blob: e424d5404c144821295680873609bf0f7edbcea8 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
%%%-------------------------------------------------------------------
%%% File    : flatten.erl
%%% Author  : Tobias Lindahl <[email protected]>
%%% Description :
%%%
%%% Created :  4 Nov 2007 by Tobias Lindahl <[email protected]>
%%%-------------------------------------------------------------------
-module(flatten).

-export([t/1]).

t(Dir) ->
  case file:list_dir(Dir) of
    {ok,FileList} ->
      FileList;
    {error,Reason} ->
      {error,lists:flatten("Can't open directory "++Dir++": "++Reason)}
  end.