Apple-2-SW/merlin-utils
1
0
Fork 0
mirror of https://github.com/ksherlock/merlin-utils.git synced 2024-06-11 04:29:32 +00:00
Code Issues Projects Releases Wiki Activity

allow multiple linker 1 saves. each will generate a new file.

Browse Source
This commit is contained in:
Kelvin Sherlock 2019-12-14 22:24:24 -05:00
parent a64c1ba843
commit c341d9a54f
1 changed files with 16 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
link.cpp
View File

@ -156,6 +156,8 @@ namespace {
unsigned ftype = 0xb3; unsigned ftype = 0xb3;
unsigned atype = 0x0000; unsigned atype = 0x0000;
unsigned kind = 0x0000; unsigned kind = 0x0000;
unsigned org = 0x0000;
unsigned sav = 0; unsigned sav = 0;
unsigned lnk = 0; unsigned lnk = 0;
bool end = false; bool end = false;
@ -165,7 +167,7 @@ namespace {
size_t pos_offset = 0; size_t pos_offset = 0;
size_t len_offset = 0; size_t len_offset = 0;
/* do/els/fin stuff */ /* do/els/fin stuff. 32 do levels supported. */
uint32_t active_bits = 1; uint32_t active_bits = 1;
bool active = true; bool active = true;
@ -589,14 +591,18 @@ void finish(void) {
resolve(); resolve();
print_symbols(); print_symbols();
if (save_file.empty()) save_file = "gs.out"; std::string path = save_file;
if (path.empty()) path = "gs.out";
try { try {
save_omf(save_file, segments, compress, express); save_omf(path, segments, compress, express);
set_file_type(save_file, ftype, atype); set_file_type(path, ftype, atype);
} catch (std::exception &ex) { } catch (std::exception &ex) {
errx(EX_OSERR, "%s: %s", save_file.c_str(), ex.what()); errx(EX_OSERR, "%s: %s", path.c_str(), ex.what());
} }
segments.clear();
relocations.clear();
} }
@ -831,7 +837,11 @@ void evaluate(label_t label, opcode_t opcode, const char *cursor) {
} }
if (lkv == 1) { if (lkv == 1) {
finish(); finish();
end = true; // reset. could have another link afterwards.
segments.clear();
relocations.clear();
save_file.clear();
new_segment();
} }
if (lkv == 2) { if (lkv == 2) {
/* add a new segment */ /* add a new segment */