Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- forward(Inputs, OutputFun)->
- Tmp1 = somefun(Inputs, []),
- forward_(Tmp1, OutputFun).
- somefun([FH|Inputs], Acc)->
- case line_or_close(FH) of
- eof ->
- somefun(Inputs, Acc);
- Content ->
- somefun(Inputs, [{FH, Content}|Acc])
- end;
- somefun([], Acc)->
- Acc.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement