artemist/mes
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

mescc: Remove data section from disassembly.

Browse source 
* module/mes/elf.mes (make-elf): Remove executable bit from data.
This commit is contained in:
Jan Nieuwenhuizen 2017-01-03 12:43:00 +01:00
parent 109cbdd1e7
commit ea7e3f4952
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
module/mes/elf.mes
View file

@ -1,7 +1,7 @@
;;; -*-scheme-*- ;;; -*-scheme-*-
;;; Mes --- Maxwell Equations of Software ;;; Mes --- Maxwell Equations of Software
;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org> ;;; Copyright © 2016,2017 Jan Nieuwenhuizen <janneke@gnu.org>
;;; ;;;
;;; This file is part of Mes. ;;; This file is part of Mes.
;;; ;;;
@ -234,7 +234,7 @@
(define SHT-NOTE 7) (define SHT-NOTE 7)
(define SHF-WRITE 1) (define SHF-WRITE 1)
(define SHF-ALLOC 4) (define SHF-ALLOC 2)
(define SHF-EXEC 4) (define SHF-EXEC 4)
(define SHF-STRINGS #x20) (define SHF-STRINGS #x20)
@ -248,8 +248,8 @@
(define (section-headers) (define (section-headers)
(append (append
(section-header 0 0 0 0 '() 0 0 0) (section-header 0 0 0 0 '() 0 0 0)
(section-header 1 SHT-PROGBITS (logior SHF-WRITE SHF-ALLOC) text-offset text 0 0 0) (section-header 1 SHT-PROGBITS (logior SHF-WRITE SHF-EXEC) text-offset text 0 0 0)
(section-header 7 SHT-PROGBITS (logior SHF-WRITE SHF-ALLOC) data-offset data 0 0 0) (section-header 7 SHT-PROGBITS (logior SHF-WRITE) data-offset data 0 0 0)
(section-header 13 SHT-NOTE 0 note-offset note 0 0 0) (section-header 13 SHT-NOTE 0 note-offset note 0 0 0)
(section-header 19 SHT-STRTAB SHF-STRINGS shstr-offset shstr 0 0 0) (section-header 19 SHT-STRTAB SHF-STRINGS shstr-offset shstr 0 0 0)
(section-header 29 SHT-SYMTAB SHF-ALLOC sym-offset sym 6 0 (length (symbol-table-entry 0 0 0 0 0 0))) (section-header 29 SHT-SYMTAB SHF-ALLOC sym-offset sym 6 0 (length (symbol-table-entry 0 0 0 0 0 0)))