Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Cosmetic change

  • Loading branch information...
commit 4efe3606f18889dddb167e516c7f9e4cf98d0f79 1 parent a2cca2b
@yiannist authored
Showing with 3 additions and 5 deletions.
  1. +3 −5 lib/hipe/llvm/hipe_llvm_main.erl
View
8 lib/hipe/llvm/hipe_llvm_main.erl
@@ -428,7 +428,7 @@ find_offsets([{Off,Arity}|Rest], Offsets, Acc) ->
find_offsets(Rest, RestOffsets, [{I, Arity}|Acc]).
%% The function below corrects the stack descriptors of calls with arguments
-%% that are passed on the stack (more the NR_ARG_REGS) by subtracting the
+%% that are passed on the stack (more than NR_ARG_REGS) by subtracting the
%% number of stacked arguments from the frame size and from the offset of the
%% roots.
fix_sdescs([], SDescs) -> SDescs;
@@ -437,14 +437,12 @@ fix_sdescs([{Offset, Arity} | Rest], SDescs) ->
false ->
fix_sdescs(Rest, SDescs);
{?SDESC, Offset, {ExnHandler, FrameSize, StkArity, Roots}} ->
- FixedRoots = list_to_tuple([X - Arity || X <- tuple_to_list(Roots)]),
+ FixedRoots = list_to_tuple([Ri - Arity || Ri <- tuple_to_list(Roots)]),
FixedSDesc =
{?SDESC, Offset, {ExnHandler, FrameSize - Arity, StkArity, FixedRoots}},
- RestSDescs = lists:keydelete(Offset, 2, SDescs),
- fix_sdescs(Rest, [FixedSDesc | RestSDescs])
+ fix_sdescs(Rest, [FixedSDesc | lists:keydelete(Offset, 2, SDescs)])
end.
-
%%------------------------------------------------------------------------------
%% Miscellaneous functions
%%------------------------------------------------------------------------------
Please sign in to comment.
Something went wrong with that request. Please try again.