diff options
author | Erlang/OTP <[email protected]> | 2010-03-22 15:08:29 +0000 |
---|---|---|
committer | Erlang/OTP <[email protected]> | 2010-03-22 15:08:29 +0000 |
commit | 99101783758b3e4805284aaec16d34dc3597158e (patch) | |
tree | 07c1ab851caccc9f17e2a91d2f442dd3a3675804 /lib/tools/emacs/test.erl.orig | |
parent | a4b4d36cdbbd692123443a1d3f19f1c452963201 (diff) | |
parent | 228e1f013f99e2d2fb4ee0f7a9cb5d21638756a8 (diff) | |
download | otp-99101783758b3e4805284aaec16d34dc3597158e.tar.gz otp-99101783758b3e4805284aaec16d34dc3597158e.tar.bz2 otp-99101783758b3e4805284aaec16d34dc3597158e.zip |
Merge branch 'dgud/emacs-bugfixes' into dev
* dgud/emacs-bugfixes:
Fix another -spec() problem
Add missing elisp files to the the release target
Fix electric semi-colon and tuples inside lists
OTP-8530 dgud/emacs-bugfixes
Fixed emacs-mode installation problems and some other minor issues.
Diffstat (limited to 'lib/tools/emacs/test.erl.orig')
-rw-r--r-- | lib/tools/emacs/test.erl.orig | 20 |
1 files changed, 15 insertions, 5 deletions
diff --git a/lib/tools/emacs/test.erl.orig b/lib/tools/emacs/test.erl.orig index 9b4203120b..70e97a2e91 100644 --- a/lib/tools/emacs/test.erl.orig +++ b/lib/tools/emacs/test.erl.orig @@ -1,20 +1,20 @@ %% -*- erlang -*- %% %% %CopyrightBegin% -%% -%% Copyright Ericsson AB 2009. All Rights Reserved. -%% +%% +%% Copyright Ericsson AB 2009-2010. All Rights Reserved. +%% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in %% compliance with the License. You should have received a copy of the %% Erlang Public License along with this software. If not, it can be %% retrieved online at http://www.erlang.org/. -%% +%% %% Software distributed under the License is distributed on an "AS IS" %% basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See %% the License for the specific language governing rights and limitations %% under the License. -%% +%% %% %CopyrightEnd% %%%------------------------------------------------------------------- @@ -146,6 +146,8 @@ t15(),t20(),t21(), t22(),t25()}. | {'del_member', name(), pid()}, #state{}) -> {'noreply', #state{}}. +-spec all(fun((T) -> boolean()), List :: [T]) -> + boolean() when is_subtype(T, term()). % (*) -spec get_closest_pid(term()) -> Return :: pid() @@ -349,6 +351,14 @@ indent_basics(X, Y, Z) % AD added clause foo. + +indent_nested() -> + [ + {foo, 2, "string"}, + {bar, 3, "another string"} + ]. + + indent_icr(Z) -> % icr = if case receive %% If if Z >= 0 -> |