diff options
author | Tristan Gingold <gingold@adacore.com> | 2015-11-22 19:02:05 +0100 |
---|---|---|
committer | Tristan Gingold <gingold@adacore.com> | 2015-11-22 19:02:05 +0100 |
commit | 27a4852201a41e7d6f8098cc05b7b0949ebc6af4 (patch) | |
tree | 91e6effe2be75fedb2e39e2eb374975c5666f206 /src/ortho/mcode/binary_file-memory.ads | |
parent | 92b0b82ea32982b94eb8bf19a0b498d92053fffe (diff) | |
download | ghdl-27a4852201a41e7d6f8098cc05b7b0949ebc6af4.tar.gz ghdl-27a4852201a41e7d6f8098cc05b7b0949ebc6af4.tar.bz2 ghdl-27a4852201a41e7d6f8098cc05b7b0949ebc6af4.zip |
backtrace: add support for windows and for llvm (via libbacktrace).
Diffstat (limited to 'src/ortho/mcode/binary_file-memory.ads')
-rw-r--r-- | src/ortho/mcode/binary_file-memory.ads | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/ortho/mcode/binary_file-memory.ads b/src/ortho/mcode/binary_file-memory.ads index cc2b7e39b..67755021a 100644 --- a/src/ortho/mcode/binary_file-memory.ads +++ b/src/ortho/mcode/binary_file-memory.ads @@ -1,5 +1,5 @@ -- Binary file execute in memory handler. --- Copyright (C) 2006 Tristan Gingold +-- Copyright (C) 2006-2015 Tristan Gingold -- -- GHDL is free software; you can redistribute it and/or modify it under -- the terms of the GNU General Public License as published by the Free @@ -21,13 +21,18 @@ package Binary_File.Memory is -- Must be called before set_symbol_address. procedure Write_Memory_Init; + + -- Give a value to an undefined or external symbol. procedure Set_Symbol_Address (Sym : Symbol; Addr : System.Address); + -- Do the real work: resolve relocations. procedure Write_Memory_Relocate (Error : out Boolean); - function Get_Section_Base (Sect : Section_Acc) return System.Address; + -- Read the result: get address and size of a section. + function Get_Section_Addr (Sect : Section_Acc) return System.Address; function Get_Section_Size (Sect : Section_Acc) return Pc_Type; + -- Helpers. function To_Pc_Type is new Ada.Unchecked_Conversion (Source => System.Address, Target => Pc_Type); function To_Address is new Ada.Unchecked_Conversion |