diff options
| author | Niclas Eklund <[email protected]> | 2011-01-20 12:14:36 +0100 |
|---|---|---|
| committer | Niclas Eklund <[email protected]> | 2011-01-20 12:14:36 +0100 |
| commit | 0ef3320c556912b4d9f05f89ec47154eb2b5834a (patch) | |
| tree | 6105bc92ce5bd5cb2dd56c0f71e7a92226e89576 /lib/ic/src/ic_symtab.erl | |
| parent | 1bff9d79218bcb3c44737cb2bfefac85c6f0322f (diff) | |
| parent | 86413606615440a7951b4c62162e2bfb87aa158c (diff) | |
| download | otp-0ef3320c556912b4d9f05f89ec47154eb2b5834a.tar.gz otp-0ef3320c556912b4d9f05f89ec47154eb2b5834a.tar.bz2 otp-0ef3320c556912b4d9f05f89ec47154eb2b5834a.zip | |
Merge branch 'maint-r14' of super:otp into nick/ensure_ssh_dir_exists/OTP-9010
Diffstat (limited to 'lib/ic/src/ic_symtab.erl')
| -rw-r--r-- | lib/ic/src/ic_symtab.erl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/ic/src/ic_symtab.erl b/lib/ic/src/ic_symtab.erl index 889c75e3a2..d710154a5d 100644 --- a/lib/ic/src/ic_symtab.erl +++ b/lib/ic/src/ic_symtab.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1998-2009. All Rights Reserved. +%% Copyright Ericsson AB 1998-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 @@ -69,6 +69,8 @@ store(G, N, X) -> ets:insert(G#genobj.symtab, {Name, X}); {ok, Y} when is_record(Y, forward) -> ets:insert(G#genobj.symtab, {Name, X}); + {ok, Y} when is_record(Y, constr_forward) -> + ets:insert(G#genobj.symtab, {Name, X}); {ok, _Y} -> ic_error:error(G, {multiply_defined, X}) end. |