diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 1997-02-14 11:01:15 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 1997-02-14 11:01:15 +0000 |
| commit | f442e137d0395b8ec3d694a9b9c3c19eb33b6d6b (patch) | |
| tree | ead9cde61a473c59be457616fb0ecf5ddbdb9cbb /asmrun/power-aix.S | |
| parent | e7dee11f429680ae4183dea7403be768e8d5b041 (diff) | |
| download | ocaml-f442e137d0395b8ec3d694a9b9c3c19eb33b6d6b.tar.gz | |
Nettoyages
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@1264 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'asmrun/power-aix.S')
| -rw-r--r-- | asmrun/power-aix.S | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/asmrun/power-aix.S b/asmrun/power-aix.S index 4011fb73a5..0c5cb06033 100644 --- a/asmrun/power-aix.S +++ b/asmrun/power-aix.S @@ -11,8 +11,6 @@ # $Id$ - .comm young_start, 4 - .comm young_ptr, 4 .comm caml_bottom_of_stack, 4 .comm caml_top_of_stack, 4 .comm caml_last_return_address, 4 @@ -202,11 +200,11 @@ # The C function will preserve them, and the Caml code does not # expect them to be preserved # Return address is in 25, RTOC is in 26, pointer to young_ptr in 27 - mr 26, 2 # Call the function (descriptor in 11) lwz 0, 0(11) - lwz 2, 4(11) + mr 26, 2 mtlr 0 + lwz 2, 4(11) lwz 11, 8(11) blrl # Restore return address |