From 715d9c00a2c8f12ef5aa38dbc5cf25b925c63726 Mon Sep 17 00:00:00 2001
From: mrdudz <mrdudz@users.noreply.github.com>
Date: Sun, 22 Jun 2025 21:09:40 +0200
Subject: [PATCH] initial (identical) minimal "library" for assembly support
 for c65 and mega65. taken from #1792

---
 libsrc/c65/exehdr.s      | 32 ++++++++++++++++++++++++++++++++
 libsrc/c65/loadaddr.s    | 16 ++++++++++++++++
 libsrc/mega65/exehdr.s   | 32 ++++++++++++++++++++++++++++++++
 libsrc/mega65/loadaddr.s | 16 ++++++++++++++++
 4 files changed, 96 insertions(+)
 create mode 100644 libsrc/c65/exehdr.s
 create mode 100644 libsrc/c65/loadaddr.s
 create mode 100644 libsrc/mega65/exehdr.s
 create mode 100644 libsrc/mega65/loadaddr.s

diff --git a/libsrc/c65/exehdr.s b/libsrc/c65/exehdr.s
new file mode 100644
index 000000000..645fc12e7
--- /dev/null
+++ b/libsrc/c65/exehdr.s
@@ -0,0 +1,32 @@
+;
+; Ullrich von Bassewitz, 2010-11-14
+;
+; This module supplies a small BASIC stub program that jumps to the machine
+; language code that follows it using SYS.
+;
+
+        ; The following symbol is used by linker config to force the module
+        ; to get included into the output file
+        .export         __EXEHDR__: absolute = 1
+
+.segment        "EXEHDR"
+
+        .addr   Next
+        .word   .version        ; Line number
+        .byte   $fe, $02, "0:"  ; BANK 0
+        .byte   $9e             ; SYS
+;       .byte   <(((Start / 10000) .mod 10) + '0')
+        .byte   <(((Start /  1000) .mod 10) + '0')
+        .byte   <(((Start /   100) .mod 10) + '0')
+        .byte   <(((Start /    10) .mod 10) + '0')
+        .byte   <(((Start /     1) .mod 10) + '0')
+        .byte   $00             ; End of BASIC line
+Next:   .word   0               ; BASIC end marker
+Start:
+
+; If the start address is larger than 4 digits, the header generated above
+; will not contain the highest digit. Instead of wasting one more digit that
+; is almost never used, check it at link time and generate an error so the
+; user knows something is wrong.
+
+.assert (Start < 10000), error, "Start address too large for generated BASIC stub"
diff --git a/libsrc/c65/loadaddr.s b/libsrc/c65/loadaddr.s
new file mode 100644
index 000000000..0675dd67d
--- /dev/null
+++ b/libsrc/c65/loadaddr.s
@@ -0,0 +1,16 @@
+;
+; Ullrich von Bassewitz, 2010-11-13
+;
+; This module supplies the load address that is expected by Commodore
+; machines in the first two bytes of an excutable disk file.
+;
+
+
+        ; The following symbol is used by linker config to force the module
+        ; to get included into the output file
+        .export         __LOADADDR__: absolute = 1
+
+.segment        "LOADADDR"
+
+        .addr   *+2
+
diff --git a/libsrc/mega65/exehdr.s b/libsrc/mega65/exehdr.s
new file mode 100644
index 000000000..645fc12e7
--- /dev/null
+++ b/libsrc/mega65/exehdr.s
@@ -0,0 +1,32 @@
+;
+; Ullrich von Bassewitz, 2010-11-14
+;
+; This module supplies a small BASIC stub program that jumps to the machine
+; language code that follows it using SYS.
+;
+
+        ; The following symbol is used by linker config to force the module
+        ; to get included into the output file
+        .export         __EXEHDR__: absolute = 1
+
+.segment        "EXEHDR"
+
+        .addr   Next
+        .word   .version        ; Line number
+        .byte   $fe, $02, "0:"  ; BANK 0
+        .byte   $9e             ; SYS
+;       .byte   <(((Start / 10000) .mod 10) + '0')
+        .byte   <(((Start /  1000) .mod 10) + '0')
+        .byte   <(((Start /   100) .mod 10) + '0')
+        .byte   <(((Start /    10) .mod 10) + '0')
+        .byte   <(((Start /     1) .mod 10) + '0')
+        .byte   $00             ; End of BASIC line
+Next:   .word   0               ; BASIC end marker
+Start:
+
+; If the start address is larger than 4 digits, the header generated above
+; will not contain the highest digit. Instead of wasting one more digit that
+; is almost never used, check it at link time and generate an error so the
+; user knows something is wrong.
+
+.assert (Start < 10000), error, "Start address too large for generated BASIC stub"
diff --git a/libsrc/mega65/loadaddr.s b/libsrc/mega65/loadaddr.s
new file mode 100644
index 000000000..0675dd67d
--- /dev/null
+++ b/libsrc/mega65/loadaddr.s
@@ -0,0 +1,16 @@
+;
+; Ullrich von Bassewitz, 2010-11-13
+;
+; This module supplies the load address that is expected by Commodore
+; machines in the first two bytes of an excutable disk file.
+;
+
+
+        ; The following symbol is used by linker config to force the module
+        ; to get included into the output file
+        .export         __LOADADDR__: absolute = 1
+
+.segment        "LOADADDR"
+
+        .addr   *+2
+