← Back to branch summary

~ubuntu-branches/debian/squeeze/erlang/squeeze

« back to all changes in this revision

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

  • Committer: Bazaar Package Importer
  • Author(s): Sergei Golovan
  • Date: 2009-08-05 20:54:29 UTC
  • mfrom: (6.1.2 sid)
  • Revision ID: james.westby@ubuntu.com-20090805205429-pm4pnwew8axraosl
Tags: 1:13.b.1-dfsg-5
http://bugs.debian.org/536891
* Fixed parentheses in Emacs mode (closes: #536891).
* Removed unnecessary conflicts with erlang-manpages package.
* Added workaround for #475459: disabled threads on sparc architecture.
  This breaks wxErlang, so it's only a temporary solution.

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/ic/src/ic_fetch.erl
39
39
 
40
40
%% This is en overloaded function,
41
41
%% differs in input on unions
42
 
member2type(_G, X, I) when record(X, union)->
 
42
member2type(_G, X, I) when is_record(X, union)->
43
43
    Name = ic_forms:get_id2(I),
44
44
    case lists:keysearch(Name,2,element(6,X#union.tk)) of
45
45
        false ->
254
254
        _ ->
255
255
            false
256
256
    end; 
257
 
isString(_G, _N, T)  when record(T, string) ->
 
257
isString(_G, _N, T)  when is_record(T, string) ->
258
258
    true;
259
259
isString(_G, _N, _Other) ->
260
260
    false. 
267
267
        _ ->
268
268
            false
269
269
    end; 
270
 
isArray(_G, _N, T)  when record(T, array) ->
 
270
isArray(_G, _N, T)  when is_record(T, array) ->
271
271
    true;
272
272
isArray(_G, _N, _Other) ->
273
273
    false. 
281
281
        _ ->
282
282
            false
283
283
    end; 
284
 
isStruct(_G, _N, T)  when record(T, struct) ->
 
284
isStruct(_G, _N, T)  when is_record(T, struct) ->
285
285
    true;
286
286
isStruct(_G, _N, _Other) ->
287
287
    false.
295
295
        _Other ->
296
296
            false
297
297
    end; 
298
 
isUnion(_G, _N, T)  when record(T, union) ->
 
298
isUnion(_G, _N, T)  when is_record(T, union) ->
299
299
    true;
300
300
isUnion(_G, _N, _Other) ->
301
301
    false.
366
366
    searchIncludedTk(TK,IR_ID);
367
367
searchIncludedTk({tk_sequence,TK,_},IR_ID) ->
368
368
    searchIncludedTk(TK,IR_ID);
369
 
searchIncludedTk(TK,_IR_ID) when atom(TK) ->
 
369
searchIncludedTk(TK,_IR_ID) when is_atom(TK) ->
370
370
    false;
371
371
searchIncludedTk(TK,IR_ID) ->
372
372
    case element(2,TK) == IR_ID of