← Back to branch summary

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

« back to all changes in this revision

Viewing changes to lib/stdlib/src/escript.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/stdlib/src/escript.erl
598
598
            LF = {value,fun(I, J) -> code_handler(I, J, Dict, File) end},
599
599
            case erl_eval:match_clause(Cs, Args,erl_eval:new_bindings(),LF) of
600
600
                {Body, Bs} ->
601
 
                    {value, Val, _Bs1} = erl_eval:exprs(Body, Bs, LF),
602
 
                    Val;
 
601
                    eval_exprs(Body, Bs, LF, none, none);
603
602
                nomatch ->
604
603
                    erlang:error({function_clause,[{local,Name,Args}]})
605
604
            end;
614
613
            end
615
614
    end.
616
615
 
 
616
eval_exprs([E], Bs0, Lf, Ef, _RBs) ->
 
617
    RBs1 = value,
 
618
    erl_eval:expr(E, Bs0, Lf, Ef, RBs1);
 
619
eval_exprs([E|Es], Bs0, Lf, Ef, RBs) ->
 
620
    RBs1 = none,
 
621
    {value,_V,Bs} = erl_eval:expr(E, Bs0, Lf, Ef, RBs1),
 
622
    eval_exprs(Es, Bs, Lf, Ef, RBs).
 
623
 
617
624
format_exception(Class, Reason) ->
618
625
    PF = fun(Term, I) -> 
619
626
                 io_lib:format("~." ++ integer_to_list(I) ++ "P", [Term, 50])