diff options
| author | Kostis Sagonas <[email protected]> | 2010-05-06 17:07:33 +0300 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2010-05-06 18:09:47 +0200 |
| commit | ccf1c5d20bcf76139d4f08a3da0f9954636fea10 (patch) | |
| tree | edd449d44b30a7fca16a7e05b25a60cea58242ed /lib/syntax_tools/src/erl_prettypr.erl | |
| parent | a21a9dac550bcb976fa074d7005499a4d6b55791 (diff) | |
| download | otp-ccf1c5d20bcf76139d4f08a3da0f9954636fea10.tar.gz otp-ccf1c5d20bcf76139d4f08a3da0f9954636fea10.tar.bz2 otp-ccf1c5d20bcf76139d4f08a3da0f9954636fea10.zip | |
Fix an erroneous spec
While at it, take out redundant code.
Diffstat (limited to 'lib/syntax_tools/src/erl_prettypr.erl')
| -rw-r--r-- | lib/syntax_tools/src/erl_prettypr.erl | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lib/syntax_tools/src/erl_prettypr.erl b/lib/syntax_tools/src/erl_prettypr.erl index 606441bcf1..c2c72d1ed2 100644 --- a/lib/syntax_tools/src/erl_prettypr.erl +++ b/lib/syntax_tools/src/erl_prettypr.erl @@ -384,7 +384,7 @@ lay_postcomments(Cs, D) -> beside(D, floating(break(stack_comments(Cs, true)), 1, 0)). %% Format (including padding, if `Pad' is `true', otherwise not) -%% and stack the listed comments above each other, +%% and stack the listed comments above each other. stack_comments([C | Cs], Pad) -> D = stack_comment_lines(erl_syntax:comment_text(C)), @@ -405,9 +405,7 @@ stack_comments([C | Cs], Pad) -> D1; % done _ -> above(D1, stack_comments(Cs, Pad)) - end; -stack_comments([], _) -> - empty(). + end. %% Stack lines of text above each other and prefix each string in %% the list with a single `%' character. |