ソースリーディング

Erlang の SIP サーバ実装である YXA の LDAP 実装の部分のソースを読んでいます。

ふとこれはいいなと思ったコードがあったので。

-define(IS_ALPHA(X) , X>=$a,X=<$z;X>=$A,X=<$Z ).
-define(IS_DIGIT(X) , X>=$0,X=<$9 ).
spam([H|T]) when ?IS_ALPHA(H) -> ...

シンプルでこれは便利。