/extra/elf/nm/nm-tests.factor

http://github.com/abeaumont/factor · Factor · 53 lines · 49 code · 2 blank · 2 comment · 1 complexity · 5fb296cba2c28e828d4437d4f281d578 MD5 · raw file

  1. ! Copyright (C) 2010 Erik Charlebois.
  2. ! See http://factorcode.org/license.txt for BSD license.
  3. USING: elf.nm io io.streams.string kernel literals multiline strings
  4. system tools.test ;
  5. IN: elf.nm.tests
  6. STRING: validation-output
  7. 0000000000000000 absolute init.c
  8. 000000000040046c .text call_gmon_start
  9. 0000000000000000 absolute crtstuff.c
  10. 0000000000600e18 .ctors __CTOR_LIST__
  11. 0000000000600e28 .dtors __DTOR_LIST__
  12. 0000000000600e38 .jcr __JCR_LIST__
  13. 0000000000400490 .text __do_global_dtors_aux
  14. 0000000000601020 .bss completed.7342
  15. 0000000000601028 .bss dtor_idx.7344
  16. 0000000000400500 .text frame_dummy
  17. 0000000000000000 absolute crtstuff.c
  18. 0000000000600e20 .ctors __CTOR_END__
  19. 00000000004006d8 .eh_frame __FRAME_END__
  20. 0000000000600e38 .jcr __JCR_END__
  21. 00000000004005e0 .text __do_global_ctors_aux
  22. 0000000000000000 absolute test.c
  23. 0000000000600fe8 .got.plt _GLOBAL_OFFSET_TABLE_
  24. 0000000000600e14 .ctors __init_array_end
  25. 0000000000600e14 .ctors __init_array_start
  26. 0000000000600e40 .dynamic _DYNAMIC
  27. 0000000000601010 .data data_start
  28. 0000000000000000 undefined printf@@GLIBC_2.2.5
  29. 0000000000400540 .text __libc_csu_fini
  30. 0000000000400440 .text _start
  31. 0000000000000000 undefined __gmon_start__
  32. 0000000000000000 undefined _Jv_RegisterClasses
  33. 0000000000400618 .fini _fini
  34. 0000000000000000 undefined __libc_start_main@@GLIBC_2.2.5
  35. 0000000000400628 .rodata _IO_stdin_used
  36. 0000000000601010 .data __data_start
  37. 0000000000601018 .data __dso_handle
  38. 0000000000600e30 .dtors __DTOR_END__
  39. 0000000000400550 .text __libc_csu_init
  40. 0000000000601020 absolute __bss_start
  41. 0000000000601030 absolute _end
  42. 0000000000601020 absolute _edata
  43. 0000000000400524 .text main
  44. 00000000004003f0 .init _init
  45. ;
  46. cpu ppc? [
  47. { $ validation-output }
  48. [ <string-writer> dup [ "resource:extra/elf/a.elf" elf-nm ] with-output-stream >string ]
  49. unit-test
  50. ] unless