是否有Er代码格式化工具？

patagonia2

Source code beautifier
er代码美化工具
感谢！

patagonia2

在线等，
急求大圣回复
希望大圣能够指导
谢谢，在线等

shijiang1130

erl_tidy:file("t_app.erl").

patagonia2

回复 3# shijiang1130


恩恩， 感谢感谢！
我试下

patagonia2

回复 3# shijiang1130


不知道是怎么回事，
还希望大神能够指导指导，

m(erl_tidy).
erl_tidy:file("p.erl".

1. -module (p).
   
2. -compile (export_all).
   
3. -define (P (V), io:format ("~p ", [V])).
   
4. -define (PP (V), io:format ("~n~s = ~p~n", [??V, V])).
   
5. 
   
6. loop (A, A, A, _, MAX) -> MAX;
   
7. loop (A, B, B, P, MAX) -> loop (A + 1, A + 1, B, P, MAX);
   
8. loop (A, B, C, P, MAX) ->
   
9.     AB = A * B,
   
10.     case AB > MAX andalso P(AB) of
    
11.         true -> ?P (AB), loop (A, B + 1, C, P, AB);
    
12.         ____ -> loop (A, B + 1, C, P, MAX) end.
    
13.         
    
14. main(_) ->
    
15.     Palindrome = fun (X) ->
    
16.         Y = integer_to_list (X),
    
17.         Y == lists:reverse (Y) end,
    
18.     A   = 100,
    
19.     B   = 999 + 1,
    
20.     MAX = loop ( A, A, B, Palindrome, 0),
    
21.     ?PP (MAX),
    
22. halt().
    

复制代码

不知道是怎么回事
- define ( PP ( V ) , io : format ( "~n~s = ~p~n" , [ ? ? V , V ] ) ) .

1. -module(p).
   
2. 
   
3. -compile(export_all).
   
4. 
   
5. -define(P(V), io:format("~p ", [V])).
   
6. 
   
7. - define ( PP ( V ) , io : format ( "~n~s = ~p~n" , [ ? ? V , V ] ) ) .
   
8. 
   
9. 
   
10. loop(A, A, A, _, MAX) -> MAX;
    
11. loop(A, B, B, P, MAX) -> loop(A + 1, A + 1, B, P, MAX);
    
12. loop(A, B, C, P, MAX) ->
    
13.     AB = A * B,
    
14.     case AB > MAX andalso P(AB) of
    
15.       true -> ?P(AB), loop(A, B + 1, C, P, AB);
    
16.       ____ -> loop(A, B + 1, C, P, MAX)
    
17.     end.
    
18. 
    
19. main(_) ->
    
20.     Palindrome = fun (X) ->
    
21.                          Y = integer_to_list(X), Y == lists:reverse(Y)
    
22.                  end,
    
23.     A = 100,
    
24.     B = 999 + 1,
    
25.     MAX = loop(A, A, B, Palindrome, 0),
    
26.     ?PP(MAX),
    
27.     halt().
    

复制代码

patagonia2

输出结果比较乱
old

1. -define (PP (V), io:format ("~n~s = ~p~n", [??V, V])).

复制代码

new

1. - define ( PP ( V ) , io : format ( "~n~s = ~p~n" , [ ? ? V , V ] ) ) .

复制代码

patagonia2

大神
如何排除空行

1. -module(p).
   
2. 
   
3. -compile(export_all).
   
4. 
   
5. -define(P(V), io:format("~p ", [V])).
   
6. 
   

复制代码

1. -module(p).
   
2. -compile(export_all).
   
3. -define(P(V), io:format("~p ", [V])).
   

复制代码