a.elf for elf tests

release
Erik Charlebois 2010-04-12 21:38:01 -07:00
parent 904a205728
commit f31929ca5b
3 changed files with 5 additions and 5 deletions

BIN
extra/elf/a.elf Executable file

Binary file not shown.

View File

@ -45,7 +45,7 @@ IN: elf.tests
} }
} }
[ [
"resource:extra/elf/a.out" [ "resource:extra/elf/a.elf" [
sections [ name>> ] map sections [ name>> ] map
] with-mapped-elf ] with-mapped-elf
] ]
@ -74,7 +74,7 @@ unit-test
} }
} }
[ [
"resource:extra/elf/a.out" [ "resource:extra/elf/a.elf" [
segments [ program-header>> p_type>> PT_LOAD = ] find nip segments [ program-header>> p_type>> PT_LOAD = ] find nip
sections [ name>> ] map sections [ name>> ] map
] with-mapped-elf ] with-mapped-elf
@ -158,7 +158,7 @@ unit-test
} }
} }
[ [
"resource:extra/elf/a.out" [ "resource:extra/elf/a.elf" [
sections ".symtab" find-section symbols sections ".symtab" find-section symbols
[ name>> ] map [ name>> ] map
] with-mapped-elf ] with-mapped-elf
@ -172,7 +172,7 @@ unit-test
} }
} }
[ [
"resource:extra/elf/a.out" [ "resource:extra/elf/a.elf" [
sections ".symtab" "main" find-section-symbol sections ".symtab" "main" find-section-symbol
symbol-data >byte-array symbol-data >byte-array
] with-mapped-elf ] with-mapped-elf

View File

@ -47,5 +47,5 @@ STRING: validation-output
; ;
{ $ validation-output } { $ validation-output }
[ <string-writer> dup [ "resource:extra/elf/a.out" nm ] with-output-stream >string ] [ <string-writer> dup [ "resource:extra/elf/a.elf" nm ] with-output-stream >string ]
unit-test unit-test