~ubuntu-branches/ubuntu/trusty/erlang/trusty

« back to all changes in this revision

Viewing changes to lib/orber/src/orber_ifr_irobject.erl

  • Committer: Bazaar Package Importer
  • Author(s): Sergei Golovan
  • Date: 2009-06-11 12:18:07 UTC
  • mfrom: (1.2.2 upstream)
  • Revision ID: james.westby@ubuntu.com-20090611121807-ks7eb4xrt7dsysgx
Tags: 1:13.b.1-dfsg-1
* New upstream release.
* Removed unnecessary dependency of erlang-os-mon on erlang-observer and
  erlang-tools and added missing dependency of erlang-nox on erlang-os-mon
  (closes: #529512).
* Removed a patch to eunit application because the bug was fixed upstream.

Show diffs side-by-side

added added

removed removed

Lines of Context:
50
50
%%% Don't type check the object reference. We need to be able to
51
51
%%% handle several types of objects that inherit from IRObject.
52
52
 
53
 
destroy(L) when list(L) ->
 
53
destroy(L) when is_list(L) ->
54
54
    destroy2(lists:reverse(L)).
55
55
 
56
56
destroy2([Things_HD | Things_TL]) ->
59
59
 
60
60
destroy2([]) -> 
61
61
    ok;
62
 
destroy2(F) when function(F) ->
 
62
destroy2(F) when is_function(F) ->
63
63
    F();
64
 
destroy2(Thing) when tuple(Thing) ->
 
64
destroy2(Thing) when is_tuple(Thing) ->
65
65
    mnesia:delete(Thing),
66
66
    ok;
67
67
destroy2(Thing) ->