output-format.sed 618 B

1234567891011121314151617181920212223242526272829303132333435
  1. /ld.*[ ]-E[BL]/b f
  2. /collect.*[ ]-E[BL]/b f
  3. /OUTPUT_FORMAT[^)]*$/{N
  4. s/\n[ ]*/ /
  5. }
  6. t o
  7. : o
  8. s/^.*OUTPUT_FORMAT(\([^,]*\), \1, \1).*$/OUTPUT_FORMAT(\1)/
  9. t q
  10. s/^.*OUTPUT_FORMAT(\([^,]*\), \([^,]*\), \([^,]*\)).*$/\1,\2,\3/
  11. t s
  12. s/^.*OUTPUT_FORMAT(\([^,)]*\).*$)/OUTPUT_FORMAT(\1)/
  13. t q
  14. d
  15. : s
  16. s/"//g
  17. G
  18. s/\n//
  19. s/^\([^,]*\),\([^,]*\),\([^,]*\),B/OUTPUT_FORMAT(\2)/p
  20. s/^\([^,]*\),\([^,]*\),\([^,]*\),L/OUTPUT_FORMAT(\3)/p
  21. s/^\([^,]*\),\([^,]*\),\([^,]*\)/OUTPUT_FORMAT(\1)/p
  22. /,/s|^|*** BUG in libc/scripts/output-format.sed *** |p
  23. q
  24. : q
  25. s/"//g
  26. p
  27. q
  28. : f
  29. s/^.*[ ]-E\([BL]\)[ ].*$/,\1/
  30. t h
  31. s/^.*[ ]-E\([BL]\)$/,\1/
  32. t h
  33. d
  34. : h
  35. h