mescc-tools v1.3

[Vagrant Cascadian]

Jeremiah wrote:
> As adding support for RISC-V required breaking changes in mescc-tools
> (specifically blood-elf)
> 
> you'll want to incorporate this patch:
> https://paste.debian.net/1214862/

I tested this patch building mes 0.23 on Debian with mescc-tools 1.3,
and it appears to work.

Just in case the paste URL expires, I'm including the patch below.

live well,
  vagrant

diff --git a/module/mescc/mescc.scm b/module/mescc/mescc.scm
index 6f334945..1942bdf6 100644
--- a/module/mescc/mescc.scm
+++ b/module/mescc/mescc.scm
@@ -187,7 +187,7 @@
          (verbose? (count-opt options 'verbose))
          (M1 (or (getenv "M1") "M1"))
          (command `(,M1
-                    "--LittleEndian"
+                    "--little-endian"
                     ,@(arch-get-architecture options)
                     "-f" ,(arch-find options (arch-get-m1-macros options))
                     ,@(append-map (cut list "-f" <>) M1-files)
@@ -214,16 +214,15 @@
                               (option-ref options 'nostdlib #f)) '()
                               `("-f" ,(arch-find options "crt1.o"))))
          (command `(,hex2
-                    "--LittleEndian"
+                    "--little-endian"
                     ,@(arch-get-architecture options)
-                    "--BaseAddress" ,base-address
+                    "--base-address" ,base-address
                     "-f" ,(kernel-find
                            options
                            (string-append "elf" machine "-header.hex2"))
                     ,@start-files
                     ,@(append-map (cut list "-f" <>) hex2-files)
                     "-f" ,elf-footer
-                    "--exec_enable"
                     "-o" ,elf-file-name)))
     (when (and verbose? (> verbose? 1))
       (stderr "~a\n" (string-join command)))
@@ -238,7 +237,8 @@
          (verbose? (count-opt options 'verbose))
          (blood-elf (or (getenv "BLOOD_ELF") "blood-elf"))
          (command `(,blood-elf
-                      "-f" ,(arch-find options (arch-get-m1-macros options))
+                    "-f" ,(arch-find options (arch-get-m1-macros options))
+                    "--little-endian"
                       ,@(append-map (cut list "-f" <>) M1-files)
                       "-o" ,M1-blood-elf-footer)))
     (when (and verbose? (> verbose? 1))

signature.asc
Description: PGP signature