← Back to branch summary

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

« back to all changes in this revision

Viewing changes to lib/ic/src/ic_forms.erl

  • Committer: Bazaar Package Importer
  • Author(s): Clint Byrum
  • Date: 2011-05-05 15:48:43 UTC
  • mfrom: (3.5.13 sid)
  • Revision ID: james.westby@ubuntu.com-20110505154843-0om6ekzg6m7ugj27
Tags: 1:14.b.2-dfsg-3ubuntu1
* Merge from debian unstable.  Remaining changes:
  - Drop libwxgtk2.8-dev build dependency. Wx isn't in main, and not
    supposed to.
  - Drop erlang-wx binary.
  - Drop erlang-wx dependency from -megaco, -common-test, and -reltool, they
    do not really need wx. Also drop it from -debugger; the GUI needs wx,
    but it apparently has CLI bits as well, and is also needed by -megaco,
    so let's keep the package for now.
  - debian/patches/series: Do what I meant, and enable build-options.patch
    instead.
* Additional changes:
  - Drop erlang-wx from -et
* Dropped Changes:
  - patches/pcre-crash.patch: CVE-2008-2371: outer level option with
    alternatives caused crash. (Applied Upstream)
  - fix for ssl certificate verification in newSSL: 
    ssl_cacertfile_fix.patch (Applied Upstream)
  - debian/patches/series: Enable native.patch again, to get stripped beam
    files and reduce the package size again. (build-options is what
    actually accomplished this)
  - Remove build-options.patch on advice from upstream and because it caused
    odd build failures.

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/ic/src/ic_forms.erl
1
1
%%
2
2
%% %CopyrightBegin%
3
3
%% 
4
 
%% Copyright Ericsson AB 1998-2009. All Rights Reserved.
 
4
%% Copyright Ericsson AB 1998-2010. All Rights Reserved.
5
5
%% 
6
6
%% The contents of this file are subject to the Erlang Public License,
7
7
%% Version 1.1, (the "License"); you may not use this file except in
65
65
get_line(X) when is_record(X, module)      -> get_line(X#module.id);
66
66
get_line(X) when is_record(X, interface)   -> get_line(X#interface.id);
67
67
get_line(X) when is_record(X, forward)     -> get_line(X#forward.id);
 
68
get_line(X) when is_record(X, constr_forward) -> get_line(X#constr_forward.id);
68
69
get_line(X) when is_record(X, const)       -> get_line(X#const.id);
69
70
get_line(X) when is_record(X, typedef)     -> get_line(X#typedef.id);
70
71
get_line(X) when is_record(X, struct)      -> get_line(X#struct.id);
114
115
get_id2(X) when is_record(X, module)       -> get_id(X#module.id);
115
116
get_id2(X) when is_record(X, interface)    -> get_id(X#interface.id);
116
117
get_id2(X) when is_record(X, forward)      -> get_id(X#forward.id);
 
118
get_id2(X) when is_record(X, constr_forward) -> get_id(X#constr_forward.id);
117
119
get_id2(X) when is_record(X, const)        -> get_id(X#const.id);
118
120
get_id2(X) when is_record(X, typedef)      -> get_id(hd(X#typedef.id));
119
121
get_id2(X) when is_record(X, struct)       -> get_id(X#struct.id);
156
158
%% Temporary place
157
159
get_tk(X) when is_record(X, interface)  -> X#interface.tk;
158
160
get_tk(X) when is_record(X, forward)    -> X#forward.tk;
 
161
get_tk(X) when is_record(X, constr_forward) -> X#constr_forward.tk;
159
162
get_tk(X) when is_record(X, const)      -> X#const.tk;
160
163
get_tk(X) when is_record(X, type_dcl)   -> X#type_dcl.tk;
161
164
get_tk(X) when is_record(X, typedef)    -> X#typedef.tk;
228
231
 
229
232
get_type_code2(_, _, X) when is_record(X, interface)  -> X#interface.tk;
230
233
get_type_code2(_, _, X) when is_record(X, forward)    -> X#forward.tk;
 
234
get_type_code2(_, _, X) when is_record(X, constr_forward) -> X#constr_forward.tk;
231
235
get_type_code2(_, _, X) when is_record(X, const)      -> X#const.tk;
232
236
get_type_code2(_, _, X) when is_record(X, type_dcl)   -> X#type_dcl.tk;
233
237
get_type_code2(_, _, X) when is_record(X, typedef)    ->