← Back to branch summary

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

« back to all changes in this revision

Viewing changes to lib/hipe/rtl/hipe_rtl_primops.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/hipe/rtl/hipe_rtl_primops.erl
2
2
%%
3
3
%% %CopyrightBegin%
4
4
%% 
5
 
%% Copyright Ericsson AB 2001-2009. All Rights Reserved.
 
5
%% Copyright Ericsson AB 2001-2011. All Rights Reserved.
6
6
%% 
7
7
%% The contents of this file are subject to the Erlang Public License,
8
8
%% Version 1.1, (the "License"); you may not use this file except in
701
701
%%  Increase refcount
702
702
%%    fe->refc++;
703
703
%%
704
 
%%  Link to the process off_heap.funs list
705
 
%%    funp->next = p->off_heap.funs;
706
 
%%    p->off_heap.funs = funp;
 
704
%%  Link to the process off_heap list
 
705
%%    funp->next = p->off_heap.first;
 
706
%%    p->off_heap.first = funp;
707
707
%%
708
708
%%  Tag the thing
709
709
%%    return make_fun(funp);
729
729
  %%    fe->refc++;
730
730
  SkeletonCode = gen_fun_thing_skeleton(HP, MFidA, NumFree, MagicNr, Index),
731
731
 
732
 
  %%  Link to the process off_heap.funs list
733
 
  %%    funp->next = p->off_heap.funs;
734
 
  %%    p->off_heap.funs = funp;
 
732
  %%  Link to the process off_heap list
 
733
  %%    funp->next = p->off_heap.first;
 
734
  %%    p->off_heap.first = funp;
735
735
  LinkCode = gen_link_closure(HP),
736
736
 
737
737
  %%  Tag the thing and increase the heap_pointer.
797
797
  end.
798
798
 
799
799
gen_link_closure_private(FUNP) ->
800
 
  %% Link to the process off_heap.funs list
801
 
  %%   funp->next = p->off_heap.funs;
802
 
  %%   p->off_heap.funs = funp;
 
800
  %% Link fun to the process off_heap list
 
801
  %%   funp->next = p->off_heap.first;
 
802
  %%   p->off_heap.first = funp;
803
803
  FunsVar = hipe_rtl:mk_new_reg(),
804
804
 
805
 
  [load_p_field(FunsVar,?P_OFF_HEAP_FUNS),
 
805
  [load_p_field(FunsVar,?P_OFF_HEAP_FIRST),
806
806
   hipe_rtl:mk_store(FUNP, hipe_rtl:mk_imm(?EFT_NEXT), FunsVar),
807
 
   store_p_field(FUNP,?P_OFF_HEAP_FUNS)].
 
807
   store_p_field(FUNP,?P_OFF_HEAP_FIRST)].
808
808
 
809
809
gen_link_closure_non_private(_FUNP) -> [].
810
810