diff options
| author | Niclas Eklund <[email protected]> | 2011-02-10 16:18:50 +0100 |
|---|---|---|
| committer | Niclas Eklund <[email protected]> | 2011-02-10 16:18:50 +0100 |
| commit | 59bb06a90248defb4c0be98f10afae88c2251fe7 (patch) | |
| tree | 5cc2b0b25becec926f9d3981579b8038b95cbcec /lib/cosEventDomain/src/CosEventDomainAdmin_EventDomain_impl.erl | |
| parent | 06ff115c291c4bb07a728bbeb72f67822e9d4b80 (diff) | |
| download | otp-59bb06a90248defb4c0be98f10afae88c2251fe7.tar.gz otp-59bb06a90248defb4c0be98f10afae88c2251fe7.tar.bz2 otp-59bb06a90248defb4c0be98f10afae88c2251fe7.zip | |
Eliminated Dialyzer warnings when using exit or throw.
Diffstat (limited to 'lib/cosEventDomain/src/CosEventDomainAdmin_EventDomain_impl.erl')
| -rw-r--r-- | lib/cosEventDomain/src/CosEventDomainAdmin_EventDomain_impl.erl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/cosEventDomain/src/CosEventDomainAdmin_EventDomain_impl.erl b/lib/cosEventDomain/src/CosEventDomainAdmin_EventDomain_impl.erl index 0b73100540..ddff0f8632 100644 --- a/lib/cosEventDomain/src/CosEventDomainAdmin_EventDomain_impl.erl +++ b/lib/cosEventDomain/src/CosEventDomainAdmin_EventDomain_impl.erl @@ -2,7 +2,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2001-2009. All Rights Reserved. +%% Copyright Ericsson AB 2001-2011. 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 @@ -780,6 +780,8 @@ set_qos(_OE_This, State, NewQoS) -> QoS = cosEventDomainApp:get_qos(NewQoS), set_qos_helper(QoS, State, []). +%% To avoid dialyzer warnings due to the use of exit/throw. +-spec(set_qos_helper/3 :: (_, _, _) -> no_return()). set_qos_helper([], State, []) -> {reply, ok, State}; set_qos_helper([], _, Errors) -> @@ -830,6 +832,8 @@ validate_qos(_OE_This, State, WantedQoS) -> QoS = cosEventDomainApp:get_qos(WantedQoS), {reply, {ok, validate_qos_helper(QoS, State, [], [])}, State}. +%% To avoid dialyzer warnings due to the use of exit/throw. +-spec(validate_qos_helper/4 :: (_, _, _, _) -> no_return()). validate_qos_helper([], _, Properties, []) -> Properties; validate_qos_helper([], _, _, Errors) -> |