Merged revisions 9692,9694-9695,9697-9714,9720,9722,9729,9732-9733,9740,9745,9749-9750,9753-9757,9760-9766,9768-9770,9772-9774,9783,9786,9788,9814,9822,9825,9837-9850,9852,9855-9856,9863-9864,9867,9882,9891-9892,9897,9899-9900,9902-9904,9907-9911,9913,9915,9917,9920,9922-9937,9939-9974,9976-10005,10007-10012,10014-10046,10049-10051,10053-10067,10069-10071,10074,10079,10082,10084-10086,10091,10099-10100,10102-10103,10113-10114,10129-10130,10136 via svnmerge from

http://svn.freepascal.org/svn/fpc/trunk ........ r9783 | joost | 2008-01-18 23:52:13 +0100 (Fri, 18 Jan 2008) | 1 line * DigestTestREport makes it possible to write the unittest results to a testsuite-digest ........ r9786 | joost | 2008-01-19 00:40:44 +0100 (Sat, 19 Jan 2008) | 1 line * Added dependency on paszlib to fcl-fpcunit ........ r9788 | jonas | 2008-01-19 01:20:49 +0100 (Sat, 19 Jan 2008) | 2 lines + also add fpc-unit dependency on paszlib to build dependencies ........ r9882 | peter | 2008-01-23 18:04:40 +0100 (Wed, 23 Jan 2008) | 2 lines * shell/awk script to help creating fpmake.pp from existing ppu files ........ r9891 | peter | 2008-01-24 08:47:03 +0100 (Thu, 24 Jan 2008) | 2 lines * obsolete files ........ r9892 | peter | 2008-01-24 08:52:43 +0100 (Thu, 24 Jan 2008) | 2 lines * fpmake added ........ r9897 | peter | 2008-01-24 21:53:26 +0100 (Thu, 24 Jan 2008) | 2 lines * remove dos dependency ........ r9899 | peter | 2008-01-24 22:50:42 +0100 (Thu, 24 Jan 2008) | 2 lines * fpmake support ........ r9900 | peter | 2008-01-24 22:58:28 +0100 (Thu, 24 Jan 2008) | 2 lines * don't inlcude rtl unit depnedencies ........ r9902 | peter | 2008-01-24 23:08:59 +0100 (Thu, 24 Jan 2008) | 2 lines * fpmake added ........ r9903 | peter | 2008-01-24 23:57:37 +0100 (Thu, 24 Jan 2008) | 2 lines * new fpmake.pp ........ r9904 | peter | 2008-01-24 23:57:55 +0100 (Thu, 24 Jan 2008) | 2 lines * winunits-jedi deps ........ r9907 | peter | 2008-01-25 00:09:54 +0100 (Fri, 25 Jan 2008) | 3 lines * move pasjpeg * add fpmake.pp for pasjpeg ........ r9908 | peter | 2008-01-25 00:12:13 +0100 (Fri, 25 Jan 2008) | 2 lines * fpmake.pp ........ r9909 | peter | 2008-01-25 00:30:20 +0100 (Fri, 25 Jan 2008) | 4 lines * move uriparser to fcl-base * move netdb unit and examples to fcl-net * removed netdb package ........ r9910 | peter | 2008-01-25 00:35:30 +0100 (Fri, 25 Jan 2008) | 3 lines * mode objfpc added * remove old fpmake ........ r9911 | peter | 2008-01-25 00:37:32 +0100 (Fri, 25 Jan 2008) | 2 lines * new fpmake.pp ........ r9913 | peter | 2008-01-25 00:49:49 +0100 (Fri, 25 Jan 2008) | 2 lines * new fpmake.pp ........ r9915 | peter | 2008-01-25 00:59:57 +0100 (Fri, 25 Jan 2008) | 2 lines * build unit dependencies ........ r9917 | peter | 2008-01-25 01:16:33 +0100 (Fri, 25 Jan 2008) | 2 lines * new fpmake.pp ........ r9920 | peter | 2008-01-25 17:23:31 +0100 (Fri, 25 Jan 2008) | 2 lines * remove dependency on itself ........ r9922 | marco | 2008-01-26 14:08:46 +0100 (Sat, 26 Jan 2008) | 3 lines * Basic moving and updating of mysql. makefile.fpc's included, regened makefiles not. fpmake also in separate commit (will follow shortly) ........ r9923 | marco | 2008-01-26 14:12:04 +0100 (Sat, 26 Jan 2008) | 2 lines * regened makefiles for mysql move in separate commit to ease merging. ........ r9924 | marco | 2008-01-26 14:30:07 +0100 (Sat, 26 Jan 2008) | 2 lines * fpmake for mysql ........ r9925 | marco | 2008-01-26 14:53:13 +0100 (Sat, 26 Jan 2008) | 3 lines * Package ibase moved + makefile.fpc's. fpmake and regenned makefiles follow in separate commits ........ r9926 | marco | 2008-01-26 14:54:17 +0100 (Sat, 26 Jan 2008) | 2 lines * makefiles of ibase moving ........ r9927 | marco | 2008-01-26 14:54:47 +0100 (Sat, 26 Jan 2008) | 2 lines * Makefile mysql move was not committed, fixed ........ r9928 | marco | 2008-01-26 15:09:42 +0100 (Sat, 26 Jan 2008) | 2 lines * fpmake for ibase ........ r9929 | marco | 2008-01-26 15:34:28 +0100 (Sat, 26 Jan 2008) | 2 lines * removed exces files + mysql/readme move ........ r9930 | marco | 2008-01-26 15:51:36 +0100 (Sat, 26 Jan 2008) | 2 lines * ncurses moved. makefile.fpc + fpmake included, makefile in separate commit ........ r9931 | marco | 2008-01-26 16:04:58 +0100 (Sat, 26 Jan 2008) | 2 lines * Unzip moved ........ r9932 | marco | 2008-01-26 16:12:56 +0100 (Sat, 26 Jan 2008) | 2 lines * zlib moved ........ r9933 | marco | 2008-01-26 16:14:00 +0100 (Sat, 26 Jan 2008) | 2 lines * cleanup moved pkgs ........ r9934 | marco | 2008-01-26 16:28:25 +0100 (Sat, 26 Jan 2008) | 2 lines * oracle moved + makefile.fpc + fpmake ........ r9935 | marco | 2008-01-26 17:19:50 +0100 (Sat, 26 Jan 2008) | 2 lines * Dbus moved, incl everything ........ r9936 | marco | 2008-01-26 17:37:27 +0100 (Sat, 26 Jan 2008) | 2 lines * libc moved ........ r9937 | marco | 2008-01-26 17:38:26 +0100 (Sat, 26 Jan 2008) | 1 line * libc deleted ........ r9939 | marco | 2008-01-26 17:46:49 +0100 (Sat, 26 Jan 2008) | 2 lines * Moved odbc ........ r9940 | marco | 2008-01-26 17:47:05 +0100 (Sat, 26 Jan 2008) | 2 lines * removed ........ r9941 | marco | 2008-01-26 17:47:34 +0100 (Sat, 26 Jan 2008) | 2 lines * deleted ........ r9942 | peter | 2008-01-26 17:49:25 +0100 (Sat, 26 Jan 2008) | 2 lines * netdb is unix only ........ r9943 | marco | 2008-01-26 17:57:00 +0100 (Sat, 26 Jan 2008) | 2 lines * regexpr moved ........ r9944 | marco | 2008-01-26 17:57:23 +0100 (Sat, 26 Jan 2008) | 2 lines * delete ........ r9945 | marco | 2008-01-26 18:12:43 +0100 (Sat, 26 Jan 2008) | 2 lines * postgres and sqlite moved ........ r9946 | jonas | 2008-01-26 18:16:46 +0100 (Sat, 26 Jan 2008) | 4 lines + added missing Makefiles * regenerated packages/extra Makefile after several packages were moved ........ r9947 | marco | 2008-01-26 18:26:21 +0100 (Sat, 26 Jan 2008) | 2 lines * missing files added ........ r9948 | marco | 2008-01-26 18:45:32 +0100 (Sat, 26 Jan 2008) | 2 lines * pthreads moved ........ r9949 | marco | 2008-01-26 18:46:00 +0100 (Sat, 26 Jan 2008) | 2 lines * excess packages deleted ........ r9950 | marco | 2008-01-26 19:03:23 +0100 (Sat, 26 Jan 2008) | 2 lines * Imagemagick moved ........ r9951 | marco | 2008-01-26 19:18:09 +0100 (Sat, 26 Jan 2008) | 2 lines * gdbint moved ........ r9952 | marco | 2008-01-26 19:24:29 +0100 (Sat, 26 Jan 2008) | 2 lines * libpng moved for Florian ........ r9953 | marco | 2008-01-26 19:24:59 +0100 (Sat, 26 Jan 2008) | 2 lines * packages removed ........ r9954 | peter | 2008-01-26 19:26:35 +0100 (Sat, 26 Jan 2008) | 2 lines * move cgiapp and ezcgi to fcl-web ........ r9955 | peter | 2008-01-26 19:58:55 +0100 (Sat, 26 Jan 2008) | 2 lines * new fpmake.pp ........ r9956 | peter | 2008-01-26 20:15:13 +0100 (Sat, 26 Jan 2008) | 2 lines * add mode objfpc ........ r9957 | peter | 2008-01-26 20:18:39 +0100 (Sat, 26 Jan 2008) | 2 lines * add fpmake.pp ........ r9958 | peter | 2008-01-26 20:18:52 +0100 (Sat, 26 Jan 2008) | 2 lines * new fpmake.pp ........ r9959 | marco | 2008-01-26 20:34:39 +0100 (Sat, 26 Jan 2008) | 2 lines * os2 compilation fixed. didn't work because of outdated fpmkunit ........ r9960 | peter | 2008-01-26 20:42:50 +0100 (Sat, 26 Jan 2008) | 2 lines * top level packages building ........ r9961 | peter | 2008-01-26 20:46:02 +0100 (Sat, 26 Jan 2008) | 2 lines * add commandline how to generate the include lines ........ r9962 | marco | 2008-01-26 20:54:31 +0100 (Sat, 26 Jan 2008) | 2 lines * unixutil moved ........ r9963 | marco | 2008-01-26 21:02:30 +0100 (Sat, 26 Jan 2008) | 2 lines * X11 moved ........ r9964 | marco | 2008-01-26 21:11:31 +0100 (Sat, 26 Jan 2008) | 2 lines * uuid moved ........ r9965 | marco | 2008-01-26 21:12:36 +0100 (Sat, 26 Jan 2008) | 2 lines * removed rests of moved pkgs ........ r9966 | marco | 2008-01-26 21:17:35 +0100 (Sat, 26 Jan 2008) | 2 lines * ldap moved ........ r9967 | peter | 2008-01-26 21:20:09 +0100 (Sat, 26 Jan 2008) | 2 lines * create fpc-all package from all other packages ........ r9968 | marco | 2008-01-26 21:26:01 +0100 (Sat, 26 Jan 2008) | 2 lines * mad,modplug,dts ........ r9969 | marco | 2008-01-26 21:27:05 +0100 (Sat, 26 Jan 2008) | 2 lines * and delete 4 pkgs leftovers, ldap mad modplug dts ........ r9970 | marco | 2008-01-26 21:43:23 +0100 (Sat, 26 Jan 2008) | 2 lines * gdbm tcl syslog libcurl ........ r9971 | marco | 2008-01-26 21:44:11 +0100 (Sat, 26 Jan 2008) | 2 lines * gdbm libcurl tcl syslog removed from extra (leftover makefiles etc) ........ r9972 | peter | 2008-01-26 21:52:25 +0100 (Sat, 26 Jan 2008) | 2 lines * new fpmake.pp ........ r9973 | marco | 2008-01-26 21:55:34 +0100 (Sat, 26 Jan 2008) | 2 lines * opengl ........ r9974 | marco | 2008-01-26 22:00:05 +0100 (Sat, 26 Jan 2008) | 2 lines * opengl deleted ........ r9976 | marco | 2008-01-26 22:06:36 +0100 (Sat, 26 Jan 2008) | 2 lines * move whole dirs, delete possible conflicting files beforehand ........ r9977 | marco | 2008-01-26 22:07:16 +0100 (Sat, 26 Jan 2008) | 2 lines * more makefile ........ r9978 | marco | 2008-01-26 22:17:10 +0100 (Sat, 26 Jan 2008) | 2 lines * Moved gtk -> gtk1 first pass ........ r9979 | marco | 2008-01-26 22:18:35 +0100 (Sat, 26 Jan 2008) | 2 lines * gtkgl lost its own makefile in the change -> demo moved to examples ........ r9980 | marco | 2008-01-26 22:22:36 +0100 (Sat, 26 Jan 2008) | 2 lines * fpmake for gtk1 ........ r9981 | marco | 2008-01-26 22:32:36 +0100 (Sat, 26 Jan 2008) | 2 lines * Pass two, src/ creation ........ r9982 | marco | 2008-01-26 22:58:23 +0100 (Sat, 26 Jan 2008) | 2 lines * matroska moved ........ r9983 | marco | 2008-01-26 23:03:51 +0100 (Sat, 26 Jan 2008) | 2 lines * Cairo moved ........ r9984 | marco | 2008-01-26 23:06:01 +0100 (Sat, 26 Jan 2008) | 2 lines * toplevel makefiles updated ........ r9985 | marco | 2008-01-26 23:20:45 +0100 (Sat, 26 Jan 2008) | 2 lines * gtk2 first pass ........ r9986 | marco | 2008-01-26 23:23:03 +0100 (Sat, 26 Jan 2008) | 2 lines * one more file moved to gtk2 ........ r9987 | marco | 2008-01-26 23:28:06 +0100 (Sat, 26 Jan 2008) | 2 lines * chm moved ........ r9988 | marco | 2008-01-26 23:41:08 +0100 (Sat, 26 Jan 2008) | 2 lines * 4 pkgs a52 bfd aspell bzip2. Bzip2 didn't compile ........ r9989 | marco | 2008-01-26 23:44:42 +0100 (Sat, 26 Jan 2008) | 2 lines * 6 old pkgs deleted a52 bfd aspell bzip2 gtk2 chm ........ r9990 | marco | 2008-01-26 23:45:24 +0100 (Sat, 26 Jan 2008) | 2 lines * removed old dirs cairo extra pkg ........ r9991 | marco | 2008-01-26 23:45:46 +0100 (Sat, 26 Jan 2008) | 2 lines * delete matroska ........ r9992 | marco | 2008-01-26 23:47:18 +0100 (Sat, 26 Jan 2008) | 2 lines * delete old pkg gtk, is now gtk1 ........ r9993 | marco | 2008-01-26 23:51:58 +0100 (Sat, 26 Jan 2008) | 2 lines * makefiles somewhat regenned for chm-gtk2-a52-bfd-aspell-bzip2 pkgs ........ r9994 | marco | 2008-01-26 23:58:46 +0100 (Sat, 26 Jan 2008) | 2 lines * fpgtk first pass ........ r9995 | marco | 2008-01-27 00:00:46 +0100 (Sun, 27 Jan 2008) | 2 lines * examples moved ........ r9996 | marco | 2008-01-27 00:01:37 +0100 (Sun, 27 Jan 2008) | 1 line * stale dir moved ........ r9997 | marco | 2008-01-27 00:05:38 +0100 (Sun, 27 Jan 2008) | 2 lines * newt moved ........ r9998 | marco | 2008-01-27 00:06:56 +0100 (Sun, 27 Jan 2008) | 2 lines * cleanup after moving ........ r9999 | marco | 2008-01-27 00:11:25 +0100 (Sun, 27 Jan 2008) | 2 lines * imlib moved ........ r10000 | marco | 2008-01-27 00:11:45 +0100 (Sun, 27 Jan 2008) | 2 lines * old imlib remove ........ r10001 | marco | 2008-01-27 00:18:37 +0100 (Sun, 27 Jan 2008) | 2 lines * cdrom ........ r10002 | marco | 2008-01-27 00:20:18 +0100 (Sun, 27 Jan 2008) | 1 line * forgot one file ........ r10003 | marco | 2008-01-27 00:32:11 +0100 (Sun, 27 Jan 2008) | 1 line * hermes moved ........ r10004 | marco | 2008-01-27 00:32:49 +0100 (Sun, 27 Jan 2008) | 1 line * delete old hermes ........ r10005 | marco | 2008-01-27 00:36:53 +0100 (Sun, 27 Jan 2008) | 1 line * libgd moved ........ r10007 | marco | 2008-01-27 00:39:08 +0100 (Sun, 27 Jan 2008) | 2 lines * users first pass ........ r10008 | marco | 2008-01-27 00:46:10 +0100 (Sun, 27 Jan 2008) | 3 lines * Moved users pkg, added makefile.fpc, and made it in general somewhat compilable. Demo still fails due to crypt_h unit missing ........ r10009 | marco | 2008-01-27 00:46:31 +0100 (Sun, 27 Jan 2008) | 1 line * remove users ........ r10010 | marco | 2008-01-27 00:48:51 +0100 (Sun, 27 Jan 2008) | 2 lines * utmp moved ........ r10011 | marco | 2008-01-27 00:53:01 +0100 (Sun, 27 Jan 2008) | 1 line * moved svgalib ........ r10012 | marco | 2008-01-27 01:00:07 +0100 (Sun, 27 Jan 2008) | 2 lines * Makefiles regenned ........ r10014 | marco | 2008-01-27 10:39:14 +0100 (Sun, 27 Jan 2008) | 1 line * openal moved ........ r10015 | marco | 2008-01-27 10:51:30 +0100 (Sun, 27 Jan 2008) | 1 line * xforms moved ........ r10016 | marco | 2008-01-27 11:04:56 +0100 (Sun, 27 Jan 2008) | 1 line * fftw, minor updates to xforms ........ r10017 | marco | 2008-01-27 11:10:59 +0100 (Sun, 27 Jan 2008) | 1 line * numlib moved ........ r10018 | marco | 2008-01-27 11:13:37 +0100 (Sun, 27 Jan 2008) | 1 line * pcap moved ........ r10019 | marco | 2008-01-27 11:18:45 +0100 (Sun, 27 Jan 2008) | 1 line * rexx moved ........ r10020 | marco | 2008-01-27 11:22:08 +0100 (Sun, 27 Jan 2008) | 1 line * oggvorbis first pass ........ r10021 | marco | 2008-01-27 11:23:33 +0100 (Sun, 27 Jan 2008) | 1 line * oggvorbis move + cleanup ........ r10022 | marco | 2008-01-27 11:28:44 +0100 (Sun, 27 Jan 2008) | 1 line * ggi moved ........ r10023 | michael | 2008-01-27 11:32:11 +0100 (Sun, 27 Jan 2008) | 1 line * Added support for bitpacked ........ r10024 | marco | 2008-01-27 11:35:18 +0100 (Sun, 27 Jan 2008) | 1 line * sdl moved ........ r10025 | michael | 2008-01-27 11:39:07 +0100 (Sun, 27 Jan 2008) | 1 line * Save bitpacked also, not just register ........ r10026 | michael | 2008-01-27 11:40:41 +0100 (Sun, 27 Jan 2008) | 1 line * GetDeclaration reflects bitpacked ........ r10027 | marco | 2008-01-27 11:43:35 +0100 (Sun, 27 Jan 2008) | 1 line * sndfile ........ r10028 | marco | 2008-01-27 11:45:21 +0100 (Sun, 27 Jan 2008) | 1 line * removed dead utmp dir ........ r10029 | michael | 2008-01-27 11:48:45 +0100 (Sun, 27 Jan 2008) | 1 line * Support for bitpacked and removed stray debug writeln ........ r10030 | marco | 2008-01-27 11:49:05 +0100 (Sun, 27 Jan 2008) | 1 line * shellscript to print deps based on makefile.fpc requirement lines ........ r10031 | marco | 2008-01-27 11:52:27 +0100 (Sun, 27 Jan 2008) | 1 line * lua moved ........ r10032 | marco | 2008-01-27 11:56:35 +0100 (Sun, 27 Jan 2008) | 1 line * openssl moved ........ r10033 | marco | 2008-01-27 12:09:10 +0100 (Sun, 27 Jan 2008) | 1 line * makefiles regenned ........ r10034 | marco | 2008-01-27 12:15:57 +0100 (Sun, 27 Jan 2008) | 1 line * gbaunits moved ........ r10035 | marco | 2008-01-27 12:20:55 +0100 (Sun, 27 Jan 2008) | 1 line * palmunits moved ........ r10036 | marco | 2008-01-27 12:43:58 +0100 (Sun, 27 Jan 2008) | 1 line * graph moved ........ r10037 | marco | 2008-01-27 12:53:57 +0100 (Sun, 27 Jan 2008) | 1 line * os2units moved ........ r10038 | marco | 2008-01-27 13:00:36 +0100 (Sun, 27 Jan 2008) | 1 line * libndsfpc moved ........ r10039 | marco | 2008-01-27 13:01:35 +0100 (Sun, 27 Jan 2008) | 1 line * os2units leftovers removed ........ r10040 | marco | 2008-01-27 13:24:32 +0100 (Sun, 27 Jan 2008) | 1 line * gnome1 moved ........ r10041 | marco | 2008-01-27 13:32:52 +0100 (Sun, 27 Jan 2008) | 1 line * regened, mostly working again ........ r10042 | marco | 2008-01-27 13:43:51 +0100 (Sun, 27 Jan 2008) | 2 lines * dep fixed ........ r10043 | marco | 2008-01-27 14:16:04 +0100 (Sun, 27 Jan 2008) | 1 line * amunits moved ........ r10044 | marco | 2008-01-27 14:30:17 +0100 (Sun, 27 Jan 2008) | 1 line * moved univint ........ r10045 | marco | 2008-01-27 14:55:40 +0100 (Sun, 27 Jan 2008) | 1 line * makefiles updated. httpd removed from compilation pending full removal ........ r10046 | michael | 2008-01-27 15:03:14 +0100 (Sun, 27 Jan 2008) | 1 line * Initial implementation ........ r10049 | marco | 2008-01-27 15:28:09 +0100 (Sun, 27 Jan 2008) | 1 line * gdbint removed from some platforms for mischi ........ r10050 | marco | 2008-01-27 15:42:46 +0100 (Sun, 27 Jan 2008) | 1 line * moved ptc ........ r10051 | marco | 2008-01-27 15:56:21 +0100 (Sun, 27 Jan 2008) | 2 lines * added ........ r10053 | marco | 2008-01-27 16:14:51 +0100 (Sun, 27 Jan 2008) | 1 line * gnome dep on gtk ........ r10054 | marco | 2008-01-27 16:21:51 +0100 (Sun, 27 Jan 2008) | 1 line * gnome1 now also dep on imlib ........ r10055 | marco | 2008-01-27 16:29:42 +0100 (Sun, 27 Jan 2008) | 1 line * more Gnome fixes ........ r10056 | marco | 2008-01-27 16:50:12 +0100 (Sun, 27 Jan 2008) | 2 lines * Another gnome order fix ........ r10057 | marco | 2008-01-27 16:52:05 +0100 (Sun, 27 Jan 2008) | 1 line * extra/ removed + packages/makefile update ........ r10058 | marco | 2008-01-27 17:34:53 +0100 (Sun, 27 Jan 2008) | 1 line * apache example fixes before moving ........ r10059 | marco | 2008-01-27 17:50:36 +0100 (Sun, 27 Jan 2008) | 2 lines * ptrint for a longint(ptr) typecast ........ r10060 | jonas | 2008-01-27 18:10:54 +0100 (Sun, 27 Jan 2008) | 7 lines - don't compile sdl for darwin/ppc64 and darwin/x86_64 (it also wasn't in the past) * graph does not depend on sdl for go32v2 (sdl is not compiled for go32v2) * sdl does not depend on pthreads and x11 for non-unix * opengl does not depend on x11 for non-unix - removed duplicated opengl dependencies declaration ........ r10061 | marco | 2008-01-27 18:22:29 +0100 (Sun, 27 Jan 2008) | 1 line * httpd moved, splitted, decapitated and rejoined ........ r10062 | marco | 2008-01-27 18:32:37 +0100 (Sun, 27 Jan 2008) | 1 line * httpd22 now added to all platforms that had dep on base/httpd ........ r10063 | marco | 2008-01-27 18:32:57 +0100 (Sun, 27 Jan 2008) | 1 line * base removed ........ r10064 | marco | 2008-01-27 18:45:38 +0100 (Sun, 27 Jan 2008) | 1 line * initial version ........ r10065 | marco | 2008-01-27 18:47:47 +0100 (Sun, 27 Jan 2008) | 1 line * fpmake ........ r10066 | marco | 2008-01-27 18:59:57 +0100 (Sun, 27 Jan 2008) | 1 line * base removed makefile changes ........ r10067 | peter | 2008-01-27 19:04:11 +0100 (Sun, 27 Jan 2008) | 2 lines * missing src/ for gdbint build with gdbver found ........ r10069 | jonas | 2008-01-27 22:23:10 +0100 (Sun, 27 Jan 2008) | 2 lines * fixed go32v2 check for sdl ........ r10070 | peter | 2008-01-27 22:31:33 +0100 (Sun, 27 Jan 2008) | 2 lines * gtk1, gtk2 for windows fixed ........ r10071 | peter | 2008-01-27 22:33:51 +0100 (Sun, 27 Jan 2008) | 2 lines * fixed win32 build ........ r10074 | peter | 2008-01-27 23:10:55 +0100 (Sun, 27 Jan 2008) | 2 lines * updated includes ........ r10079 | peter | 2008-01-28 09:08:35 +0100 (Mon, 28 Jan 2008) | 2 lines * Makefiles added ........ r10084 | vincents | 2008-01-28 20:20:26 +0100 (Mon, 28 Jan 2008) | 1 line * fixed win64 compilation ........ r10085 | marco | 2008-01-28 20:41:24 +0100 (Mon, 28 Jan 2008) | 1 line * includepath added ........ r10086 | marco | 2008-01-28 21:04:31 +0100 (Mon, 28 Jan 2008) | 1 line * sw_word -> longint ........ r10091 | michael | 2008-01-28 22:13:19 +0100 (Mon, 28 Jan 2008) | 1 line * Set windows library name correct ........ r10099 | marco | 2008-01-29 21:18:17 +0100 (Tue, 29 Jan 2008) | 1 line * gtk1 now depends on opengl in toplevel makefile ........ r10100 | marco | 2008-01-29 21:27:09 +0100 (Tue, 29 Jan 2008) | 2 lines * fixed typo ........ r10102 | peter | 2008-01-29 22:13:20 +0100 (Tue, 29 Jan 2008) | 2 lines * fixed typo in r10100 ........ r10103 | peter | 2008-01-29 22:48:45 +0100 (Tue, 29 Jan 2008) | 2 lines * fixed fpcdir ........ r10113 | michael | 2008-01-30 10:07:12 +0100 (Wed, 30 Jan 2008) | 1 line * PXlib added ........ r10114 | michael | 2008-01-30 11:52:34 +0100 (Wed, 30 Jan 2008) | 1 line * Unixtype removed for non-unix ........ r10136 | yury | 2008-02-01 20:20:26 +0100 (Fri, 01 Feb 2008) | 1 line * Fixed packages compilation for wince. ........ git-svn-id: http://svn.freepascal.org/svn/fpc/branches/fixes_2_2@10151 3ad0048d-3df7-0310-abae-a5850022a9f2
author: peter <peter@3ad0048d-3df7-0310-abae-a5850022a9f2> 2008-02-02 15:48:09 +0000
committer: peter <peter@3ad0048d-3df7-0310-abae-a5850022a9f2> 2008-02-02 15:48:09 +0000
commit: c8845dfe5ca36797bebc57bcc37aae6a8e94444a (patch)
tree: a815946b5827956fef96fe9548e4a9c4d1e1b7d7 /packages/bfd/src/bfd.pas
parent: d7617abfb24ee7c360c3d123e1e9b2b5cc800a5d (diff)
download: fpc-c8845dfe5ca36797bebc57bcc37aae6a8e94444a.tar.gz
1 files changed, 2994 insertions, 0 deletions
diff --git a/packages/bfd/src/bfd.pas b/packages/bfd/src/bfd.pas
new file mode 100644
index 0000000000..c8277cf698
--- /dev/null
+++ b/packages/bfd/src/bfd.pas
@@ -0,0 +1,2994 @@
+unit BFD;
+
+{$mode Delphi}
+interface
+
+{
+  Object Pascal Translation of bfd.h,
+  used in the Binary File Descriptor library
+  found in the GNU Binutils
+
+  This translation itself is in the public domain, but don't ignore
+  the copyright of the BFD lib itself (see 'original comments' below)
+
+  History:
+  07.08.2001: utessel@gmx.de (UT) (started translation)
+    - the structs, defines and functions are separated to different
+      blocks to have one large type block (since type forwards are not
+      possible across different type blocks)
+    - Maybe some comments were removed or are at wrong places: while
+      the codelines were sorted I did not check everything
+    - I did a lot of Search and Replace, so don't wonder if comments
+      were changed a bit, too.
+    - I renamed bfd to TBFD and a few other minor changes to keep the
+      namespace a bit cleaner
+
+}
+
+{
+  Original comments and copyrights:
+}
+
+(* Main header file for the bfd library -- portable access to object files.
+   Copyright 1990, 91, 92, 93, 94, 95, 96, 97, 98, 99, 2000
+   Free Software Foundation, Inc.
+   Contributed by Cygnus Support.
+
+** NOTE: bfd.h and bfd-in2.h are GENERATED files.  Don't change them;
+** instead, change bfd-in.h or the other BFD source files processed to
+** generate these files.
+
+This file is part of BFD, the Binary File Descriptor library.
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Software
+Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  *)
+
+(* bfd.h -- The only header file required by users of the bfd library
+
+The bfd.h file is generated from bfd-in.h and various .c files; if you
+change it, your changes will probably be lost.
+
+All the prototypes and definitions following the comment "THE FOLLOWING
+IS EXTRACTED FROM THE SOURCE" are extracted from the source files for
+BFD.  If you change it, someone oneday will extract it from the source
+again, and your changes will be lost.  To save yourself from this bind,
+change the definitions in the source in the bfd directory.  Type "make
+docs" and then "make headers" in that directory, and magically this file
+will change to reflect your changes.
+
+If you don't have the tools to perform the extraction, then you are
+safe from someone on your system trampling over your header files.
+You should still maintain the equivalence between the source and this
+file though; every change you make to the .c file should be reflected
+here.  *)
+
+{UT: these settings create matching records: }
+{$packrecords 4}
+{$ALIGN 4}
+{$MINENUMSIZE 4}
+
+
+
+const
+  BFD_VERSION   = '2.10.91';
+  BFD_ARCH_SIZE = 32;
+  BFD_LIB_NAME = 'libbfd-'+BFD_VERSION+'.dll';
+
+type
+(* forward declaration *)
+  PBFD = ^TBFD;
+  PPsymbol_cache_entry = ^Psymbol_cache_entry;
+  Psymbol_cache_entry = ^symbol_cache_entry;
+  PSec = ^sec;
+  PPSec = ^PSec;
+  Pbfd_target = ^bfd_target;
+  Pbfd_arch_info = ^bfd_arch_info;
+  PPreloc_cache_entry = ^Preloc_cache_entry;
+  Preloc_cache_entry = ^reloc_cache_entry;
+  Palent = ^alent;
+  Pbfd_comdat_info = ^bfd_comdat_info;
+  Prelent_chain = ^relent_chain;
+  Pbfd_window = ^bfd_window;
+  Pasymbol = ^asymbol;
+  Pbfd_size_type = ^bfd_size_type;
+  Porl = ^orl;
+  Psymbol_info = ^symbol_info;
+  PParelent = ^Parelent;
+  Parelent = ^arelent;
+  Pasection = ^asection;
+  PPreloc_howto = ^Preloc_howto;
+  Preloc_howto = ^reloc_howto;
+
+  Pbfd_link_info = pointer; //^bfd_link_info;
+  Pbfd_link_hash_table = pointer; //^bfd_link_hash_table;
+
+(* A pointer to a position in a file.  *)
+  file_ptr = LongInt;
+
+(* Represent a target address.  Also used as a generic unsigned type
+   which is guaranteed to be big enough to hold any arithmetic types
+   we need to deal with.  *)
+  bfd_vma = LongWord;
+
+(* A generic signed type which is guaranteed to be big enough to hold any
+   arithmetic types we need to deal with.  Can be assumed to be compatible
+   with bfd_vma in the same way that signed and LongWords are compatible
+   (as parameters, in assignment, etc).  *)
+  bfd_signed_vma = LongInt;
+
+  symvalue = LongWord;
+  bfd_size_type = LongWord;
+
+  flagword = LongWord;  (* 32 bits of flags *)
+
+  pppchar = ^ppchar;
+  Pbfd_byte = ^bfd_byte;
+  bfd_byte = Byte;
+  bfd_boolean = LongBool;
+
+(** File formats *)
+(* MvdV: FPC 1.0 doesn't support the construct below, but the first ordinal
+is in practice already 0 *)
+
+  bfd_format = (
+    bfd_unknown  = 0,  (* file format is unknown *)
+    bfd_object,     (* linker/assember/compiler output *)
+    bfd_archive,    (* object archive file *)
+    bfd_core        (* core dump *)
+    //UT: to use this enum in arrays the following is not needed:
+    //bfd_type_end  (* marks the end; don't use it! *)
+  );
+
+(* symbols and relocation *)
+
+(* A count of carsyms (canonical archive symbols).  *)
+  symindex = LongWord;
+
+(* A canonical archive symbol.  *)
+(* This is a type pun with struct ranlib on purpose! *)
+  carsym = record
+    name: pchar;
+    file_offset: file_ptr;  (* look here to find the file *)
+  end;                      (* to make these you call a carsymogen *)
+
+(* Used in generating armaps (archive tables of contents).
+   Perhaps just a forward definition would do? *)
+  orl = record                  (* output ranlib *)
+    name:    ppchar;            (* symbol name *)
+    pos:     file_ptr;          (* TBFD* or file position *)
+    nameidx: integer;           (* index into string table *)
+  end;
+
+(* Linenumber stuff *)
+  lineno_cache_entry = record
+    line_number: LongWord;      (* Linenumber from start of function*)
+    u: record
+      case integer of
+        0: (sym:    Psymbol_cache_entry); (* Function name *)
+        1: (offset: LongWord);            (* Offset into section *)
+      end;
+  end;
+  alent = lineno_cache_entry;
+
+  Pstat = pointer; // todo?
+
+  bfd_print_symbol = (
+    bfd_print_symbol_name,
+    bfd_print_symbol_more,
+    bfd_print_symbol_all
+  );
+
+(* Information about a symbol that nm needs.  *)
+
+  symbol_info = record
+    value:     symvalue;
+    typ:       ShortInt;
+    name:      pchar;    (* Symbol name.  *)
+    stab_type: Byte;     (* Stab type.  *)
+    stab_other:ShortInt; (* Stab other.  *)
+    stab_desc: SmallInt; (* Stab desc.  *)
+    stab_name: pchar;    (* String for stab type.  *)
+  end;
+
+(* Hash table routines.  There is no way to free up a hash table.  *)
+
+(* An element in the hash table.  Most uses will actually use a larger
+   structure, and an instance of this will be the first field.  *)
+
+   Pbfd_hash_entry = ^bfd_hash_entry;
+   bfd_hash_entry = record
+     (* Next entry for this hash code.  *)
+     next: Pbfd_hash_entry;
+     (* String being hashed.  *)
+     strng: pchar;
+     (* Hash code.  This is the full hash code, not the index into the
+        table.  *)
+     hash: LongWord;
+   end;
+
+(* A hash table.  *)
+  Pbfd_hash_table = ^bfd_hash_table;
+
+  bfd_hash_table_newfunc = function( entry: Pbfd_hash_entry;
+    table: Pbfd_hash_table; v: pchar): Pbfd_hash_entry;
+
+  bfd_hash_table = record
+    (* The hash array.  *)
+    table: ^Pbfd_hash_entry;
+    (* The number of slots in the hash table.  *)
+    size: LongWord ;
+    (* A function used to create new elements in the hash table.  The
+       first entry is itself a pointer to an element.  When this
+       function is first invoked, this pointer will be NULL.  However,
+       having the pointer permits a hierarchy of method functions to be
+       built each of which calls the function in the superclass.  Thus
+       each function should be written to allocate a new block of memory
+       only if the argument is NULL.  *)
+    newfunc: bfd_hash_table_newfunc;
+     (* An objalloc for this hash table.  This is a struct objalloc *,
+       but we use pointer to avoid requiring the inclusion of objalloc.h.  *)
+    memory: pointer;
+  end;
+
+  Pbfd_window_internal = pointer;
+
+  bfd_window = record
+    (* What the user asked for.  *)
+    data: pointer;
+    size: bfd_size_type;
+    (* The actual window used by BFD.  Small user-requested read-only
+       regions sharing a page may share a single window into the object
+       file.  Read-write versions shouldn't until I've fixed things to
+       keep track of which portions have been claimed by the
+       application; don't want to give the same region back when the
+       application wants two writable copies!  *)
+    i: Pbfd_window_internal;
+  end;
+
+  Pbfd_link_needed_lists = ^bfd_link_needed_lists;
+  bfd_link_needed_lists = record
+    next: Pbfd_link_needed_lists;
+    by: PBFD;
+    name: pchar;
+  end;
+
+  bfd_direction = (no_direction    = 0,
+                   read_direction  = 1,
+                   write_direction = 2,
+                   both_direction  = 3);
+
+  TBFD = record
+    (* The filename the application opened the BFD with.  *)
+     filename: pchar;
+
+    (* A pointer to the target jump table.             *)
+    xvec: Pbfd_target;
+
+    (* To avoid dragging too many header files into every file that
+       includes `<<bfd.h>>', IOSTREAM has been declared as a "ShortInt
+       *", and MTIME as a "LongInt".  Their correct types, to which they
+       are cast when used, are "FILE *" and "time_t".    The iostream
+       is the result of an fopen on the filename.  However, if the
+       BFD_IN_MEMORY flag is set, then iostream is actually a pointer
+       to a bfd_in_memory struct.  *)
+    iostream: pointer ;
+
+    (* Is the file descriptor being cached?  That is, can it be closed as
+       needed, and re-opened when accessed later?  *)
+
+    cacheable: bfd_boolean ;
+
+    (* Marks whether there was a default target specified when the
+       BFD was opened. This is used to select which matching algorithm
+       to use to choose the back end. *)
+
+    target_defaulted: bfd_boolean ;
+
+    (* The caching routines use these to maintain a
+       least-recently-used list of BFDs *)
+
+    lru_prev, lru_next: PBFD;
+
+    (* When a file is closed by the caching routines, BFD retains
+       state information on the file here: *)
+
+    where: file_ptr;
+
+    (* and here: (``once'' means at least once) *)
+
+    opened_once: bfd_boolean;
+
+    (* Set if we have a locally maintained mtime value, rather than
+       getting it from the file each time: *)
+
+    mtime_set: bfd_boolean;
+
+    (* File modified time, if mtime_set is true: *)
+
+    mtime: LongInt;
+
+    (* Reserved for an unimplemented file locking extension.*)
+
+    ifd: integer ;
+
+    (* The format which belongs to the BFD. (object, core, etc.) *)
+
+    format: bfd_format;
+
+    (* The direction the BFD was opened with*)
+
+    direction: bfd_direction;
+
+    (* Format_specific flags*)
+
+    flags: flagword;
+
+    (* Currently my_archive is tested before adding origin to
+       anything. I believe that this can become always an add of
+       origin, with origin set to 0 for non archive files.   *)
+
+    origin: file_ptr;
+
+    (* Remember when output has begun, to stop strange things
+       from happening. *)
+    output_has_begun: bfd_boolean ;
+
+    (* Pointer to linked list of sections*)
+    sections: Psec;
+
+    (* The number of sections *)
+    section_count: LongWord ;
+
+    (* Stuff only useful for object files:
+       The start address. *)
+    start_address: bfd_vma ;
+
+    (* Used for input and output*)
+    symcount: LongWord ;
+
+    (* Symbol table for output BFD (with symcount entries) *)
+    outsymbols: PPsymbol_cache_entry;
+
+    (* Pointer to structure which contains architecture information*)
+    arch_info: Pbfd_arch_info;
+
+    (* Stuff only useful for archives:*)
+    arelt_data: pointer ;
+    my_archive: PBFD ;     (* The containing archive BFD.  *)
+    next: PBFD ;           (* The next BFD in the archive.  *)
+    archive_head: PBFD ;   (* The first BFD in the archive.  *)
+    has_armap: bfd_boolean ;
+
+    (* A chain of BFD structures involved in a link.  *)
+    link_next: PBFD ;
+
+    (* A field used by _bfd_generic_link_add_archive_symbols.  This will
+       be used only for archive elements.  *)
+    archive_pass: integer ;
+
+    (* Used by the back end to hold private data. *)
+
+    tdata: record
+    case integer of
+    { TODO: (?)
+      struct aout_data_struct *aout_data;
+      struct artdata *aout_ar_data;
+      struct _oasys_data *oasys_obj_data;
+      struct _oasys_ar_data *oasys_ar_data;
+      struct coff_tdata *coff_obj_data;
+      struct pe_tdata *pe_obj_data;
+      struct xcoff_tdata *xcoff_obj_data;
+      struct ecoff_tdata *ecoff_obj_data;
+      struct ieee_data_struct *ieee_data;
+      struct ieee_ar_data_struct *ieee_ar_data;
+      struct srec_data_struct *srec_data;
+      struct ihex_data_struct *ihex_data;
+      struct tekhex_data_struct *tekhex_data;
+      struct elf_obj_tdata *elf_obj_data;
+      struct nlm_obj_tdata *nlm_obj_data;
+      struct bout_data_struct *bout_data;
+      struct sun_core_struct *sun_core_data;
+      struct sco5_core_struct *sco5_core_data;
+      struct trad_core_struct *trad_core_data;
+      struct som_data_struct *som_data;
+      struct hpux_core_struct *hpux_core_data;
+      struct hppabsd_core_struct *hppabsd_core_data;
+      struct sgi_core_struct *sgi_core_data;
+      struct lynx_core_struct *lynx_core_data;
+      struct osf_core_struct *osf_core_data;
+      struct cisco_core_struct *cisco_core_data;
+      struct versados_data_struct *versados_data;
+      struct netbsd_core_struct *netbsd_core_data;}
+      -1:(any: pointer);
+    end;
+
+    (* Used by the application to hold private data*)
+    usrdata: pointer ;
+
+  (* Where all the allocated stuff under this BFD goes.  This is a
+     struct objalloc *, but we use pointer to avoid requiring the inclusion of
+     objalloc.h.  *)
+    memory: pointer ;
+  end; { TBFD }
+
+  symbol_cache_entry = record
+       (* A pointer to the BFD which owns the symbol. This information
+          is necessary so that a back end can work out what additional
+          information (invisible to the application writer) is carried
+          with the symbol.
+
+          This field is *almost* redundant, since you can use section->owner
+          instead, except that some symbols point to the global sections
+          bfd_{abs,com,und}_section.  This could be fixed by making
+          these globals be per-bfd (or per-target-flavor).  FIXME. *)
+
+    the_bfd: PBFD; (* Use bfd_asymbol_bfd(sym) to access this field. *)
+
+       (* The text of the symbol. The name is left alone, and not copied; the
+          application may not alter it. *)
+    name: pchar;
+
+       (* The value of the symbol.  This really should be a union of a
+          numeric value with a pointer, since some flags indicate that
+          a pointer to another symbol is stored here.  *)
+    value: symvalue;
+
+    flags: flagword;
+
+       (* A pointer to the section to which this symbol is
+          relative.  This will always be non NULL, there are special
+          sections for undefined and absolute symbols.  *)
+    section: Psec;
+
+    (* Back end special data.  *)
+     udata: record
+     case bfd_boolean of
+       false: (p: pointer);
+       true:  (i: bfd_vma);
+     end;
+  end; { symbol_cache_entry }
+  asymbol = symbol_cache_entry;
+
+  Pbfd_link_order = pointer; // todo?
+
+  sec = record
+    (* The name of the section; the name isn't a copy, the pointer is
+     the same as that passed to bfd_make_section.  *)
+    name: pchar;
+
+    (* A unique sequence number.  *)
+    id: integer;
+
+    (* Which section is it; 0..nth.  *)
+    index: integer;
+
+    (* The next section in the list belonging to the BFD, or NULL.  *)
+    next: Psec ;
+
+    (* The field flags contains attributes of the section. Some
+       flags are read in from the object file, and some are
+       synthesized from other information.  *)
+    flags: flagword;
+
+    (* Some internal packed bfd_boolean fields.  *)
+
+    { UT: I replaced this bitfield with a Pascal 'set'!
+      the code was
+        user_set_vma: LongWord : 1;
+        reloc_done: LongWord : 1;
+        linker_mark: LongWord : 1;
+        gc_mark: LongWord : 1;
+        segment_mark: LongWord : 1; }
+    bitfield: set of (
+      user_set_vma, (* See the vma field.  *)
+      reloc_done,   (* Whether relocations have been processed.  *)
+      linker_mark,  (* A mark flag used by some of the linker backends.  *)
+      gc_mark,      (* A mark flag used by some linker backends for garbage collection.  *)
+      segment_mark  (* Used by the ELF code to mark sections which have been allocated to segments.  *)
+    );
+    (* End of internal packed bfd_boolean fields.  *)
+
+    (*  The virtual memory address of the section - where it will be
+        at run time.  The symbols are relocated against this.  The
+        user_set_vma flag is maintained by bfd; if it's not set, the
+        backend can assign addresses (for example, in <<a.out>>, where
+        the default address for <<.data>> is dependent on the specific
+        target and various flags).  *)
+    vma: bfd_vma;
+
+    (*  The load address of the section - where it would be in a
+        rom image; really only used for writing section header
+        information. *)
+    lma: bfd_vma;
+
+    (* The size of the section in octets, as it will be output.
+       Contains a value even if the section has no contents (e.g., the
+       size of <<.bss>>).  This will be filled in after relocation.  *)
+    _cooked_size: bfd_size_type;
+
+    (* The original size on disk of the section, in octets.  Normally this
+       value is the same as the size, but if some relaxing has
+       been done, then this value will be bigger.  *)
+    _raw_size: bfd_size_type;
+
+    (* If this section is going to be output, then this value is the
+       offset in *bytes* into the output section of the first byte in the
+       input section (byte ==> smallest addressable unit on the
+       target).  In most cases, if this was going to start at the
+       100th octet (8-bit quantity) in the output section, this value
+       would be 100.  However, if the target byte size is 16 bits
+       (bfd_octets_per_byte is "2"), this value would be 50.  *)
+    output_offset: bfd_vma;
+
+    (* The output section through which to map on output.  *)
+    output_section: Psec ;
+
+    (* The alignment requirement of the section, as an exponent of 2 -
+       e.g., 3 aligns to 2^3 (or 8).  *)
+    alignment_power: LongWord;
+
+    (* If an input section, a pointer to a vector of relocation
+       records for the data in this section.  *)
+    relocation: Preloc_cache_entry;
+
+    (* If an output section, a pointer to a vector of pointers to
+       relocation records for the data in this section.  *)
+    orelocation: PPreloc_cache_entry;
+
+    (* The number of relocation records in one of the above  *)
+    reloc_count: LongWord;
+
+    (* Information below is back end specific - and not always used
+       or updated.  *)
+
+    (* File position of section data.  *)
+    filepos: file_ptr;
+
+    (* File position of relocation info.  *)
+    rel_filepos: file_ptr;
+
+    (* File position of line data.  *)
+    line_filepos: file_ptr;
+
+    (* Pointer to data for applications.  *)
+    userdata: pointer;
+
+    (* If the SEC_IN_MEMORY flag is set, this points to the actual
+       contents.  *)
+    contents: PByte;
+
+    (* Attached line number information.  *)
+    lineno: Palent;
+
+    (* Number of line number records.  *)
+    lineno_count: LongWord;
+
+    (* Optional information about a COMDAT entry; NULL if not COMDAT.  *)
+    comdat: Pbfd_comdat_info;
+
+    (* Points to the kept section if this section is a link-once section,
+       and is discarded.  *)
+    kept_section: Psec;
+
+    (* When a section is being output, this value changes as more
+       linenumbers are written out.  *)
+    moving_line_filepos: file_ptr;
+
+    (* What the section number is in the target world.  *)
+    target_index: integer;
+
+    used_by_bfd: pointer;
+
+    (* If this is a constructor section then here is a list of the
+       relocations created to relocate items within it.  *)
+    constructor_chain: Prelent_chain;
+
+    (* The BFD which owns the section.  *)
+    owner: PBFD;
+
+    (* A symbol which points at this section only *)
+    symbol: Psymbol_cache_entry;
+    symbol_ptr_ptr: PPsymbol_cache_entry;
+
+    link_order_head: Pbfd_link_order;
+    link_order_tail: Pbfd_link_order;
+  end; { sec }
+  asection = sec;
+
+  bfd_flavour = (
+    bfd_target_unknown_flavour,
+    bfd_target_aout_flavour,
+    bfd_target_coff_flavour,
+    bfd_target_ecoff_flavour,
+    bfd_target_xcoff_flavour,
+    bfd_target_elf_flavour,
+    bfd_target_ieee_flavour,
+    bfd_target_nlm_flavour,
+    bfd_target_oasys_flavour,
+    bfd_target_tekhex_flavour,
+    bfd_target_srec_flavour,
+    bfd_target_ihex_flavour,
+    bfd_target_som_flavour,
+    bfd_target_os9k_flavour,
+    bfd_target_versados_flavour,
+    bfd_target_msdos_flavour,
+    bfd_target_ovax_flavour,
+    bfd_target_evax_flavour
+  ); { bfd_flavour }
+
+  bfd_endian = ( BFD_ENDIAN_BIG, BFD_ENDIAN_LITTLE, BFD_ENDIAN_UNKNOWN );
+
+  bfd_reloc_code_real = (
+    _dummy_first_bfd_reloc_code_real,
+
+    (* Basic absolute relocations of N bits. *)
+    BFD_RELOC_64,
+    BFD_RELOC_32,
+    BFD_RELOC_26,
+    BFD_RELOC_24,
+    BFD_RELOC_16,
+    BFD_RELOC_14,
+    BFD_RELOC_8,
+
+  (* PC-relative relocations.  Sometimes these are relative to the address
+  of the relocation itself; sometimes they are relative to the start of
+  the section containing the relocation.  It depends on the specific target.
+
+  The 24-bit relocation is used in some Intel 960 configurations. *)
+    BFD_RELOC_64_PCREL,
+    BFD_RELOC_32_PCREL,
+    BFD_RELOC_24_PCREL,
+    BFD_RELOC_16_PCREL,
+    BFD_RELOC_12_PCREL,
+    BFD_RELOC_8_PCREL,
+
+  (* For ELF. *)
+    BFD_RELOC_32_GOT_PCREL,
+    BFD_RELOC_16_GOT_PCREL,
+    BFD_RELOC_8_GOT_PCREL,
+    BFD_RELOC_32_GOTOFF,
+    BFD_RELOC_16_GOTOFF,
+    BFD_RELOC_LO16_GOTOFF,
+    BFD_RELOC_HI16_GOTOFF,
+    BFD_RELOC_HI16_S_GOTOFF,
+    BFD_RELOC_8_GOTOFF,
+    BFD_RELOC_32_PLT_PCREL,
+    BFD_RELOC_24_PLT_PCREL,
+    BFD_RELOC_16_PLT_PCREL,
+    BFD_RELOC_8_PLT_PCREL,
+    BFD_RELOC_32_PLTOFF,
+    BFD_RELOC_16_PLTOFF,
+    BFD_RELOC_LO16_PLTOFF,
+    BFD_RELOC_HI16_PLTOFF,
+    BFD_RELOC_HI16_S_PLTOFF,
+    BFD_RELOC_8_PLTOFF,
+
+  (* Relocations used by 68K ELF. *)
+    BFD_RELOC_68K_GLOB_DAT,
+    BFD_RELOC_68K_JMP_SLOT,
+    BFD_RELOC_68K_RELATIVE,
+
+  (* Linkage-table relative. *)
+    BFD_RELOC_32_BASEREL,
+    BFD_RELOC_16_BASEREL,
+    BFD_RELOC_LO16_BASEREL,
+    BFD_RELOC_HI16_BASEREL,
+    BFD_RELOC_HI16_S_BASEREL,
+    BFD_RELOC_8_BASEREL,
+    BFD_RELOC_RVA,
+
+  (* Absolute 8-bit relocation, but used to form an address like $FFnn. *)
+    BFD_RELOC_8_FFnn,
+
+  (* These PC-relative relocations are stored as word displacements --
+  i.e., byte displacements shifted right two bits.  The 30-bit word
+  displacement (<<32_PCREL_S2>> -- 32 bits, shifted 2) is used on the
+  SPARC.  (SPARC tools generally refer to this as <<WDISP30>>.)  The
+  signed 16-bit displacement is used on the MIPS, and the 23-bit
+  displacement is used on the Alpha. *)
+    BFD_RELOC_32_PCREL_S2,
+    BFD_RELOC_16_PCREL_S2,
+    BFD_RELOC_23_PCREL_S2,
+
+  (* High 22 bits and low 10 bits of 32-bit value, placed into lower bits of
+  the target word.  These are used on the SPARC. *)
+    BFD_RELOC_HI22,
+    BFD_RELOC_LO10,
+
+  (* For systems that allocate a Global Pointer register, these are
+  displacements off that register.  These relocation types are
+  handled specially, because the value the register will have is
+  decided relatively late. *)
+    BFD_RELOC_GPREL16,
+    BFD_RELOC_GPREL32,
+
+  (* Reloc types used for i960/b.out. *)
+    BFD_RELOC_I960_CALLJ,
+
+  (* SPARC ELF relocations.  There is probably some overlap with other
+  relocation types already defined. *)
+    BFD_RELOC_NONE,
+    BFD_RELOC_SPARC_WDISP22,
+    BFD_RELOC_SPARC22,
+    BFD_RELOC_SPARC13,
+    BFD_RELOC_SPARC_GOT10,
+    BFD_RELOC_SPARC_GOT13,
+    BFD_RELOC_SPARC_GOT22,
+    BFD_RELOC_SPARC_PC10,
+    BFD_RELOC_SPARC_PC22,
+    BFD_RELOC_SPARC_WPLT30,
+    BFD_RELOC_SPARC_COPY,
+    BFD_RELOC_SPARC_GLOB_DAT,
+    BFD_RELOC_SPARC_JMP_SLOT,
+    BFD_RELOC_SPARC_RELATIVE,
+    BFD_RELOC_SPARC_UA32,
+
+  (* I think these are specific to SPARC a.out (e.g., Sun 4). *)
+    BFD_RELOC_SPARC_BASE13,
+    BFD_RELOC_SPARC_BASE22,
+
+  (* SPARC64 relocations *)
+    BFD_RELOC_SPARC_10,
+    BFD_RELOC_SPARC_11,
+    BFD_RELOC_SPARC_OLO10,
+    BFD_RELOC_SPARC_HH22,
+    BFD_RELOC_SPARC_HM10,
+    BFD_RELOC_SPARC_LM22,
+    BFD_RELOC_SPARC_PC_HH22,
+    BFD_RELOC_SPARC_PC_HM10,
+    BFD_RELOC_SPARC_PC_LM22,
+    BFD_RELOC_SPARC_WDISP16,
+    BFD_RELOC_SPARC_WDISP19,
+    BFD_RELOC_SPARC_7,
+    BFD_RELOC_SPARC_6,
+    BFD_RELOC_SPARC_5,
+    BFD_RELOC_SPARC_PLT64,
+    BFD_RELOC_SPARC_HIX22,
+    BFD_RELOC_SPARC_LOX10,
+    BFD_RELOC_SPARC_H44,
+    BFD_RELOC_SPARC_M44,
+    BFD_RELOC_SPARC_L44,
+    BFD_RELOC_SPARC_REGISTER,
+
+  (* SPARC little endian relocation *)
+    BFD_RELOC_SPARC_REV32,
+
+  (* Alpha ECOFF and ELF relocations.  Some of these treat the symbol or
+  "addend" in some special way.
+  For GPDISP_HI16 ("gpdisp") relocations, the symbol is ignored when
+  writing; when reading, it will be the absolute section symbol.  The
+  addend is the displacement in bytes of the "lda" instruction from
+  the "ldah" instruction (which is at the address of this reloc). *)
+    BFD_RELOC_ALPHA_GPDISP_HI16,
+
+  (* For GPDISP_LO16 ("ignore") relocations, the symbol is handled as
+  with GPDISP_HI16 relocs.  The addend is ignored when writing the
+  relocations out, and is filled in with the file's GP value on
+  reading, for convenience. *)
+    BFD_RELOC_ALPHA_GPDISP_LO16,
+
+  (* The ELF GPDISP relocation is exactly the same as the GPDISP_HI16
+  relocation except that there is no accompanying GPDISP_LO16
+  relocation. *)
+    BFD_RELOC_ALPHA_GPDISP,
+
+  (* The Alpha LITERAL/LITUSE relocs are produced by a symbol reference;
+  the assembler turns it into a LDQ instruction to load the address of
+  the symbol, and then fills in a register in the real instruction.
+
+  The LITERAL reloc, at the LDQ instruction, refers to the .lita
+  section symbol.  The addend is ignored when writing, but is filled
+  in with the file's GP value on reading, for convenience, as with the
+  GPDISP_LO16 reloc.
+
+  The ELF_LITERAL reloc is somewhere between 16_GOTOFF and GPDISP_LO16.
+  It should refer to the symbol to be referenced, as with 16_GOTOFF,
+  but it generates output not based on the position within the .got
+  section, but relative to the GP value chosen for the file during the
+  final link stage.
+
+  The LITUSE reloc, on the instruction using the loaded address, gives
+  information to the linker that it might be able to use to optimize
+  away some literal section references.  The symbol is ignored (read
+  as the absolute section symbol), and the "addend" indicates the type
+  of instruction using the register:
+  1 - "memory" fmt insn
+  2 - byte-manipulation (byte offset reg)
+  3 - jsr (target of branch)
+
+  The GNU linker currently doesn't do any of this optimizing. *)
+    BFD_RELOC_ALPHA_LITERAL,
+    BFD_RELOC_ALPHA_ELF_LITERAL,
+    BFD_RELOC_ALPHA_LITUSE,
+
+  (* The BFD_RELOC_ALPHA_USER_* relocations are used by the assembler to
+  process the explicit !<reloc>!sequence relocations, and are mapped
+  into the normal relocations at the end of processing. *)
+    BFD_RELOC_ALPHA_USER_LITERAL,
+    BFD_RELOC_ALPHA_USER_LITUSE_BASE,
+    BFD_RELOC_ALPHA_USER_LITUSE_BYTOFF,
+    BFD_RELOC_ALPHA_USER_LITUSE_JSR,
+    BFD_RELOC_ALPHA_USER_GPDISP,
+    BFD_RELOC_ALPHA_USER_GPRELHIGH,
+    BFD_RELOC_ALPHA_USER_GPRELLOW,
+
+  (* The HINT relocation indicates a value that should be filled into the
+  "hint" field of a jmp/jsr/ret instruction, for possible branch-
+  prediction logic which may be provided on some processors. *)
+    BFD_RELOC_ALPHA_HINT,
+
+  (* The LINKAGE relocation outputs a linkage pair in the object file,
+  which is filled by the linker. *)
+    BFD_RELOC_ALPHA_LINKAGE,
+
+  (* The CODEADDR relocation outputs a STO_CA in the object file,
+  which is filled by the linker. *)
+    BFD_RELOC_ALPHA_CODEADDR,
+
+  (* Bits 27..2 of the relocation address shifted right 2 bits;
+  simple reloc otherwise. *)
+    BFD_RELOC_MIPS_JMP,
+
+  (* The MIPS16 jump instruction. *)
+    BFD_RELOC_MIPS16_JMP,
+
+  (* MIPS16 GP relative reloc. *)
+    BFD_RELOC_MIPS16_GPREL,
+
+  (* High 16 bits of 32-bit value; simple reloc. *)
+    BFD_RELOC_HI16,
+
+  (* High 16 bits of 32-bit value but the low 16 bits will be sign
+  extended and added to form the final result.  If the low 16
+  bits form a negative number, we need to add one to the high value
+  to compensate for the borrow when the low bits are added. *)
+    BFD_RELOC_HI16_S,
+
+  (* Low 16 bits. *)
+    BFD_RELOC_LO16,
+
+  (* Like BFD_RELOC_HI16_S, but PC relative. *)
+    BFD_RELOC_PCREL_HI16_S,
+
+  (* Like BFD_RELOC_LO16, but PC relative. *)
+    BFD_RELOC_PCREL_LO16,
+
+  (* Relocation relative to the global pointer. *)
+
+  (* Relocation against a MIPS literal section. *)
+    BFD_RELOC_MIPS_LITERAL,
+
+  (* MIPS ELF relocations. *)
+    BFD_RELOC_MIPS_GOT16,
+    BFD_RELOC_MIPS_CALL16,
+    BFD_RELOC_MIPS_GOT_HI16,
+    BFD_RELOC_MIPS_GOT_LO16,
+    BFD_RELOC_MIPS_CALL_HI16,
+    BFD_RELOC_MIPS_CALL_LO16,
+    BFD_RELOC_MIPS_SUB,
+    BFD_RELOC_MIPS_GOT_PAGE,
+    BFD_RELOC_MIPS_GOT_OFST,
+    BFD_RELOC_MIPS_GOT_DISP,
+
+  (* i386/elf relocations *)
+    BFD_RELOC_386_GOT32,
+    BFD_RELOC_386_PLT32,
+    BFD_RELOC_386_COPY,
+    BFD_RELOC_386_GLOB_DAT,
+    BFD_RELOC_386_JUMP_SLOT,
+    BFD_RELOC_386_RELATIVE,
+    BFD_RELOC_386_GOTOFF,
+    BFD_RELOC_386_GOTPC,
+
+  (* x86-64/elf relocations *)
+    BFD_RELOC_X86_64_GOT32,
+    BFD_RELOC_X86_64_PLT32,
+    BFD_RELOC_X86_64_COPY,
+    BFD_RELOC_X86_64_GLOB_DAT,
+    BFD_RELOC_X86_64_JUMP_SLOT,
+    BFD_RELOC_X86_64_RELATIVE,
+    BFD_RELOC_X86_64_GOTPCREL,
+    BFD_RELOC_X86_64_32S,
+
+  (* ns32k relocations *)
+    BFD_RELOC_NS32K_IMM_8,
+    BFD_RELOC_NS32K_IMM_16,
+    BFD_RELOC_NS32K_IMM_32,
+    BFD_RELOC_NS32K_IMM_8_PCREL,
+    BFD_RELOC_NS32K_IMM_16_PCREL,
+    BFD_RELOC_NS32K_IMM_32_PCREL,
+    BFD_RELOC_NS32K_DISP_8,
+    BFD_RELOC_NS32K_DISP_16,
+    BFD_RELOC_NS32K_DISP_32,
+    BFD_RELOC_NS32K_DISP_8_PCREL,
+    BFD_RELOC_NS32K_DISP_16_PCREL,
+    BFD_RELOC_NS32K_DISP_32_PCREL,
+
+  (* Picojava relocs.  Not all of these appear in object files. *)
+    BFD_RELOC_PJ_CODE_HI16,
+    BFD_RELOC_PJ_CODE_LO16,
+    BFD_RELOC_PJ_CODE_DIR16,
+    BFD_RELOC_PJ_CODE_DIR32,
+    BFD_RELOC_PJ_CODE_REL16,
+    BFD_RELOC_PJ_CODE_REL32,
+
+  (* Power(rs6000) and PowerPC relocations. *)
+    BFD_RELOC_PPC_B26,
+    BFD_RELOC_PPC_BA26,
+    BFD_RELOC_PPC_TOC16,
+    BFD_RELOC_PPC_B16,
+    BFD_RELOC_PPC_B16_BRTAKEN,
+    BFD_RELOC_PPC_B16_BRNTAKEN,
+    BFD_RELOC_PPC_BA16,
+    BFD_RELOC_PPC_BA16_BRTAKEN,
+    BFD_RELOC_PPC_BA16_BRNTAKEN,
+    BFD_RELOC_PPC_COPY,
+    BFD_RELOC_PPC_GLOB_DAT,
+    BFD_RELOC_PPC_JMP_SLOT,
+    BFD_RELOC_PPC_RELATIVE,
+    BFD_RELOC_PPC_LOCAL24PC,
+    BFD_RELOC_PPC_EMB_NADDR32,
+    BFD_RELOC_PPC_EMB_NADDR16,
+    BFD_RELOC_PPC_EMB_NADDR16_LO,
+    BFD_RELOC_PPC_EMB_NADDR16_HI,
+    BFD_RELOC_PPC_EMB_NADDR16_HA,
+    BFD_RELOC_PPC_EMB_SDAI16,
+    BFD_RELOC_PPC_EMB_SDA2I16,
+    BFD_RELOC_PPC_EMB_SDA2REL,
+    BFD_RELOC_PPC_EMB_SDA21,
+    BFD_RELOC_PPC_EMB_MRKREF,
+    BFD_RELOC_PPC_EMB_RELSEC16,
+    BFD_RELOC_PPC_EMB_RELST_LO,
+    BFD_RELOC_PPC_EMB_RELST_HI,
+    BFD_RELOC_PPC_EMB_RELST_HA,
+    BFD_RELOC_PPC_EMB_BIT_FLD,
+    BFD_RELOC_PPC_EMB_RELSDA,
+
+  (* IBM 370/390 relocations *)
+    BFD_RELOC_I370_D12,
+
+  (* The type of reloc used to build a contructor table - at the moment
+  probably a 32 bit wide absolute relocation, but the target can choose.
+  It generally does map to one of the other relocation types. *)
+    BFD_RELOC_CTOR,
+
+  (* ARM 26 bit pc-relative branch.  The lowest two bits must be zero and are
+  not stored in the instruction. *)
+    BFD_RELOC_ARM_PCREL_BRANCH,
+
+  (* ARM 26 bit pc-relative branch.  The lowest bit must be zero and is
+  not stored in the instruction.  The 2nd lowest bit comes from a 1 bit
+  field in the instruction. *)
+    BFD_RELOC_ARM_PCREL_BLX,
+
+  (* Thumb 22 bit pc-relative branch.  The lowest bit must be zero and is
+  not stored in the instruction.  The 2nd lowest bit comes from a 1 bit
+  field in the instruction. *)
+    BFD_RELOC_THUMB_PCREL_BLX,
+
+  (* These relocs are only used within the ARM assembler.  They are not
+  (at present) written to any object files. *)
+    BFD_RELOC_ARM_IMMEDIATE,
+    BFD_RELOC_ARM_ADRL_IMMEDIATE,
+    BFD_RELOC_ARM_OFFSET_IMM,
+    BFD_RELOC_ARM_SHIFT_IMM,
+    BFD_RELOC_ARM_SWI,
+    BFD_RELOC_ARM_MULTI,
+    BFD_RELOC_ARM_CP_OFF_IMM,
+    BFD_RELOC_ARM_ADR_IMM,
+    BFD_RELOC_ARM_LDR_IMM,
+    BFD_RELOC_ARM_LITERAL,
+    BFD_RELOC_ARM_IN_POOL,
+    BFD_RELOC_ARM_OFFSET_IMM8,
+    BFD_RELOC_ARM_HWLITERAL,
+    BFD_RELOC_ARM_THUMB_ADD,
+    BFD_RELOC_ARM_THUMB_IMM,
+    BFD_RELOC_ARM_THUMB_SHIFT,
+    BFD_RELOC_ARM_THUMB_OFFSET,
+    BFD_RELOC_ARM_GOT12,
+    BFD_RELOC_ARM_GOT32,
+    BFD_RELOC_ARM_JUMP_SLOT,
+    BFD_RELOC_ARM_COPY,
+    BFD_RELOC_ARM_GLOB_DAT,
+    BFD_RELOC_ARM_PLT32,
+    BFD_RELOC_ARM_RELATIVE,
+    BFD_RELOC_ARM_GOTOFF,
+    BFD_RELOC_ARM_GOTPC,
+
+  (* Hitachi SH relocs.  Not all of these appear in object files. *)
+    BFD_RELOC_SH_PCDISP8BY2,
+    BFD_RELOC_SH_PCDISP12BY2,
+    BFD_RELOC_SH_IMM4,
+    BFD_RELOC_SH_IMM4BY2,
+    BFD_RELOC_SH_IMM4BY4,
+    BFD_RELOC_SH_IMM8,
+    BFD_RELOC_SH_IMM8BY2,
+    BFD_RELOC_SH_IMM8BY4,
+    BFD_RELOC_SH_PCRELIMM8BY2,
+    BFD_RELOC_SH_PCRELIMM8BY4,
+    BFD_RELOC_SH_SWITCH16,
+    BFD_RELOC_SH_SWITCH32,
+    BFD_RELOC_SH_USES,
+    BFD_RELOC_SH_COUNT,
+    BFD_RELOC_SH_ALIGN,
+    BFD_RELOC_SH_CODE,
+    BFD_RELOC_SH_DATA,
+    BFD_RELOC_SH_LABEL,
+    BFD_RELOC_SH_LOOP_START,
+    BFD_RELOC_SH_LOOP_END,
+    BFD_RELOC_SH_COPY,
+    BFD_RELOC_SH_GLOB_DAT,
+    BFD_RELOC_SH_JMP_SLOT,
+    BFD_RELOC_SH_RELATIVE,
+    BFD_RELOC_SH_GOTPC,
+
+  (* Thumb 23-, 12- and 9-bit pc-relative branches.  The lowest bit must
+  be zero and is not stored in the instruction. *)
+    BFD_RELOC_THUMB_PCREL_BRANCH9,
+    BFD_RELOC_THUMB_PCREL_BRANCH12,
+    BFD_RELOC_THUMB_PCREL_BRANCH23,
+
+  (* ARC Cores relocs.
+  ARC 22 bit pc-relative branch.  The lowest two bits must be zero and are
+  not stored in the instruction.  The high 20 bits are installed in bits 26
+  through 7 of the instruction. *)
+    BFD_RELOC_ARC_B22_PCREL,
+
+  (* ARC 26 bit absolute branch.  The lowest two bits must be zero and are not
+  stored in the instruction.  The high 24 bits are installed in bits 23
+  through 0. *)
+    BFD_RELOC_ARC_B26,
+
+  (* Mitsubishi D10V relocs.
+  This is a 10-bit reloc with the right 2 bits
+  assumed to be 0. *)
+    BFD_RELOC_D10V_10_PCREL_R,
+
+  (* Mitsubishi D10V relocs.
+  This is a 10-bit reloc with the right 2 bits
+  assumed to be 0.  This is the same as the previous reloc
+  except it is in the left container, i.e.,
+  shifted left 15 bits. *)
+    BFD_RELOC_D10V_10_PCREL_L,
+
+  (* This is an 18-bit reloc with the right 2 bits
+  assumed to be 0. *)
+    BFD_RELOC_D10V_18,
+
+  (* This is an 18-bit reloc with the right 2 bits
+  assumed to be 0. *)
+    BFD_RELOC_D10V_18_PCREL,
+
+  (* Mitsubishi D30V relocs.
+  This is a 6-bit absolute reloc. *)
+    BFD_RELOC_D30V_6,
+
+  (* This is a 6-bit pc-relative reloc with
+  the right 3 bits assumed to be 0. *)
+    BFD_RELOC_D30V_9_PCREL,
+
+  (* This is a 6-bit pc-relative reloc with
+  the right 3 bits assumed to be 0. Same
+  as the previous reloc but on the right side
+  of the container. *)
+    BFD_RELOC_D30V_9_PCREL_R,
+
+  (* This is a 12-bit absolute reloc with the
+  right 3 bitsassumed to be 0. *)
+    BFD_RELOC_D30V_15,
+
+  (* This is a 12-bit pc-relative reloc with
+  the right 3 bits assumed to be 0. *)
+    BFD_RELOC_D30V_15_PCREL,
+
+  (* This is a 12-bit pc-relative reloc with
+  the right 3 bits assumed to be 0. Same
+  as the previous reloc but on the right side
+  of the container. *)
+    BFD_RELOC_D30V_15_PCREL_R,
+
+  (* This is an 18-bit absolute reloc with
+  the right 3 bits assumed to be 0. *)
+    BFD_RELOC_D30V_21,
+
+  (* This is an 18-bit pc-relative reloc with
+  the right 3 bits assumed to be 0. *)
+    BFD_RELOC_D30V_21_PCREL,
+
+  (* This is an 18-bit pc-relative reloc with
+  the right 3 bits assumed to be 0. Same
+  as the previous reloc but on the right side
+  of the container. *)
+    BFD_RELOC_D30V_21_PCREL_R,
+
+  (* This is a 32-bit absolute reloc. *)
+    BFD_RELOC_D30V_32,
+
+  (* This is a 32-bit pc-relative reloc. *)
+    BFD_RELOC_D30V_32_PCREL,
+
+  (* Mitsubishi M32R relocs.
+  This is a 24 bit absolute address. *)
+    BFD_RELOC_M32R_24,
+
+  (* This is a 10-bit pc-relative reloc with the right 2 bits assumed to be 0. *)
+    BFD_RELOC_M32R_10_PCREL,
+
+  (* This is an 18-bit reloc with the right 2 bits assumed to be 0. *)
+    BFD_RELOC_M32R_18_PCREL,
+
+  (* This is a 26-bit reloc with the right 2 bits assumed to be 0. *)
+    BFD_RELOC_M32R_26_PCREL,
+
+  (* This is a 16-bit reloc containing the high 16 bits of an address
+  used when the lower 16 bits are treated as unsigned. *)
+    BFD_RELOC_M32R_HI16_ULO,
+
+  (* This is a 16-bit reloc containing the high 16 bits of an address
+  used when the lower 16 bits are treated as signed. *)
+    BFD_RELOC_M32R_HI16_SLO,
+
+  (* This is a 16-bit reloc containing the lower 16 bits of an address. *)
+    BFD_RELOC_M32R_LO16,
+
+  (* This is a 16-bit reloc containing the small data area offset for use in
+  add3, load, and store instructions. *)
+    BFD_RELOC_M32R_SDA16,
+
+  (* This is a 9-bit reloc *)
+    BFD_RELOC_V850_9_PCREL,
+
+  (* This is a 22-bit reloc *)
+    BFD_RELOC_V850_22_PCREL,
+
+  (* This is a 16 bit offset from the SmallInt data area pointer. *)
+    BFD_RELOC_V850_SDA_16_16_OFFSET,
+
+  (* This is a 16 bit offset (of which only 15 bits are used) from the
+  SmallInt data area pointer. *)
+    BFD_RELOC_V850_SDA_15_16_OFFSET,
+
+  (* This is a 16 bit offset from the zero data area pointer. *)
+    BFD_RELOC_V850_ZDA_16_16_OFFSET,
+
+  (* This is a 16 bit offset (of which only 15 bits are used) from the
+  zero data area pointer. *)
+    BFD_RELOC_V850_ZDA_15_16_OFFSET,
+
+  (* This is an 8 bit offset (of which only 6 bits are used) from the
+  tiny data area pointer. *)
+    BFD_RELOC_V850_TDA_6_8_OFFSET,
+
+  (* This is an 8bit offset (of which only 7 bits are used) from the tiny
+  data area pointer. *)
+    BFD_RELOC_V850_TDA_7_8_OFFSET,
+
+  (* This is a 7 bit offset from the tiny data area pointer. *)
+    BFD_RELOC_V850_TDA_7_7_OFFSET,
+
+  (* This is a 16 bit offset from the tiny data area pointer. *)
+    BFD_RELOC_V850_TDA_16_16_OFFSET,
+
+  (* This is a 5 bit offset (of which only 4 bits are used) from the tiny
+  data area pointer. *)
+    BFD_RELOC_V850_TDA_4_5_OFFSET,
+
+  (* This is a 4 bit offset from the tiny data area pointer. *)
+    BFD_RELOC_V850_TDA_4_4_OFFSET,
+
+  (* This is a 16 bit offset from the SmallInt data area pointer, with the
+  bits placed non-contigously in the instruction. *)
+    BFD_RELOC_V850_SDA_16_16_SPLIT_OFFSET,
+
+  (* This is a 16 bit offset from the zero data area pointer, with the
+  bits placed non-contigously in the instruction. *)
+    BFD_RELOC_V850_ZDA_16_16_SPLIT_OFFSET,
+
+  (* This is a 6 bit offset from the call table base pointer. *)
+    BFD_RELOC_V850_CALLT_6_7_OFFSET,
+
+  (* This is a 16 bit offset from the call table base pointer. *)
+    BFD_RELOC_V850_CALLT_16_16_OFFSET,
+
+
+  (* This is a 32bit pcrel reloc for the mn10300, offset by two bytes in the
+  instruction. *)
+    BFD_RELOC_MN10300_32_PCREL,
+
+  (* This is a 16bit pcrel reloc for the mn10300, offset by two bytes in the
+  instruction. *)
+    BFD_RELOC_MN10300_16_PCREL,
+
+  (* This is a 8bit DP reloc for the tms320c30, where the most
+  significant 8 bits of a 24 bit word are placed into the least
+  significant 8 bits of the opcode. *)
+    BFD_RELOC_TIC30_LDP,
+
+  (* This is a 7bit reloc for the tms320c54x, where the least
+  significant 7 bits of a 16 bit word are placed into the least
+  significant 7 bits of the opcode. *)
+    BFD_RELOC_TIC54X_PARTLS7,
+
+  (* This is a 9bit DP reloc for the tms320c54x, where the most
+  significant 9 bits of a 16 bit word are placed into the least
+  significant 9 bits of the opcode. *)
+    BFD_RELOC_TIC54X_PARTMS9,
+
+  (* This is an extended address 23-bit reloc for the tms320c54x. *)
+    BFD_RELOC_TIC54X_23,
+
+  (* This is a 16-bit reloc for the tms320c54x, where the least
+  significant 16 bits of a 23-bit extended address are placed into
+  the opcode. *)
+    BFD_RELOC_TIC54X_16_OF_23,
+
+  (* This is a reloc for the tms320c54x, where the most
+  significant 7 bits of a 23-bit extended address are placed into
+  the opcode. *)
+    BFD_RELOC_TIC54X_MS7_OF_23,
+
+  (* This is a 48 bit reloc for the FR30 that stores 32 bits. *)
+    BFD_RELOC_FR30_48,
+
+  (* This is a 32 bit reloc for the FR30 that stores 20 bits split up into
+  two sections. *)
+    BFD_RELOC_FR30_20,
+
+  (* This is a 16 bit reloc for the FR30 that stores a 6 bit word offset in
+  4 bits. *)
+    BFD_RELOC_FR30_6_IN_4,
+
+  (* This is a 16 bit reloc for the FR30 that stores an 8 bit byte offset
+  into 8 bits. *)
+    BFD_RELOC_FR30_8_IN_8,
+
+  (* This is a 16 bit reloc for the FR30 that stores a 9 bit SmallInt offset
+  into 8 bits. *)
+    BFD_RELOC_FR30_9_IN_8,
+
+  (* This is a 16 bit reloc for the FR30 that stores a 10 bit word offset
+  into 8 bits. *)
+    BFD_RELOC_FR30_10_IN_8,
+
+  (* This is a 16 bit reloc for the FR30 that stores a 9 bit pc relative
+  SmallInt offset into 8 bits. *)
+    BFD_RELOC_FR30_9_PCREL,
+
+  (* This is a 16 bit reloc for the FR30 that stores a 12 bit pc relative
+  SmallInt offset into 11 bits. *)
+    BFD_RELOC_FR30_12_PCREL,
+
+  (* Motorola Mcore relocations. *)
+    BFD_RELOC_MCORE_PCREL_IMM8BY4,
+    BFD_RELOC_MCORE_PCREL_IMM11BY2,
+    BFD_RELOC_MCORE_PCREL_IMM4BY2,
+    BFD_RELOC_MCORE_PCREL_32,
+    BFD_RELOC_MCORE_PCREL_JSR_IMM11BY2,
+    BFD_RELOC_MCORE_RVA,
+
+  (* This is a 16 bit reloc for the AVR that stores 8 bit pc relative
+  SmallInt offset into 7 bits. *)
+    BFD_RELOC_AVR_7_PCREL,
+
+  (* This is a 16 bit reloc for the AVR that stores 13 bit pc relative
+  SmallInt offset into 12 bits. *)
+    BFD_RELOC_AVR_13_PCREL,
+
+  (* This is a 16 bit reloc for the AVR that stores 17 bit value (usually
+  program memory address) into 16 bits. *)
+    BFD_RELOC_AVR_16_PM,
+
+  (* This is a 16 bit reloc for the AVR that stores 8 bit value (usually
+  data memory address) into 8 bit immediate value of LDI insn. *)
+    BFD_RELOC_AVR_LO8_LDI,
+
+  (* This is a 16 bit reloc for the AVR that stores 8 bit value (high 8 bit
+  of data memory address) into 8 bit immediate value of LDI insn. *)
+    BFD_RELOC_AVR_HI8_LDI,
+
+  (* This is a 16 bit reloc for the AVR that stores 8 bit value (most high 8 bit
+  of program memory address) into 8 bit immediate value of LDI insn. *)
+    BFD_RELOC_AVR_HH8_LDI,
+
+  (* This is a 16 bit reloc for the AVR that stores negated 8 bit value
+  (usually data memory address) into 8 bit immediate value of SUBI insn. *)
+    BFD_RELOC_AVR_LO8_LDI_NEG,
+
+  (* This is a 16 bit reloc for the AVR that stores negated 8 bit value
+  (high 8 bit of data memory address) into 8 bit immediate value of
+  SUBI insn. *)
+    BFD_RELOC_AVR_HI8_LDI_NEG,
+
+  (* This is a 16 bit reloc for the AVR that stores negated 8 bit value
+  (most high 8 bit of program memory address) into 8 bit immediate value
+  of LDI or SUBI insn. *)
+    BFD_RELOC_AVR_HH8_LDI_NEG,
+
+  (* This is a 16 bit reloc for the AVR that stores 8 bit value (usually
+  command address) into 8 bit immediate value of LDI insn. *)
+    BFD_RELOC_AVR_LO8_LDI_PM,
+
+  (* This is a 16 bit reloc for the AVR that stores 8 bit value (high 8 bit
+  of command address) into 8 bit immediate value of LDI insn. *)
+    BFD_RELOC_AVR_HI8_LDI_PM,
+
+  (* This is a 16 bit reloc for the AVR that stores 8 bit value (most high 8 bit
+  of command address) into 8 bit immediate value of LDI insn. *)
+    BFD_RELOC_AVR_HH8_LDI_PM,
+
+  (* This is a 16 bit reloc for the AVR that stores negated 8 bit value
+  (usually command address) into 8 bit immediate value of SUBI insn. *)
+    BFD_RELOC_AVR_LO8_LDI_PM_NEG,
+
+  (* This is a 16 bit reloc for the AVR that stores negated 8 bit value
+  (high 8 bit of 16 bit command address) into 8 bit immediate value
+  of SUBI insn. *)
+    BFD_RELOC_AVR_HI8_LDI_PM_NEG,
+
+  (* This is a 16 bit reloc for the AVR that stores negated 8 bit value
+  (high 6 bit of 22 bit command address) into 8 bit immediate
+  value of SUBI insn. *)
+    BFD_RELOC_AVR_HH8_LDI_PM_NEG,
+
+  (* This is a 32 bit reloc for the AVR that stores 23 bit value
+  into 22 bits. *)
+    BFD_RELOC_AVR_CALL,
+
+  (* These two relocations are used by the linker to determine which of
+  the entries in a C++ virtual function table are actually used.  When
+  the --gc-sections option is given, the linker will zero out the entries
+  that are not used, so that the code for those functions need not be
+  included in the output.
+
+  VTABLE_INHERIT is a zero-space relocation used to describe to the
+  linker the inheritence tree of a C++ virtual function table.  The
+  relocation's symbol should be the parent class' vtable, and the
+  relocation should be located at the child vtable.
+
+  VTABLE_ENTRY is a zero-space relocation that describes the use of a
+  virtual function table entry.  The reloc's symbol should refer to the
+  table of the class mentioned in the code.  Off of that base, an offset
+  describes the entry that is being used.  For Rela hosts, this offset
+  is stored in the reloc's addend.  For Rel hosts, we are forced to put
+  this offset in the reloc's section offset. *)
+    BFD_RELOC_VTABLE_INHERIT,
+    BFD_RELOC_VTABLE_ENTRY,
+
+  (* Intel IA64 Relocations. *)
+    BFD_RELOC_IA64_IMM14,
+    BFD_RELOC_IA64_IMM22,
+    BFD_RELOC_IA64_IMM64,
+    BFD_RELOC_IA64_DIR32MSB,
+    BFD_RELOC_IA64_DIR32LSB,
+    BFD_RELOC_IA64_DIR64MSB,
+    BFD_RELOC_IA64_DIR64LSB,
+    BFD_RELOC_IA64_GPREL22,
+    BFD_RELOC_IA64_GPREL64I,
+    BFD_RELOC_IA64_GPREL32MSB,
+    BFD_RELOC_IA64_GPREL32LSB,
+    BFD_RELOC_IA64_GPREL64MSB,
+    BFD_RELOC_IA64_GPREL64LSB,
+    BFD_RELOC_IA64_LTOFF22,
+    BFD_RELOC_IA64_LTOFF64I,
+    BFD_RELOC_IA64_PLTOFF22,
+    BFD_RELOC_IA64_PLTOFF64I,
+    BFD_RELOC_IA64_PLTOFF64MSB,
+    BFD_RELOC_IA64_PLTOFF64LSB,
+    BFD_RELOC_IA64_FPTR64I,
+    BFD_RELOC_IA64_FPTR32MSB,
+    BFD_RELOC_IA64_FPTR32LSB,
+    BFD_RELOC_IA64_FPTR64MSB,
+    BFD_RELOC_IA64_FPTR64LSB,
+    BFD_RELOC_IA64_PCREL21B,
+    BFD_RELOC_IA64_PCREL21BI,
+    BFD_RELOC_IA64_PCREL21M,
+    BFD_RELOC_IA64_PCREL21F,
+    BFD_RELOC_IA64_PCREL22,
+    BFD_RELOC_IA64_PCREL60B,
+    BFD_RELOC_IA64_PCREL64I,
+    BFD_RELOC_IA64_PCREL32MSB,
+    BFD_RELOC_IA64_PCREL32LSB,
+    BFD_RELOC_IA64_PCREL64MSB,
+    BFD_RELOC_IA64_PCREL64LSB,
+    BFD_RELOC_IA64_LTOFF_FPTR22,
+    BFD_RELOC_IA64_LTOFF_FPTR64I,
+    BFD_RELOC_IA64_LTOFF_FPTR64MSB,
+    BFD_RELOC_IA64_LTOFF_FPTR64LSB,
+    BFD_RELOC_IA64_SEGREL32MSB,
+    BFD_RELOC_IA64_SEGREL32LSB,
+    BFD_RELOC_IA64_SEGREL64MSB,
+    BFD_RELOC_IA64_SEGREL64LSB,
+    BFD_RELOC_IA64_SECREL32MSB,
+    BFD_RELOC_IA64_SECREL32LSB,
+    BFD_RELOC_IA64_SECREL64MSB,
+    BFD_RELOC_IA64_SECREL64LSB,
+    BFD_RELOC_IA64_REL32MSB,
+    BFD_RELOC_IA64_REL32LSB,
+    BFD_RELOC_IA64_REL64MSB,
+    BFD_RELOC_IA64_REL64LSB,
+    BFD_RELOC_IA64_LTV32MSB,
+    BFD_RELOC_IA64_LTV32LSB,
+    BFD_RELOC_IA64_LTV64MSB,
+    BFD_RELOC_IA64_LTV64LSB,
+    BFD_RELOC_IA64_IPLTMSB,
+    BFD_RELOC_IA64_IPLTLSB,
+    BFD_RELOC_IA64_COPY,
+    BFD_RELOC_IA64_TPREL22,
+    BFD_RELOC_IA64_TPREL64MSB,
+    BFD_RELOC_IA64_TPREL64LSB,
+    BFD_RELOC_IA64_LTOFF_TP22,
+    BFD_RELOC_IA64_LTOFF22X,
+    BFD_RELOC_IA64_LDXMOV,
+
+  (* Motorola 68HC11 reloc.
+  This is the 8 bits high part of an absolute address. *)
+    BFD_RELOC_M68HC11_HI8,
+
+  (* Motorola 68HC11 reloc.
+  This is the 8 bits low part of an absolute address. *)
+    BFD_RELOC_M68HC11_LO8,
+
+  (* Motorola 68HC11 reloc.
+  This is the 3 bits of a value. *)
+    BFD_RELOC_M68HC11_3B,
+
+  (* These relocs are only used within the CRIS assembler.  They are not
+  (at present) written to any object files. *)
+    BFD_RELOC_CRIS_BDISP8,
+    BFD_RELOC_CRIS_UNSIGNED_5,
+    BFD_RELOC_CRIS_SIGNED_6,
+    BFD_RELOC_CRIS_UNSIGNED_6,
+    BFD_RELOC_CRIS_UNSIGNED_4,
+
+  (* Intel i860 Relocations. *)
+    BFD_RELOC_860_COPY,
+    BFD_RELOC_860_GLOB_DAT,
+    BFD_RELOC_860_JUMP_SLOT,
+    BFD_RELOC_860_RELATIVE,
+    BFD_RELOC_860_PC26,
+    BFD_RELOC_860_PLT26,
+    BFD_RELOC_860_PC16,
+    BFD_RELOC_860_LOW0,
+    BFD_RELOC_860_SPLIT0,
+    BFD_RELOC_860_LOW1,
+    BFD_RELOC_860_SPLIT1,
+    BFD_RELOC_860_LOW2,
+    BFD_RELOC_860_SPLIT2,
+    BFD_RELOC_860_LOW3,
+    BFD_RELOC_860_LOGOT0,
+    BFD_RELOC_860_SPGOT0,
+    BFD_RELOC_860_LOGOT1,
+    BFD_RELOC_860_SPGOT1,
+    BFD_RELOC_860_LOGOTOFF0,
+    BFD_RELOC_860_SPGOTOFF0,
+    BFD_RELOC_860_LOGOTOFF1,
+    BFD_RELOC_860_SPGOTOFF1,
+    BFD_RELOC_860_LOGOTOFF2,
+    BFD_RELOC_860_LOGOTOFF3,
+    BFD_RELOC_860_LOPC,
+    BFD_RELOC_860_HIGHADJ,
+    BFD_RELOC_860_HAGOT,
+    BFD_RELOC_860_HAGOTOFF,
+    BFD_RELOC_860_HAPC,
+    BFD_RELOC_860_HIGH,
+    BFD_RELOC_860_HIGOT,
+    BFD_RELOC_860_HIGOTOFF,
+    BFD_RELOC_UNUSED
+  ); { bfd_reloc_code_real }
+
+  bfd_architecture = (
+    bfd_arch_unknown,   (* File arch not known *)
+    bfd_arch_obscure,   (* Arch known, not one of these *)
+    bfd_arch_m68k,      (* Motorola 68xxx *)
+    bfd_arch_vax,       (* DEC Vax *)
+    bfd_arch_i960,      (* Intel 960 *)
+      (* The order of the following is important.
+         lower number indicates a machine type that
+         only accepts a subset of the instructions
+         available to machines with higher numbers.
+         The exception is the "ca", which is
+         incompatible with all other machines except
+         "core". *)
+
+    bfd_arch_a29k,      (* AMD 29000 *)
+    bfd_arch_sparc,     (* SPARC *)
+  (* The difference between v8plus and v9 is that v9 is a true 64 bit env.  *)
+  (* Nonzero if MACH has the v9 instruction set.  *)
+    bfd_arch_mips,      (* MIPS Rxxxx *)
+    bfd_arch_i386,      (* Intel 386 *)
+    bfd_arch_we32k,     (* AT&T WE32xxx *)
+    bfd_arch_tahoe,     (* CCI/Harris Tahoe *)
+    bfd_arch_i860,      (* Intel 860 *)
+    bfd_arch_i370,      (* IBM 360/370 Mainframes *)
+    bfd_arch_romp,      (* IBM ROMP PC/RT *)
+    bfd_arch_alliant,   (* Alliant *)
+    bfd_arch_convex,    (* Convex *)
+    bfd_arch_m88k,      (* Motorola 88xxx *)
+    bfd_arch_pyramid,   (* Pyramid Technology *)
+    bfd_arch_h8300,     (* Hitachi H8/300 *)
+    bfd_arch_powerpc,   (* PowerPC *)
+    bfd_arch_rs6000,    (* IBM RS/6000 *)
+    bfd_arch_hppa,      (* HP PA RISC *)
+    bfd_arch_d10v,      (* Mitsubishi D10V *)
+    bfd_arch_d30v,      (* Mitsubishi D30V *)
+    bfd_arch_m68hc11,   (* Motorola 68HC11 *)
+    bfd_arch_m68hc12,   (* Motorola 68HC12 *)
+    bfd_arch_z8k,       (* Zilog Z8000 *)
+    bfd_arch_h8500,     (* Hitachi H8/500 *)
+    bfd_arch_sh,        (* Hitachi SH *)
+    bfd_arch_alpha,     (* Dec Alpha *)
+    bfd_arch_arm,       (* Advanced Risc Machines ARM *)
+    bfd_arch_ns32k,     (* National Semiconductors ns32000 *)
+    bfd_arch_w65,       (* WDC 65816 *)
+    bfd_arch_tic30,     (* Texas Instruments TMS320C30 *)
+    bfd_arch_tic54x,    (* Texas Instruments TMS320C54X *)
+    bfd_arch_tic80,     (* TI TMS320c80 (MVP) *)
+    bfd_arch_v850,      (* NEC V850 *)
+    bfd_arch_arc,       (* ARC Cores *)
+    bfd_arch_m32r,      (* Mitsubishi M32R/D *)
+    bfd_arch_mn10200,   (* Matsushita MN10200 *)
+    bfd_arch_mn10300,   (* Matsushita MN10300 *)
+    bfd_arch_fr30,
+    bfd_arch_mcore,
+    bfd_arch_ia64,      (* HP/Intel ia64 *)
+    bfd_arch_pj,
+    bfd_arch_avr,       (* Atmel AVR microcontrollers *)
+    bfd_arch_cris,      (* Axis CRIS *)
+    bfd_arch_last
+  ); { bfd_architecture }
+
+  check_format_proc    = function (a:PBFD):pbfd_target;cdecl;
+  set_format_proc      = function (a:PBFD):bfd_boolean;cdecl;
+  write_contents_proc = function (a:PBFD):bfd_boolean;cdecl;
+
+  bfd_target = record
+    name: pchar;
+    flavour: bfd_flavour;
+    byteorder: bfd_endian;
+    header_byteorder: bfd_endian;
+    object_flags: flagword;
+    section_flags: flagword;
+    symbol_leading_char: ShortInt;
+    ar_pad_char: ShortInt;
+    ar_max_namelen: Word;
+    bfd_getx64:           function (const Pbfd_byte): bfd_vma; cdecl;
+    bfd_getx_signed_64:   function (const Pbfd_byte):bfd_signed_vma; cdecl;
+    bfd_putx64:           procedure(a: bfd_vma; b: Pbfd_byte); cdecl;
+    bfd_getx32:           function (const Pbfd_byte):bfd_vma; cdecl;
+    bfd_getx_signed_32:   function (const Pbfd_byte):bfd_signed_vma; cdecl;
+    bfd_putx32:           procedure(a: bfd_vma; b: Pbfd_byte); cdecl;
+    bfd_getx16:           function (const Pbfd_byte):bfd_vma; cdecl;
+    bfd_getx_signed_16:   function (const Pbfd_byte):bfd_signed_vma; cdecl;
+    bfd_putx16:           procedure(a: bfd_vma; b: Pbfd_byte); cdecl;
+    bfd_h_getx64:         function (const Pbfd_byte):bfd_vma; cdecl;
+    bfd_h_getx_signed_64: function (const Pbfd_byte):bfd_signed_vma; cdecl;
+    bfd_h_putx64:         procedure(a: bfd_vma; b: Pbfd_byte); cdecl;
+    bfd_h_getx32:         function (const Pbfd_byte):bfd_vma; cdecl;
+    bfd_h_getx_signed_32: function (const Pbfd_byte):bfd_signed_vma; cdecl;
+    bfd_h_putx32:         procedure(a: bfd_vma; b: Pbfd_byte); cdecl;
+    bfd_h_getx16:         function (const Pbfd_byte):bfd_vma; cdecl;
+    bfd_h_getx_signed_16: function (const Pbfd_byte):bfd_signed_vma; cdecl;
+    bfd_h_putx16:         procedure(a: bfd_vma; b: Pbfd_byte); cdecl;
+    _bfd_check_format:   array [bfd_format] of check_format_proc;
+    _bfd_set_format:     array [bfd_format] of set_format_proc;
+    _bfd_write_contents: array [bfd_format] of write_contents_proc;
+
+    (* Generic entry points.  *)
+
+    (* Called when the BFD is being closed to do any necessary cleanup.  *)
+    _close_and_cleanup:     function(a: PBFD  ):bfd_boolean;cdecl;
+    (* Ask the BFD to free all cached information.  *)
+    _bfd_free_cached_info:  function(a: PBFD  ):bfd_boolean;cdecl;
+    (* Called when a new section is created.  *)
+    _new_section_hook:      function(a: PBFD; b: PSec):bfd_boolean;cdecl;
+    (* Read the contents of a section.  *)
+    _bfd_get_section_contents:  function(a: PBFD; b: PSec; c: pointer; d: file_ptr; e: bfd_size_type):bfd_boolean;cdecl;
+    _bfd_get_section_contents_in_window: function(a: PBFD; b: PSec; c: Pbfd_window; d:file_ptr; e: bfd_size_type):bfd_boolean;cdecl;
+
+    (* Entry points to copy private data.  *)
+
+    (* Called to copy BFD general private data from one object file
+       to another.  *)
+    _bfd_copy_private_bfd_data:  function(a: PBFD; b: PBFD  ):bfd_boolean;cdecl;
+    (* Called to merge BFD general private data from one object file
+       to a common output file when linking.  *)
+    _bfd_merge_private_bfd_data:  function(a: PBFD; b: PBFD  ):bfd_boolean;cdecl;
+    (* Called to copy BFD private section data from one object file
+       to another.  *)
+    _bfd_copy_private_section_data: function(a: PBFD; b:PSec; c: PBFD; d: PSec):bfd_boolean;cdecl;
+    (* Called to copy BFD private symbol data from one symbol
+       to another.  *)
+    _bfd_copy_private_symbol_data: function(a: PBFD; b: Pasymbol; c: PBFD; d: Pasymbol):bfd_boolean;cdecl;
+    (* Called to set private backend flags *)
+    _bfd_set_private_flags: function(a: PBFD; b:flagword):bfd_boolean; cdecl;
+
+    (* Called to print private BFD data *)
+    _bfd_print_private_bfd_data: function(a: PBFD; b: pointer):bfd_boolean; cdecl;
+
+    (* Core file entry points.  *)
+
+    (* Archive entry points.  *)
+
+    _bfd_slurp_armap: function(a: PBFD):bfd_boolean;cdecl;
+    _bfd_slurp_extended_name_table: function(a: PBFD  ):bfd_boolean;cdecl;
+    _bfd_construct_extended_name_table: function(a: PBFD; b: Ppchar; c: Pbfd_size_type; d: Ppchar):bfd_boolean;cdecl;
+    _bfd_truncate_arname: procedure (a: PBFD; b: pchar; c: pchar);cdecl;
+    write_armap: function(arch: PBFD; elength: LongWord; map: Porl; orl_count: LongWord; stridx: integer):bfd_boolean;cdecl;
+    _bfd_read_ar_hdr_fn: function(a: PBFD  ):pointer;cdecl;
+    openr_next_archived_file: function(arch: PBFD; prev: PBFD):PBFD;cdecl;
+
+
+    _bfd_get_elt_at_index: function(a: PBFD; b: symindex):PBFD;cdecl;
+    _bfd_stat_arch_elt: function(a: PBFD; b: Pstat ):integer;cdecl;
+    _bfd_update_armap_timestamp: function(a: PBFD  ):bfd_boolean;cdecl;
+
+    (* Entry points used for symbols.  *)
+
+    _bfd_get_symtab_upper_bound: function(a: PBFD  ):LongInt;cdecl;
+    _bfd_canonicalize_symtab: function(a: PBFD; b: PPsymbol_cache_entry):LongInt;cdecl;
+
+
+    _bfd_make_empty_symbol: function(a: PBFD  ): PPsymbol_cache_entry;cdecl;
+
+    _bfd_print_symbol: procedure(a: PBFD; b: pointer; c: Psymbol_cache_entry; d: bfd_print_symbol);cdecl;
+    _bfd_get_symbol_info: procedure (a: PBFD; b: Psymbol_cache_entry; c:Psymbol_info);cdecl;
+    _bfd_is_local_label_name: function(a: PBFD; b: pchar):bfd_boolean;cdecl;
+
+    _get_lineno: function( a: PBFD; b: Psymbol_cache_entry):Palent;cdecl;
+    _bfd_find_nearest_line: function(abfd: PBFD; section: Psec; symbols: PPsymbol_cache_entry; offset: bfd_vma; fil: pchar; func: Ppchar;  lin: PLongWord):bfd_boolean;cdecl;
+   (* Back-door to allow format-aware applications to create debug symbols
+      while using BFD for everything else.  Currently used by the assembler
+      when creating COFF files.  *)
+    _bfd_make_debug_symbol: function( abfd: PBFD ; ptr: pointer; size: LongWord ):Pasymbol;cdecl;
+    _read_minisymbols:   function(a: PBFD; b: bfd_boolean; c: PPointer; d: PLongWord):LongInt;cdecl;
+    _minisymbol_to_symbol: function(a: PBFD; b:bfd_boolean; c: pointer; d: Pasymbol):Pasymbol;cdecl;
+
+    (* Routines for relocs.  *)
+
+    _get_reloc_upper_bound: function(a: PBFD; b: PSec):LongInt;cdecl;
+    _bfd_canonicalize_reloc: function(a: PBFD; b: PSec;c: PParelent; d: PPsymbol_cache_entry ):LongInt;cdecl;
+    (* See documentation on reloc types.  *)
+
+    reloc_type_lookup: function(abfd: PBFD ; code: bfd_reloc_code_real): PPreloc_howto;cdecl;
+
+    (* Routines used when writing an object file.  *)
+
+    _bfd_set_arch_mach: function( a: PBFD; b:bfd_architecture; c:LongWord): bfd_boolean;cdecl;
+
+    _bfd_set_section_contents: function(a: PBFD; b: PSec; c: pointer; d: file_ptr; e: bfd_size_type):bfd_boolean;cdecl;
+
+    (* Routines used by the linker.  *)
+
+    _bfd_sizeof_headers: function(a: PBFD ; b: bfd_boolean):integer;cdecl;
+    _bfd_get_relocated_section_contents: function(a: PBFD ; b: Pbfd_link_info; c: Pbfd_link_order; data: Pbfd_byte; relocateable: bfd_boolean; ce: PPsymbol_cache_entry):Pbfd_byte;cdecl;
+
+    _bfd_relax_section: function(a: PBFD ; b: Psec; c: Pbfd_link_info; again: Pboolean):bfd_boolean;cdecl;
+
+    (* Create a hash table for the linker.  Different backends store
+       different information in this table.  *)
+    _bfd_link_hash_table_create: function( a: PBFD  ):Pbfd_link_hash_table;cdecl;
+
+    (* Add symbols from this object file into the hash table.  *)
+    _bfd_link_add_symbols: function(a: PBFD ; b: Pbfd_link_info):bfd_boolean;cdecl;
+
+    (* Do a link based on the link_order structures attached to each
+       section of the BFD.  *)
+    _bfd_final_link: function(a: PBFD; b: Pbfd_link_info):bfd_boolean;cdecl;
+
+    (* Should this section be split up into smaller pieces during linking.  *)
+    _bfd_link_split_section: function(a: PBFD; b: Psec):bfd_boolean;cdecl;
+
+    (* Remove sections that are not referenced from the output.  *)
+    _bfd_gc_sections: function(a: PBFD ; b: Pbfd_link_info):bfd_boolean;cdecl;
+
+    (* Routines to handle dynamic symbols and relocs.  *)
+
+    (* Get the amount of memory required to hold the dynamic symbols. *)
+    _bfd_get_dynamic_symtab_upper_bound: function(a: PBFD  ):LongInt;cdecl;
+    (* Read in the dynamic symbols.  *)
+    _bfd_canonicalize_dynamic_symtab: function(a: PBFD ; b: PPsymbol_cache_entry):LongInt;cdecl;
+    (* Get the amount of memory required to hold the dynamic relocs.  *)
+    _bfd_get_dynamic_reloc_upper_bound: function(a: PBFD  ):LongInt;cdecl;
+    (* Read in the dynamic relocs.  *)
+    _bfd_canonicalize_dynamic_reloc: function(a: PBFD ; b: PParelent; c: PPsymbol_cache_entry):LongInt;cdecl;
+
+    (* Opposite endian version of this target.  *)
+    alternative_target: Pbfd_target;
+
+    backend_data: pointer;
+  end; { bfd_target }
+
+  complain_overflow = (
+       (* Do not complain on overflow. *)
+    complain_overflow_dont,
+
+       (* Complain if the bitfield overflows, whether it is considered
+          as signed or unsigned. *)
+    complain_overflow_bitfield,
+
+       (* Complain if the value overflows when considered as signed
+          number. *)
+    complain_overflow_signed,
+
+       (* Complain if the value overflows when considered as an
+          unsigned number. *)
+    complain_overflow_unsigned
+  ); { complain_overflow }
+
+  bfd_reloc_status = (
+         (* No errors detected *)
+    bfd_reloc_ok,
+
+         (* The relocation was performed, but there was an overflow. *)
+    bfd_reloc_overflow,
+
+         (* The address to relocate was not within the section supplied. *)
+    bfd_reloc_outofrange,
+
+         (* Used by special functions *)
+    bfd_reloc_continue,
+
+         (* Unsupported relocation size requested. *)
+    bfd_reloc_notsupported,
+
+         (* Unused *)
+    bfd_reloc_other,
+
+         (* The symbol to relocate against was undefined. *)
+    bfd_reloc_undefined,
+
+         (* The relocation was performed, but may not be ok - presently
+            generated only when linking i960 coff files with i960 b.out
+            symbols.  If this type is returned, the error_message argument
+            to bfd_perform_relocation will be set.  *)
+    bfd_reloc_dangerous
+  ); { bfd_reloc_status }
+
+
+  reloc_howto = record
+         (*  The type field has mainly a documentary use - the back end can
+             do what it wants with it, though normally the back end's
+             external idea of what a reloc number is stored
+             in this field. For example, a PC relative word relocation
+             in a coff environment has the type 023 - because that's
+             what the outside world calls a R_PCRWORD reloc. *)
+    typ: LongWord;
+
+         (*  The value the final relocation is shifted right by. This drops
+             unwanted data from the relocation.  *)
+    rightshift: LongWord;
+
+         (*  The size of the item to be relocated.  This is *not* a
+             power-of-two measure.  To get the number of bytes operated
+             on by a type of relocation, use bfd_get_reloc_size.  *)
+    size: integer;
+
+         (*  The number of bits in the item to be relocated.  This is used
+             when doing overflow checking.  *)
+    bitsize: LongWord;
+
+         (*  Notes that the relocation is relative to the location in the
+             data section of the addend. The relocation function will
+             subtract from the relocation value the address of the location
+             being relocated. *)
+    pc_relative: bfd_boolean;
+
+         (*  The bit position of the reloc value in the destination.
+             The relocated value is left shifted by this amount. *)
+    bitpos: LongWord;
+
+         (* What type of overflow error should be checked for when
+            relocating. *)
+    complain_on_overflow: complain_overflow;
+
+         (* If this field is non null, then the supplied function is
+            called rather than the normal function. This allows really
+            strange relocation methods to be accomodated (e.g., i960 callj
+            instructions). *)
+    special_function: function( abfd: PBFD;
+                                reloc_entry: Parelent;
+                                symbol: Psymbol_cache_entry;
+                                data: pointer;
+                                input_section: Pasection;
+                                output_bfd: PBFD;
+                                error_message: ppchar):  bfd_reloc_status;cdecl;
+
+         (* The textual name of the relocation type. *)
+    name: pchar;
+
+         (* Some formats record a relocation addend in the section contents
+            rather than with the relocation.  For ELF formats this is the
+            distinction between USE_REL and USE_RELA (though the code checks
+            for USE_REL == 1/0).  The value of this field is TRUE if the
+            addend is recorded with the section contents; when performing a
+            partial link (ld -r) the section contents (the data) will be
+            modified.  The value of this field is FALSE if addends are
+            recorded with the relocation (in arelent.addend); when performing
+            a partial link the relocation will be modified.
+            All relocations for all ELF USE_RELA targets should set this field
+            to FALSE (values of TRUE should be looked on with suspicion).
+            However, the converse is not true: not all relocations of all ELF
+            USE_REL targets set this field to TRUE.  Why this is so is peculiar
+            to each particular target.  For relocs that aren't used in partial
+            links (e.g. GOT stuff) it doesn't matter what this is set to.  *)
+    partial_inplace: bfd_boolean;
+
+         (* The src_mask selects which parts of the read in data
+            are to be used in the relocation sum.  E.g., if this was an 8 bit
+            byte of data which we read and relocated, this would be
+            $000000ff. When we have relocs which have an addend, such as
+            sun4 extended relocs, the value in the offset part of a
+            relocating field is garbage so we never use it. In this case
+            the mask would be $00000000. *)
+    src_mask: bfd_vma;
+
+         (* The dst_mask selects which parts of the instruction are replaced
+            into the instruction. In most cases src_mask == dst_mask,
+            except in the above special case, where dst_mask would be
+            $000000ff, and src_mask would be $00000000.   *)
+    dst_mask: bfd_vma;
+
+         (* When some formats create PC relative instructions, they leave
+            the value of the pc of the place being relocated in the offset
+            slot of the instruction, so that a PC relative relocation can
+            be made just by adding in an ordinary offset (e.g., sun3 a.out).
+            Some formats leave the displacement part of an instruction
+            empty (e.g., m88k bcs); this flag signals the fact.*)
+    pcrel_offset: bfd_boolean;
+
+  end; { reloc_howto }
+
+  bfd_arch_info = record
+    bits_per_word: integer;
+    bits_per_address: integer;
+    bits_per_byte: integer;
+    arch: bfd_architecture;
+    mach: LongWord;
+    arch_name: pchar;
+    printable_name: pchar;
+    section_align_power: LongWord;
+    (* True if this is the default machine for the architecture.  *)
+    the_default: bfd_boolean;
+
+    compatible: function(a: Pbfd_arch_info; b: Pbfd_arch_info):Pbfd_arch_info;cdecl;
+    scan: function(a: Pbfd_arch_info; b: pchar): bfd_boolean;cdecl;
+
+    next: Pbfd_arch_info;
+  end; { bfd_arch_info }
+
+  reloc_cache_entry = record
+         (* A pointer into the canonical table of pointers  *)
+    sym_ptr_ptr: Psymbol_cache_entry;
+
+         (* offset in section *)
+    address: bfd_size_type;
+
+         (* addend for relocation value *)
+    addend: bfd_vma;
+
+         (* Pointer to how to perform the required relocation *)
+    howto: reloc_howto;
+  end; { reloc_cache_entry }
+  arelent = reloc_cache_entry;
+
+
+(* This structure is used for a comdat section, as in PE.  A comdat
+   section is associated with a particular symbol.  When the linker
+   sees a comdat section, it keeps only one of the sections with a
+   given name and associated with a given symbol.  *)
+
+   bfd_comdat_info = record
+    (* The name of the symbol associated with a comdat section.  *)
+      name: pchar;
+
+    (* The local symbol table index of the symbol associated with a
+       comdat section.  This is only meaningful to the object file format
+       specific code; it is not an index into the list returned by
+       bfd_canonicalize_symtab.  *)
+    symbol: LongInt;
+  end; { bfd_comdat_info }
+
+  relent_chain = record
+    relent: arelent;
+    next: Prelent_chain;
+  end;
+  arelent_chain = relent_chain;
+
+  bfd_error = (
+    bfd_error_no_error = 0 ,
+    bfd_error_system_call,
+    bfd_error_invalid_target,
+    bfd_error_wrong_format,
+    bfd_error_invalid_operation,
+    bfd_error_no_memory,
+    bfd_error_no_symbols,
+    bfd_error_no_armap,
+    bfd_error_no_more_archived_files,
+    bfd_error_malformed_archive,
+    bfd_error_file_not_recognized,
+    bfd_error_file_ambiguously_recognized,
+    bfd_error_no_contents,
+    bfd_error_nonrepresentable_section,
+    bfd_error_no_debug_section,
+    bfd_error_bad_value,
+    bfd_error_file_truncated,
+    bfd_error_file_too_big,
+    bfd_error_invalid_error_code
+  ); { bfd_error }
+
+const
+  BFD_NO_MORE_SYMBOLS: symindex = symindex(not symindex(0));
+
+  bfd_mach_m68000 = 1;
+  bfd_mach_m68008 = 2;
+  bfd_mach_m68010 = 3;
+  bfd_mach_m68020 = 4;
+  bfd_mach_m68030 = 5;
+  bfd_mach_m68040 = 6;
+  bfd_mach_m68060 = 7;
+  bfd_mach_cpu32  = 8;
+  bfd_mach_i960_core      = 1;
+  bfd_mach_i960_ka_sa     = 2;
+  bfd_mach_i960_kb_sb     = 3;
+  bfd_mach_i960_mc        = 4;
+  bfd_mach_i960_xa        = 5;
+  bfd_mach_i960_ca        = 6;
+  bfd_mach_i960_jx        = 7;
+  bfd_mach_i960_hx        = 8;
+  bfd_mach_sparc                 = 1;
+  bfd_mach_sparc_sparclet        = 2;
+  bfd_mach_sparc_sparclite       = 3;
+  bfd_mach_sparc_v8plus          = 4;
+  bfd_mach_sparc_v8plusa         = 5 (* with ultrasparc add'ns *);
+  bfd_mach_sparc_sparclite_le    = 6;
+  bfd_mach_sparc_v9              = 7;
+  bfd_mach_sparc_v9a             = 8 (* with ultrasparc add'ns *);
+  bfd_mach_sparc_v8plusb         = 9 (* with cheetah add'ns *);
+  bfd_mach_sparc_v9b             = 10 (* with cheetah add'ns *);
+  bfd_mach_mips3000              = 3000;
+  bfd_mach_mips3900              = 3900;
+  bfd_mach_mips4000              = 4000;
+  bfd_mach_mips4010              = 4010;
+  bfd_mach_mips4100              = 4100;
+  bfd_mach_mips4111              = 4111;
+  bfd_mach_mips4300              = 4300;
+  bfd_mach_mips4400              = 4400;
+  bfd_mach_mips4600              = 4600;
+  bfd_mach_mips4650              = 4650;
+  bfd_mach_mips5000              = 5000;
+  bfd_mach_mips6000              = 6000;
+  bfd_mach_mips8000              = 8000;
+  bfd_mach_mips10000             = 10000;
+  bfd_mach_mips16                = 16;
+  bfd_mach_mips32                = 32;
+  bfd_mach_mips32_4k             = 3204113 (* 32, 04, octal 'K' *);
+  bfd_mach_mips5                 = 5;
+  bfd_mach_mips64                = 64;
+  bfd_mach_mips_sb1              = 12310201 (* octal 'SB', 01 *);
+  bfd_mach_i386_i386 = 0;
+  bfd_mach_i386_i8086 = 1;
+  bfd_mach_i386_i386_intel_syntax = 2;
+  bfd_mach_x86_64 = 3;
+  bfd_mach_x86_64_intel_syntax = 4;
+  bfd_mach_h8300   = 1;
+  bfd_mach_h8300h  = 2;
+  bfd_mach_h8300s  = 3;
+  bfd_mach_ppc           = 0;
+  bfd_mach_ppc_403       = 403;
+  bfd_mach_ppc_403gc     = 4030;
+  bfd_mach_ppc_505       = 505;
+  bfd_mach_ppc_601       = 601;
+  bfd_mach_ppc_602       = 602;
+  bfd_mach_ppc_603       = 603;
+  bfd_mach_ppc_ec603e    = 6031;
+  bfd_mach_ppc_604       = 604;
+  bfd_mach_ppc_620       = 620;
+  bfd_mach_ppc_630       = 630;
+  bfd_mach_ppc_750       = 750;
+  bfd_mach_ppc_860       = 860;
+  bfd_mach_ppc_a35       = 35;
+  bfd_mach_ppc_rs64ii    = 642;
+  bfd_mach_ppc_rs64iii   = 643;
+  bfd_mach_ppc_7400      = 7400;
+  bfd_mach_rs6k          = 0;
+  bfd_mach_rs6k_rs1      = 6001;
+  bfd_mach_rs6k_rsc      = 6003;
+  bfd_mach_rs6k_rs2      = 6002;
+  bfd_mach_d10v          = 0;
+  bfd_mach_d10v_ts2      = 2;
+  bfd_mach_d10v_ts3      = 3;
+  bfd_mach_z8001         = 1;
+  bfd_mach_z8002         = 2;
+  bfd_mach_sh            = 0;
+  bfd_mach_sh2        = $20;
+  bfd_mach_sh_dsp     = $2d;
+  bfd_mach_sh3        = $30;
+  bfd_mach_sh3_dsp    = $3d;
+  bfd_mach_sh3e       = $3e;
+  bfd_mach_sh4        = $40;
+  bfd_mach_alpha_ev4  = $10;
+  bfd_mach_alpha_ev5  = $20;
+  bfd_mach_alpha_ev6  = $30;
+  bfd_mach_arm_2         = 1;
+  bfd_mach_arm_2a        = 2;
+  bfd_mach_arm_3         = 3;
+  bfd_mach_arm_3M        = 4;
+  bfd_mach_arm_4         = 5;
+  bfd_mach_arm_4T        = 6;
+  bfd_mach_arm_5         = 7;
+  bfd_mach_arm_5T        = 8;
+  bfd_mach_arm_5TE       = 9;
+  bfd_mach_arm_XScale    = 10;
+  bfd_mach_v850          = 0;
+  bfd_mach_v850e         = ord('E');
+  bfd_mach_v850ea        = ord('A');
+  bfd_mach_arc_5         = 0;
+  bfd_mach_arc_6         = 1;
+  bfd_mach_arc_7         = 2;
+  bfd_mach_arc_8         = 3;
+  bfd_mach_m32r          = 0 (* backwards compatibility *);
+  bfd_mach_m32rx         = ord('x');
+  bfd_mach_mn10300       = 300;
+  bfd_mach_am33          = 330;
+  bfd_mach_fr30          = $46523330;
+  bfd_mach_ia64_elf64    = 0;
+  bfd_mach_ia64_elf32    = 1;
+  bfd_mach_avr1          = 1;
+  bfd_mach_avr2          = 2;
+  bfd_mach_avr3          = 3;
+  bfd_mach_avr4          = 4;
+  bfd_mach_avr5          = 5;
+
+
+  BFD_RELOC_SPARC_64 = BFD_RELOC_64;
+  BFD_RELOC_SPARC_DISP64 = BFD_RELOC_64_PCREL;
+  BFD_RELOC_MIPS_GPREL = BFD_RELOC_GPREL16;
+  BFD_RELOC_MIPS_GPREL32 = BFD_RELOC_GPREL32;
+
+
+  SEC_NO_FLAGS   = $000;
+
+  (* Tells the OS to allocate space for this section when loading.
+     This is clear for a section containing debug information only.  *)
+  SEC_ALLOC      = $001;
+
+  (* Tells the OS to load the section from the file when loading.
+     This is clear for a .bss section.  *)
+  SEC_LOAD       = $002;
+
+  (* The section contains data still to be relocated, so there is
+     some relocation information too.  *)
+  SEC_RELOC      = $004;
+
+{  (* Obsolete ? *)
+  SEC_BALIGN     = $008;
+}
+
+  (* A signal to the OS that the section contains read only data.  *)
+  SEC_READONLY   = $010;
+
+  (* The section contains code only.  *)
+  SEC_CODE       = $020;
+
+  (* The section contains data only.  *)
+  SEC_DATA       = $040;
+
+  (* The section will reside in ROM.  *)
+  SEC_ROM        = $080;
+
+  (* The section contains constructor information. This section
+     type is used by the linker to create lists of constructors and
+     destructors used by <<g++>>. When a back end sees a symbol
+     which should be used in a constructor list, it creates a new
+     section for the type of name (e.g., <<__CTOR_LIST__>>), attaches
+     the symbol to it, and builds a relocation. To build the lists
+     of constructors, all the linker has to do is catenate all the
+     sections called <<__CTOR_LIST__>> and relocate the data
+     contained within - exactly the operations it would peform on
+     standard data.  *)
+  SEC_CONSTRUCTOR = $100;
+
+  (* The section is a constructor, and should be placed at the
+     end of the text, data, or bss section(?).  *)
+  SEC_CONSTRUCTOR_TEXT = $1100;
+  SEC_CONSTRUCTOR_DATA = $2100;
+  SEC_CONSTRUCTOR_BSS  = $3100;
+
+  (* The section has contents - a data section could be
+     <<SEC_ALLOC>> | <<SEC_HAS_CONTENTS>>; a debug section could be
+     <<SEC_HAS_CONTENTS>>  *)
+  SEC_HAS_CONTENTS = $200;
+
+  (* An instruction to the linker to not output the section
+     even if it has information which would normally be written.  *)
+  SEC_NEVER_LOAD = $400;
+
+  (* The section is a COFF shared library section.  This flag is
+     only for the linker.  If this type of section appears in
+     the input file, the linker must copy it to the output file
+     without changing the vma or size.  FIXME: Although this
+     was originally intended to be general, it really is COFF
+     specific (and the flag was renamed to indicate this).  It
+     might be cleaner to have some more general mechanism to
+     allow the back end to control what the linker does with
+     sections.  *)
+  SEC_COFF_SHARED_LIBRARY = $800;
+
+  (* The section has GOT references.  This flag is only for the
+     linker, and is currently only used by the elf32-1 back end.
+     It will be set if global offset table references were detected
+     in this section, which indicate to the linker that the section
+     contains PIC code, and must be handled specially when doing a
+     static link.  *)
+  SEC_HAS_GOT_REF = $4000;
+
+  (* The section contains common symbols (symbols may be defined
+     multiple times, the value of a symbol is the amount of
+     space it requires, and the largest symbol value is the one
+     used).  Most targets have exactly one of these (which we
+     translate to bfd_com_section_ptr), but ECOFF has two.  *)
+  SEC_IS_COMMON = $8000;
+
+  (* The section contains only debugging information.  For
+     example, this is set for ELF .debug and .stab sections.
+     strip tests this flag to see if a section can be
+     discarded.  *)
+  SEC_DEBUGGING = $10000;
+
+  (* The contents of this section are held in memory pointed to
+     by the contents field.  This is checked by bfd_get_section_contents,
+     and the data is retrieved from memory if appropriate.  *)
+  SEC_IN_MEMORY = $20000;
+
+  (* The contents of this section are to be excluded by the
+     linker for executable and shared objects unless those
+     objects are to be further relocated.  *)
+  SEC_EXCLUDE = $40000;
+
+  (* The contents of this section are to be sorted by the
+     based on the address specified in the associated symbol
+     table.  *)
+  SEC_SORT_ENTRIES = $80000;
+
+  (* When linking, duplicate sections of the same name should be
+     discarded, rather than being combined into a single section as
+     is usually done.  This is similar to how common symbols are
+     handled.  See SEC_LINK_DUPLICATES below.  *)
+  SEC_LINK_ONCE = $100000;
+
+  (* If SEC_LINK_ONCE is set, this bitfield describes how the linker
+     should handle duplicate sections.  *)
+  SEC_LINK_DUPLICATES = $600000;
+
+  (* This value for SEC_LINK_DUPLICATES means that duplicate
+     sections with the same name should simply be discarded.  *)
+  SEC_LINK_DUPLICATES_DISCARD = $0;
+
+  (* This value for SEC_LINK_DUPLICATES means that the linker
+     should warn if there are any duplicate sections, although
+     it should still only link one copy.  *)
+  SEC_LINK_DUPLICATES_ONE_ONLY = $200000;
+
+  (* This value for SEC_LINK_DUPLICATES means that the linker
+     should warn if any duplicate sections are a different size.  *)
+  SEC_LINK_DUPLICATES_SAME_SIZE = $400000;
+
+  (* This value for SEC_LINK_DUPLICATES means that the linker
+     should warn if any duplicate sections contain different
+     contents.  *)
+  SEC_LINK_DUPLICATES_SAME_CONTENTS = $600000;
+
+  (* This section was created by the linker as part of dynamic
+     relocation or other arcane processing.  It is skipped when
+     going through the first-pass output, trusting that someone
+     else up the line will take care of it later.  *)
+  SEC_LINKER_CREATED = $800000;
+
+  (* This section should not be subject to garbage collection.  *)
+  SEC_KEEP = $1000000;
+
+  (* This section contains "SmallInt" data, and should be placed
+     "near" the GP.  *)
+  SEC_SMALL_DATA = $2000000;
+
+  (* This section contains data which may be shared with other
+     executables or shared objects.  *)
+  SEC_SHARED = $4000000;
+
+  (* When a section with this flag is being linked, then if the size of
+     the input section is less than a page, it should not cross a page
+     boundary.  If the size of the input section is one page or more, it
+     should be aligned on a page boundary.  *)
+  SEC_BLOCK = $8000000;
+
+  (* Conditionally link this section; do not link if there are no
+     references found to any symbol in the section.  *)
+  SEC_CLINK = $10000000;
+
+  (*  End of section flags.  *)
+
+
+ (* Attributes of a symbol: *)
+
+  BSF_NO_FLAGS    = $00;
+
+       (* The symbol has local scope; <<static>> in <<C>>. The value
+          is the offset into the section of the data. *)
+  BSF_LOCAL      = $01;
+
+       (* The symbol has global scope; initialized data in <<C>>. The
+          value is the offset into the section of the data. *)
+  BSF_GLOBAL     = $02;
+
+       (* The symbol has global scope and is exported. The value is
+          the offset into the section of the data. *)
+  BSF_EXPORT     = BSF_GLOBAL (* no real difference *);
+
+       (* A normal C symbol would be one of:
+          <<BSF_LOCAL>>, <<BSF_FORT_COMM>>,  <<BSF_UNDEFINED>> or
+          <<BSF_GLOBAL>> *)
+
+       (* The symbol is a debugging record. The value has an arbitary
+          meaning, unless BSF_DEBUGGING_RELOC is also set.  *)
+  BSF_DEBUGGING  = $08;
+
+       (* The symbol denotes a function entry point.  Used in ELF,
+          perhaps others someday.  *)
+  BSF_FUNCTION    = $10;
+
+       (* Used by the linker. *)
+  BSF_KEEP        = $20;
+  BSF_KEEP_G      = $40;
+
+       (* A weak global symbol, overridable without warnings by
+          a regular global symbol of the same name.  *)
+  BSF_WEAK        = $80;
+
+       (* This symbol was created to point to a section, e.g. ELF's
+          STT_SECTION symbols.  *)
+  BSF_SECTION_SYM = $100;
+
+       (* The symbol used to be a common symbol, but now it is
+          allocated. *)
+  BSF_OLD_COMMON  = $200;
+
+       (* The default value for common data. *)
+  BFD_FORT_COMM_DEFAULT_VALUE = 0;
+
+       (* In some files the type of a symbol sometimes alters its
+          location in an output file - ie in coff a <<ISFCN>> symbol
+          which is also <<C_EXT>> symbol appears where it was
+          declared and not at the end of a section.  This bit is set
+          by the target BFD part to convey this information. *)
+
+  BSF_NOT_AT_END    = $400;
+
+       (* Signal that the symbol is the label of constructor section. *)
+  BSF_CONSTRUCTOR   = $800;
+
+       (* Signal that the symbol is a warning symbol.  The name is a
+          warning.  The name of the next symbol is the one to warn about;
+          if a reference is made to a symbol with the same name as the next
+          symbol, a warning is issued by the linker. *)
+  BSF_WARNING       = $1000;
+
+       (* Signal that the symbol is indirect.  This symbol is an indirect
+          pointer to the symbol with the same name as the next symbol. *)
+  BSF_INDIRECT      = $2000;
+
+       (* BSF_FILE marks symbols that contain a file name.  This is used
+          for ELF STT_FILE symbols.  *)
+  BSF_FILE          = $4000;
+
+       (* Symbol is from dynamic linking information.  *)
+  BSF_DYNAMIC       = $8000;
+
+       (* The symbol denotes a data object.  Used in ELF, and perhaps
+          others someday.  *)
+  BSF_OBJECT        = $10000;
+
+       (* This symbol is a debugging symbol.  The value is the offset
+          into the section of the data.  BSF_DEBUGGING should be set
+          as well.  *)
+  BSF_DEBUGGING_RELOC = $20000;
+
+
+(* User program access to BFD facilities *)
+
+(* Direct I/O routines, for programs which know more about the object
+   file than BFD does.  Use higher level routines if possible.  *)
+
+function bfd_read  (var data; size: bfd_size_type; nitems: bfd_size_type; abfd: PBFD): bfd_size_type;cdecl; external BFD_LIB_NAME;
+function bfd_write (const data; size: bfd_size_type; nitems: bfd_size_type; abfd: PBFD): bfd_size_type;cdecl; external BFD_LIB_NAME;
+function bfd_seek  (abfd: PBFD; fp: file_ptr; direction: integer): integer;cdecl; external BFD_LIB_NAME;
+function bfd_tell  (abfd: PBFD): LongInt;cdecl; external BFD_LIB_NAME;
+function bfd_flush (abfd: PBFD): integer;cdecl; external BFD_LIB_NAME;
+function bfd_stat  (abfd: PBFD; a: Pstat): integer;cdecl; external BFD_LIB_NAME;
+
+(* Cast from const pchar to pchar so that caller can assign to
+   a pchar without a warning.  *)
+
+function bfd_get_filename(abfd: PBFD): pchar;
+
+function bfd_record_phdr(abfd: PBFD; a: LongWord; b: bfd_boolean; c: flagword; d: bfd_boolean; e: bfd_vma;
+           f: bfd_boolean; g: bfd_boolean; h: LongWord; i: PPsec):bfd_boolean;cdecl; external BFD_LIB_NAME;
+
+(* Byte swapping routines.  *)
+
+function bfd_getb64         (const val):bfd_vma;cdecl; external BFD_LIB_NAME;
+function bfd_getl64         (const val):bfd_vma;cdecl; external BFD_LIB_NAME;
+function bfd_getb_signed_64 (const val):bfd_signed_vma;cdecl; external BFD_LIB_NAME;
+function bfd_getl_signed_64 (const val):bfd_signed_vma;cdecl; external BFD_LIB_NAME;
+function bfd_getb32         (const val):bfd_vma;cdecl; external BFD_LIB_NAME;
+function bfd_getl32         (const val):bfd_vma;cdecl; external BFD_LIB_NAME;
+function bfd_getb_signed_32 (const val):bfd_signed_vma;cdecl; external BFD_LIB_NAME;
+function bfd_getl_signed_32 (const val):bfd_signed_vma;cdecl; external BFD_LIB_NAME;
+function bfd_getb16         (const val):bfd_vma;cdecl; external BFD_LIB_NAME;
+function bfd_getl16         (const val):bfd_vma;cdecl; external BFD_LIB_NAME;
+function bfd_getb_signed_16 (const val):bfd_signed_vma;cdecl; external BFD_LIB_NAME;
+function bfd_getl_signed_16 (const val):bfd_signed_vma;cdecl; external BFD_LIB_NAME;
+procedure bfd_putb64(vma: bfd_vma; var val);cdecl; external BFD_LIB_NAME;
+procedure bfd_putl64(vma: bfd_vma; var val);cdecl; external BFD_LIB_NAME;
+procedure bfd_putb32(vma: bfd_vma; var val);cdecl; external BFD_LIB_NAME;
+procedure bfd_putl32(vma: bfd_vma; var val);cdecl; external BFD_LIB_NAME;
+procedure bfd_putb16(vma: bfd_vma; var val);cdecl; external BFD_LIB_NAME;
+procedure bfd_putl16(vma: bfd_vma; var val);cdecl; external BFD_LIB_NAME;
+
+(* Byte swapping routines which take size and endiannes as arguments.  *)
+
+function  bfd_get_bits (a: Pbfd_byte; b:integer; c: bfd_boolean): bfd_vma;cdecl; external BFD_LIB_NAME;
+procedure bfd_put_bits (a: bfd_vma; b:Pbfd_byte; c:integer; d:bfd_boolean);cdecl; external BFD_LIB_NAME;
+
+(* Externally visible ECOFF routines.  *)
+
+type
+  Pecoff_debug_info  = pointer;
+  Pecoff_debug_swap  = pointer;
+
+function bfd_ecoff_get_gp_value(abfd: PBFD ):bfd_vma;cdecl; external BFD_LIB_NAME;
+function bfd_ecoff_set_gp_value(abfd: PBFD; gp_value: bfd_vma):bfd_boolean ;cdecl; external BFD_LIB_NAME;
+function bfd_ecoff_set_regmasks(abfd: PBFD; gprmask: LongWord; fprmask: LongWord;cprmask: PLongWord):bfd_boolean;cdecl; external BFD_LIB_NAME;
+function bfd_ecoff_debug_init(output_bfd: PBFD; output_debug: Pecoff_debug_info; output_swap: Pecoff_debug_swap; li: Pbfd_link_info):pointer;cdecl; external BFD_LIB_NAME;
+procedure bfd_ecoff_debug_free(handle: pointer; output_bfd: PBFD; output_debug: Pecoff_debug_info; output_swap: Pecoff_debug_swap;li: Pbfd_link_info);cdecl; external BFD_LIB_NAME;
+function bfd_ecoff_debug_accumulate(
+           handle: pointer; output_bfd: PBFD; output_debug: Pecoff_debug_info;
+           output_swap: Pecoff_debug_swap;
+           input_bfd: PBFD; input_debug: Pecoff_debug_info;
+           input_swap: Pecoff_debug_swap;
+           li: Pbfd_link_info):bfd_boolean ;cdecl; external BFD_LIB_NAME;
+
+(*todo: function bfd_ecoff_debug_accumulate_other(
+           pointer handle;
+           PBFD output_bfd;
+           Pecoff_debug_info output_debug;
+           Pecoff_debug_swap output_swap;
+           PBFD input_bfd;
+           li: Pbfd_link_info
+           ):bfd_boolean ;cdecl; external BFD_LIB_NAME;
+*)
+
+(*todo: function bfd_ecoff_debug_externals(
+           PBFD abfd;
+           Pecoff_debug_info debug;
+           Pecoff_debug_swap swap;
+           bfd_boolean relocateable;
+           bfd_boolean ( *get_extr) (struct symbol_cache_entry *;
+                                struct ecoff_extr * );
+           void ( *set_index) (struct symbol_cache_entry *;
+                              bfd_size_type)
+           ):bfd_boolean ;cdecl; external BFD_LIB_NAME;
+*)
+
+(*todo: function bfd_ecoff_debug_one_external(
+           PBFD abfd,
+           Pecoff_debug_info debug,
+           Pecoff_debug_swap swap,
+           const ShortInt *name,
+           struct ecoff_extr *esym
+           ):bfd_boolean ;cdecl; external BFD_LIB_NAME;
+*)
+
+(*todo: function bfd_ecoff_debug_size(
+           PBFD abfd,
+           Pecoff_debug_info debug,
+           Pecoff_debug_swap swap
+           ):bfd_size_type;cdecl; external BFD_LIB_NAME;
+*)
+
+(*todo: function bfd_ecoff_write_debug(
+           PBFD abfd,
+           Pecoff_debug_info debug,
+           Pecoff_debug_swap swap,
+           file_ptr where
+           ):bfd_boolean;cdecl; external BFD_LIB_NAME;
+*)
+
+(*todo: function bfd_ecoff_write_accumulated_debug(
+           pointer handle,
+           PBFD abfd,
+           Pecoff_debug_info debug,
+           Pecoff_debug_swap swa,
+           struct bfd_link_info *info, file_ptr where)
+           ):bfd_boolean;cdecl; external BFD_LIB_NAME;
+*)
+
+(*todo: function bfd_mips_ecoff_create_embedded_relocs(
+           PBFD ,
+           struct bfd_link_info *,
+           struct sec *,
+           struct sec *,
+           pchar*
+           ):bfd_boolean;cdecl; external BFD_LIB_NAME;
+*)
+
+(* Externally visible ELF routines.  *)
+
+//todo:function bfd_elf32_record_link_assignment(PBFD ; struct bfd_link_info *; const pchar; bfd_boolean):bfd_boolean;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_elf64_record_link_assignment(PBFD ; struct bfd_link_info *; const pchar; bfd_boolean):bfd_boolean;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_link_needed_list *bfd_elf_get_needed_list(PBFD ; struct bfd_link_info *):struct;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_elf_get_bfd_needed_list(PBFD ; struct bfd_link_needed_list **):bfd_boolean;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_elf32_size_dynamic_sections (PBFD ; const pchar; const pchar; bfd_boolean; const pchar;      const pchar const *; struct bfd_link_info *; struct sec **;     struct bfd_elf_version_tree *):bfd_boolean;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_elf64_size_dynamic_sections (PBFD ; const pchar; const pchar; bfd_boolean; const pchar;      const pchar const *; struct bfd_link_info *; struct sec **;     struct bfd_elf_version_tree *):bfd_boolean;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_elf_set_dt_needed_name(PBFD ; const pchar):void;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_elf_set_dt_needed_soname(PBFD ; const pchar):void;cdecl; external BFD_LIB_NAME;
+//todo:function const ShortInt *bfd_elf_get_dt_soname (PBFD );cdecl; external BFD_LIB_NAME;
+//todo:function struct bfd_link_needed_list *bfd_elf_get_runpath_list (PBFD ; struct bfd_link_info *);cdecl; external BFD_LIB_NAME;
+
+(* Return an upper bound on the number of bytes required to store a
+   copy of ABFD's program header table entries.  Return -1 if an error
+   occurs; bfd_get_error will return an appropriate code.  *)
+//todo:function bfd_get_elf_phdr_upper_bound(PBFD abfd):LongInt;cdecl; external BFD_LIB_NAME;
+
+(* Copy ABFD's program header table entries to *PHDRS.  The entries
+   will be stored as an array of Elf_Internal_Phdr structures, as
+   defined in include/elf/internal.h.  To find out how large the
+   buffer needs to be, call bfd_get_elf_phdr_upper_bound.
+
+   Return the number of program header table entries read, or -1 if an
+   error occurs; bfd_get_error will return an appropriate code.  *)
+//todo:function bfd_get_elf_phdrs(PBFD abfd, void *phdrs):integer;cdecl; external BFD_LIB_NAME;
+
+(* Return the arch_size field of an elf bfd, or -1 if not elf.  *)
+//todo:function bfd_get_arch_size(PBFD  ):integer;cdecl; external BFD_LIB_NAME;
+
+(* Return true if address "naturally" sign extends, or -1 if not elf.  *)
+//todo:function bfd_get_sign_extend_vma(PBFD  ):integer;cdecl; external BFD_LIB_NAME;
+
+//todo:function bfd_m68k_elf32_create_embedded_relocs(PBFD , struct bfd_link_info *, struct sec *, struct sec *,           pchar*):bfd_boolean;cdecl; external BFD_LIB_NAME;
+
+(* SunOS shared library support routines for the linker.  *)
+
+//todo:function *bfd_sunos_get_needed_list(PBFD , struct bfd_link_info *):bfd_link_needed_list;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_sunos_record_link_assignment(PBFD , struct bfd_link_info *, const pchar):bfd_boolean;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_sunos_size_dynamic_sections (PBFD , struct bfd_link_info *, struct sec **, struct sec **, struct sec **):bfd_boolean;cdecl; external BFD_LIB_NAME;
+
+(* Linux shared library support routines for the linker.  *)
+
+//todo:function bfd_i386linux_size_dynamic_sections(PBFD , struct bfd_link_info *):bfd_boolean;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_m68klinux_size_dynamic_sections(PBFD , struct bfd_link_info *):bfd_boolean;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_sparclinux_size_dynamic_sections(PBFD , struct bfd_link_info *):bfd_boolean;cdecl; external BFD_LIB_NAME;
+
+//todo:function bfd_init_window(bfd_window *):void;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_free_window(bfd_window *):void;cdecl; external BFD_LIB_NAME;
+//todo:function bfd_get_file_window(PBFD , file_ptr, bfd_size_type, bfd_window *, bfd_boolean):bfd_boolean;cdecl; external BFD_LIB_NAME;
+
+(* XCOFF support routines for the linker.  *)
+//todo:function bfd_boolean bfd_xcoff_link_record_set (PBFD , struct bfd_link_info *, struct bfd_link_hash_entry *,        bfd_size_type));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_xcoff_import_symbol (PBFD , struct bfd_link_info *, struct bfd_link_hash_entry *,          bfd_vma, const pchar, const pchar, const pchar));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_xcoff_export_symbol  (PBFD , struct bfd_link_info *, struct bfd_link_hash_entry *,         bfd_boolean));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_xcoff_link_count_reloc  (PBFD , struct bfd_link_info *, const pchar));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_xcoff_record_link_assignment  (PBFD , struct bfd_link_info *, const pchar));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_xcoff_size_dynamic_sections  (PBFD , struct bfd_link_info *, const pchar, const pchar,     LongWord, LongWord, LongWord, bfd_boolean,      integer, bfd_boolean, bfd_boolean, struct sec **));cdecl; external BFD_LIB_NAME;
+
+(* Externally visible COFF routines.  *)
+
+//todo:function bfd_boolean bfd_coff_get_syment (PBFD , struct symbol_cache_entry *, struct internal_syment *));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_coff_get_auxent (PBFD , struct symbol_cache_entry *, integer, union internal_auxent *));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_coff_set_symbol_class (PBFD , struct symbol_cache_entry *, LongWord));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_m68k_coff_create_embedded_relocs (PBFD , struct bfd_link_info *, struct sec *, struct sec *,       pchar*));cdecl; external BFD_LIB_NAME;
+
+(* ARM Interworking support.  Called from linker.  *)
+//todo:function bfd_boolean bfd_arm_allocate_interworking_sections (struct bfd_link_info *));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_arm_process_before_allocation (PBFD , struct bfd_link_info *, integer));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_arm_get_bfd_for_interworking  (PBFD , struct bfd_link_info *));cdecl; external BFD_LIB_NAME;
+
+(* PE ARM Interworking support.  Called from linker.  *)
+//todo:function bfd_boolean bfd_arm_pe_allocate_interworking_sections  (struct bfd_link_info *));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_arm_pe_process_before_allocation (PBFD , struct bfd_link_info *, integer));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_arm_pe_get_bfd_for_interworking   (PBFD , struct bfd_link_info *));cdecl; external BFD_LIB_NAME;
+
+(* ELF ARM Interworking support.  Called from linker.  *)
+//todo:function bfd_boolean bfd_elf32_arm_allocate_interworking_sections  (struct bfd_link_info *));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_elf32_arm_process_before_allocation  (PBFD , struct bfd_link_info *, integer));cdecl; external BFD_LIB_NAME;
+//todo:function bfd_boolean bfd_elf32_arm_get_bfd_for_interworking (PBFD , struct bfd_link_info *));cdecl; external BFD_LIB_NAME;
+
+(* TI COFF load page support.  *)
+//todo:function void bfd_ticoff_set_section_load_page (struct sec *, integer));cdecl; external BFD_LIB_NAME;
+//todo:function integer bfd_ticoff_get_section_load_page  (struct sec *));cdecl; external BFD_LIB_NAME;
+
+(* And more from the source.  *)
+procedure bfd_init;cdecl; external BFD_LIB_NAME;
+function bfd_openr( filename: pchar ;  target: pchar ):PBFD;cdecl; external BFD_LIB_NAME;
+function bfd_fdopenr( filename: pchar ;  target: pchar ; fd: integer):PBFD;cdecl; external BFD_LIB_NAME;
+function bfd_openstreamr(a: pchar; b: pchar; c: pointer):PBFD;cdecl; external BFD_LIB_NAME;
+function bfd_openw( filename: pchar ;  target: pchar):PBFD;cdecl; external BFD_LIB_NAME;
+function bfd_close(abfd: PBFD):bfd_boolean;cdecl; external BFD_LIB_NAME;
+function bfd_close_all_done(abfd: PBFD  ):bfd_boolean;cdecl; external BFD_LIB_NAME;
+function bfd_create( filename: pchar ; templ: PBFD):PBFD;cdecl; external BFD_LIB_NAME;
+function bfd_make_writable(abfd: PBFD ):bfd_boolean;cdecl; external BFD_LIB_NAME;
+function bfd_make_readable(abfd: PBFD ):bfd_boolean;cdecl; external BFD_LIB_NAME;
+
+(* General purpose part of a symbol X;
+   target specific parts are in libcoff.h, libaout.h, etc.  *)
+
+//todo:#define bfd_get_section(x) ((x)->section)
+//todo:#define bfd_get_output_section(x) ((x)->section->output_section)
+//todo:#define bfd_set_section(x,y) ((x)->section) = (y)
+//todo:#define bfd_asymbol_base(x) ((x)->section->vma)
+//todo:#define bfd_asymbol_value(x) (bfd_asymbol_base(x) + (x)->value)
+//todo:#define bfd_asymbol_name(x) ((x)->name)
+(*Perhaps future: #define bfd_asymbol_bfd(x) ((x)->section->owner)*)
+//todo:#define bfd_asymbol_bfd(x) ((x)->the_bfd)
+//todo:#define bfd_asymbol_flavour(x) (bfd_asymbol_bfd(x)->xvec->flavour)
+
+//todo:#define  align_power(addr, align) ((addr) + ((1<<(align))-1)) & (-1 << (align)))
+//todo:#define bfd_get_section_name(bfd, ptr) ((ptr)->name + 0)
+//todo:#define bfd_get_section_vma(bfd, ptr) ((ptr)->vma + 0)
+//todo:#define bfd_get_section_alignment(bfd, ptr) ((ptr)->alignment_power + 0)
+//todo:#define bfd_section_name(bfd, ptr) ((ptr)->name)
+//todo:#define bfd_section_size(bfd, ptr) (bfd_get_section_size_before_reloc(ptr))
+//todo:#define bfd_section_vma(bfd, ptr) ((ptr)->vma)
+//todo:#define bfd_section_lma(bfd, ptr) ((ptr)->lma)
+//todo:#define bfd_section_alignment(bfd, ptr) ((ptr)->alignment_power)
+//todo:#define bfd_get_section_flags(bfd, ptr) ((ptr)->flags + 0)
+//todo:#define bfd_get_section_userdata(bfd, ptr) ((ptr)->userdata)
+//todo:#define bfd_is_com_section(ptr) (((ptr)->flags & SEC_IS_COMMON) != 0)
+//todo:#define bfd_set_section_vma(bfd, ptr, val) (((ptr)->vma = (ptr)->lma= (val)), ((ptr)->user_set_vma = (bfd_boolean)true), true)
+//todo:#define bfd_set_section_alignment(bfd, ptr, val) (((ptr)->alignment_power = (val)),true)
+//todo:#define bfd_set_section_userdata(bfd, ptr, val) (((ptr)->userdata = (val)),true)
+//todo:#define bfd_mach_sparc_v9_p(mach) ((mach) >= bfd_mach_sparc_v8plus && (mach) <= bfd_mach_sparc_v9b && (mach) != bfd_mach_sparc_sparclite_le)
+//todo:#define bfd_get_elt_at_index(b,i) BFD_SEND(b, _bfd_get_elt_at_index, (b,i))
+//todo:#define bfd_print_symbol(b,p,s,e) BFD_SEND(b, _bfd_print_symbol, (b,p,s,e))
+//todo:#define bfd_get_symbol_info(b,p,e) BFD_SEND(b, _bfd_get_symbol_info, (b,p,e))
+//todo:#define bfd_read_minisymbols(b, d, m, s)   BFD_SEND (b, _read_minisymbols, (b, d, m, s))
+//todo:#define bfd_minisymbol_to_symbol(b, d, m, f)   BFD_SEND (b, _minisymbol_to_symbol, (b, d, m, f))
+//todo:#define COFF_SWAP_TABLE (pointer) &bfd_coff_std_swap_table
+//todo:#define bfd_get_cacheable(abfd) ((abfd)->cacheable)
+//todo:#define bfd_get_format(abfd) ((abfd)->format)
+//todo:#define bfd_get_target(abfd) ((abfd)->xvec->name)
+//todo:#define bfd_get_flavour(abfd) ((abfd)->xvec->flavour)
+//todo:#define bfd_family_coff(abfd) (bfd_get_flavour (abfd) == bfd_target_coff_flavour || bfd_get_flavour (abfd) == bfd_target_xcoff_flavour)
+//todo:#define bfd_big_endian(abfd) ((abfd)->xvec->byteorder == BFD_ENDIAN_BIG)
+//todo:#define bfd_little_endian(abfd) ((abfd)->xvec->byteorder == BFD_ENDIAN_LITTLE)
+//todo:#define bfd_header_big_endian(abfd) ((abfd)->xvec->header_byteorder == BFD_ENDIAN_BIG)
+//todo:#define bfd_header_little_endian(abfd) ((abfd)->xvec->header_byteorder == BFD_ENDIAN_LITTLE)
+//todo:#define bfd_get_file_flags(abfd) ((abfd)->flags)
+//todo:#define bfd_applicable_file_flags(abfd) ((abfd)->xvec->object_flags)
+//todo:#define bfd_applicable_section_flags(abfd) ((abfd)->xvec->section_flags)
+//todo:#define bfd_my_archive(abfd) ((abfd)->my_archive)
+//todo:#define bfd_has_map(abfd) ((abfd)->has_armap)
+//todo:#define bfd_valid_reloc_types(abfd) ((abfd)->xvec->valid_reloc_types)
+//todo:#define bfd_usrdata(abfd) ((abfd)->usrdata)
+//todo:#define bfd_get_start_address(abfd) ((abfd)->start_address)
+//todo:#define bfd_get_symcount(abfd) ((abfd)->symcount)
+//todo:#define bfd_get_outsymbols(abfd) ((abfd)->outsymbols)
+//todo:#define bfd_count_sections(abfd) ((abfd)->section_count)
+//todo:#define bfd_get_symbol_leading_char(abfd) ((abfd)->xvec->symbol_leading_char)
+//todo:#define bfd_set_cacheable(abfd,bool) (((abfd)->cacheable = (bfd_boolean) (bool)), true)
+//todo:#define bfd_put_8(abfd, val, ptr)  ((void) (*((byte * ) (ptr)) = (Byte) (val)))
+//todo:#define bfd_put_signed_8  bfd_put_8
+//todo:#define bfd_get_8(abfd, ptr)  ( *(Byte * ) (ptr))
+//todo:#define bfd_get_signed_8(abfd, ptr)  (( *(byte * ) (ptr) ^ $80) - $80)
+
+//todo:#define bfd_put_16(abfd, val, ptr)  BFD_SEND(abfd, bfd_putx16, ((val),(ptr)))
+//todo:#define bfd_put_signed_16  bfd_put_16
+//todo:#define bfd_get_16(abfd, ptr)   BFD_SEND(abfd, bfd_getx16, (ptr))
+//todo:#define bfd_get_signed_16(abfd, ptr)  BFD_SEND (abfd, bfd_getx_signed_16, (ptr))
+
+//todo:#define bfd_put_32(abfd, val, ptr)    BFD_SEND(abfd, bfd_putx32, ((val),(ptr)))
+//todo:#define bfd_put_signed_32             bfd_put_32
+//todo:#define bfd_get_32(abfd, ptr)         BFD_SEND(abfd, bfd_getx32, (ptr))
+//todo:#define bfd_get_signed_32(abfd, ptr)  BFD_SEND(abfd, bfd_getx_signed_32, (ptr))
+
+//todo:#define bfd_put_64(abfd, val, ptr)   BFD_SEND(abfd, bfd_putx64, ((val), (ptr)))
+//todo:#define bfd_put_signed_64            bfd_put_64
+//todo:#define bfd_get_64(abfd, ptr)        BFD_SEND(abfd, bfd_getx64, (ptr))
+//todo:#define bfd_get_signed_64(abfd, ptr) BFD_SEND(abfd, bfd_getx_signed_64, (ptr))
+
+//todo:#define bfd_get(bits, abfd, ptr) ((bits) == 8 ? bfd_get_8 (abfd, ptr) : (bits) == 16 ? bfd_get_16 (abfd, ptr) : (bits) == 32 ? bfd_get_32 (abfd, ptr) : (bits) == 64 ? bfd_get_64 (abfd, ptr) : (abort (), (bfd_vma) - 1))
+//todo:#define bfd_put(bits, abfd, val, ptr) ((bits) == 8 ? bfd_put_8 (abfd, val, ptr) : (bits) == 16 ? bfd_put_16 (abfd, val, ptr) : (bits) == 32 ? bfd_put_32 (abfd, val, ptr) : (bits) == 64 ? bfd_put_64 (abfd, val, ptr) : (abort (), (void) 0))
+
+(* Byte swapping macros for file header data.  *)
+
+//todo:#define bfd_h_put_8(abfd, val, ptr)    bfd_put_8 (abfd, val, ptr)
+//todo:#define bfd_h_put_signed_8(abfd, val, ptr) bfd_put_8 (abfd, val, ptr)
+//todo:#define bfd_h_get_8(abfd, ptr)         bfd_get_8 (abfd, ptr)
+//todo:#define bfd_h_get_signed_8(abfd, ptr)  bfd_get_signed_8 (abfd, ptr)
+
+//todo:#define bfd_h_put_16(abfd, val, ptr)  BFD_SEND(abfd, bfd_h_putx16,(val,ptr))
+//todo:#define bfd_h_put_signed_16           bfd_h_put_16
+//todo:#define bfd_h_get_16(abfd, ptr)       BFD_SEND(abfd, bfd_h_getx16,(ptr))
+//todo:#define bfd_h_get_signed_16(abfd, ptr) BFD_SEND(abfd, bfd_h_getx_signed_16, (ptr))
+
+//todo:#define bfd_h_put_32(abfd, val, ptr)  BFD_SEND(abfd, bfd_h_putx32,(val,ptr))
+//todo:#define bfd_h_put_signed_32           bfd_h_put_32
+//todo:#define bfd_h_get_32(abfd, ptr)       BFD_SEND(abfd, bfd_h_getx32,(ptr))
+//todo:#define bfd_h_get_signed_32(abfd, ptr) BFD_SEND(abfd, bfd_h_getx_signed_32, (ptr))
+
+//todo:#define bfd_h_put_64(abfd, val, ptr) BFD_SEND(abfd, bfd_h_putx64,(val, ptr))
+//todo:#define bfd_h_put_signed_64          bfd_h_put_64
+//todo:#define bfd_h_get_64(abfd, ptr)      BFD_SEND(abfd, bfd_h_getx64,(ptr))
+//todo:#define bfd_h_get_signed_64(abfd, ptr) BFD_SEND(abfd, bfd_h_getx_signed_64, (ptr))
+
+(* These sections are global, and are managed by BFD.  The application
+   and target back end are not permitted to change the values in
+   these sections.  New code should use the section_ptr macros rather
+   than referring directly to the const sections.  The const sections
+   may eventually vanish.  *)
+const
+  BFD_ABS_SECTION_NAME = '*ABS*';
+  BFD_UND_SECTION_NAME = '*UND*';
+  BFD_COM_SECTION_NAME = '*COM*';
+  BFD_IND_SECTION_NAME = '*IND*';
+
+(* the absolute section *)
+//todo:_BFD_IMPORT function const asection bfd_abs_section;
+//todo:#define bfd_abs_section_ptr ((asection *) &bfd_abs_section)
+//todo:#define bfd_is_abs_section(sec) ((sec) == bfd_abs_section_ptr)
+(* Pointer to the undefined section *)
+//todo:_BFD_IMPORT function const asection bfd_und_section;
+//todo:#define bfd_und_section_ptr ((asection *) &bfd_und_section)
+//todo:#define bfd_is_und_section(sec) ((sec) == bfd_und_section_ptr)
+(* Pointer to the common section *)
+//todo:_BFD_IMPORT function const asection bfd_com_section;
+//todo:#define bfd_com_section_ptr ((asection *) &bfd_com_section)
+(* Pointer to the indirect section *)
+//todo:_BFD_IMPORT function const asection bfd_ind_section;
+//todo:#define bfd_ind_section_ptr ((asection *) &bfd_ind_section)
+//todo:#define bfd_is_ind_section(sec) ((sec) == bfd_ind_section_ptr)
+
+//todo:function const struct symbol_cache_entry * const bfd_abs_symbol;
+//todo:function const struct symbol_cache_entry * const bfd_com_symbol;
+//todo:function const struct symbol_cache_entry * const bfd_und_symbol;
+//todo:function const struct symbol_cache_entry * const bfd_ind_symbol;
+//todo:#define bfd_get_section_size_before_reloc(section) ((section)->reloc_done ? (abort (), (bfd_size_type) 1) : (section)->_raw_size)
+//todo:#define bfd_get_section_size_after_reloc(section)    ((section)->reloc_done ? (section)->_cooked_size : (abort (), (bfd_size_type) 1))
+//todo:asection * bfd_get_section_by_name (PBFD abfd, const ShortInt *name));
+
+//todo:pchar bfd_get_unique_section_name (PBFD abfd, const ShortInt *templat,  integer *count));
+
+//todo:asection * bfd_make_section_old_way (PBFD abfd, const ShortInt *name));
+
+//todo:asection * bfd_make_section_anyway (PBFD abfd, const ShortInt *name));
+
+//todo:asection * bfd_make_section (PBFD , const ShortInt *name));
+
+//todo:bfd_boolean bfd_set_section_flags (PBFD abfd, asection *sec, flagword flags));
+
+type
+  bfd_map_over_sections_proc = procedure( abfd: PBFD; sect: Pasection; obj: pointer ); cdecl;
+
+procedure bfd_map_over_sections( abfd: PBFD; func: bfd_map_over_sections_proc; obj: pointer ); cdecl; external BFD_LIB_NAME;
+
+//todo:bfd_boolean bfd_set_section_size (PBFD abfd, asection *sec, bfd_size_type val));
+
+//todo:bfd_boolean bfd_set_section_contents (PBFD abfd, asection *section, pointer data, file_ptr offset,  bfd_size_type count));
+
+function bfd_get_section_contents(abfd: PBFD; section: Pasection; location: pointer; offset: file_ptr; count: bfd_size_type): bfd_boolean; cdecl; external BFD_LIB_NAME;
+
+//todo:bfd_boolean bfd_copy_private_section_data (PBFD ibfd, asection *isec, PBFD obfd, asection *osec));
+
+//todo:#define bfd_copy_private_section_data(ibfd, isection, obfd, osection)   BFD_SEND (obfd, _bfd_copy_private_section_data,   (ibfd, isection, obfd, osection))
+//todo:void _bfd_strip_section_from_output (struct bfd_link_info *info, asection *section));
+
+
+//todo:const pchar bfd_printable_name (PBFD abfd));
+
+//todo:const bfd_arch_info_type * bfd_scan_arch (const ShortInt *string));
+
+//todo:const pchar* bfd_arch_list (void));
+
+//todo:const bfd_arch_info_type * bfd_arch_get_compatible ( const PBFD abfd, const PBFD bbfd));
+
+//todo:void bfd_set_arch_info (PBFD abfd, const bfd_arch_info_type *arg));
+
+function bfd_get_arch( abfd: PBFD ): bfd_architecture; cdecl; external BFD_LIB_NAME;
+
+function bfd_get_mach( abfd: PBFD ): LongWord; cdecl; external BFD_LIB_NAME;
+
+//todo:LongWord bfd_arch_bits_per_byte (PBFD abfd));
+
+//todo:LongWord bfd_arch_bits_per_address (PBFD abfd));
+
+//todo:const bfd_arch_info_type * bfd_get_arch_info (PBFD abfd));
+
+//todo:const bfd_arch_info_type * bfd_lookup_arch  (enum bfd_architecture arch, LongWord machine));
+
+function bfd_printable_arch_mach(arch: bfd_architecture; machine: LongWord): pchar; cdecl; external BFD_LIB_NAME;
+
+//todo:LongWord bfd_octets_per_byte (PBFD abfd));
+//todo:LongWord bfd_arch_mach_octets_per_byte (enum bfd_architecture arch, LongWord machine));
+
+//todo:#define HOWTO(C, R,S,B, P, BI, O, SF, NAME, INPLACE, MASKSRC, MASKDST, PC)  {(unsigned)C,R,S,B, P, BI, O,SF,NAME,INPLACE,MASKSRC,MASKDST,PC}
+//todo:#define NEWHOWTO( FUNCTION, NAME,SIZE,REL,IN) HOWTO(0,0,SIZE,0,REL,0,complain_overflow_dont,FUNCTION, NAME,false,0,0,IN)
+//todo:#define EMPTY_HOWTO(C) HOWTO((C),0,0,0,false,0,complain_overflow_dont,NULL,NULL,false,0,0,false)
+
+//Todo:#define HOWTO_PREPARE(relocation, symbol){ if (symbol != (asymbol * )NULL) { if (bfd_is_com_section (symbol->section)) {relocation = 0;}else{ relocation = symbol->value;}}}
+
+//todo:LongWord bfd_get_reloc_size  (reloc_howto_type *));
+
+{todo:
+  relent_chain = record
+    arelent relent;
+    struct relent_chain *next;
+  end;
+  arelent_chain = relent_chaing;
+}
+
+//todo:bfd_reloc_status_type bfd_check_overflow (enum complain_overflow how, LongWord bitsize, LongWord rightshift, LongWord addrsize,  bfd_vma relocation));
+
+//todo:bfd_reloc_status_type bfd_perform_relocation (PBFD abfd,  arelent *reloc_entry, pointer data, asection *input_section, PBFD output_bfd, pchar*error_message));
+
+//todo:bfd_reloc_status_type bfd_install_relocation (PBFD abfd, arelent *reloc_entry, pointer data, bfd_vma data_start, asection *input_section,  pchar*error_message));
+
+//todo:typedef enum bfd_reloc_code_real bfd_reloc_code_real_type;
+
+//todo:reloc_howto_type * bfd_reloc_type_lookup  (PBFD abfd, bfd_reloc_code_real_type code));
+
+//todo:const pchar bfd_get_reloc_code_name  (bfd_reloc_code_real_type code));
+
+//todo:#define bfd_get_symtab_upper_bound(abfd)  BFD_SEND (abfd, _bfd_get_symtab_upper_bound, (abfd))
+//todo:bfd_boolean bfd_is_local_label (PBFD abfd, asymbol *sym));
+
+//todo:bfd_boolean bfd_is_local_label_name (PBFD abfd, const ShortInt *name));
+
+//todo:#define bfd_is_local_label_name(abfd, name)  BFD_SEND (abfd, _bfd_is_local_label_name, (abfd, name))
+//todo:#define bfd_canonicalize_symtab(abfd, location) BFD_SEND (abfd, _bfd_canonicalize_symtab, (abfd, location))
+//todo:bfd_boolean bfd_set_symtab  (PBFD abfd, asymbol **location, LongWord count));
+
+//todo:void bfd_print_symbol_vandf (pointer file, asymbol *symbol));
+
+//todo:#define bfd_make_empty_symbol(abfd)  BFD_SEND (abfd, _bfd_make_empty_symbol, (abfd))
+//todo:#define bfd_make_debug_symbol(abfd,ptr,size) BFD_SEND (abfd, _bfd_make_debug_symbol, (abfd, ptr, size))
+//todo:integer bfd_decode_symclass (asymbol *symbol));
+
+//todo:bfd_boolean bfd_is_undefined_symclass  (integer symclass));
+
+//todo:void bfd_symbol_info (asymbol *symbol, symbol_info *ret));
+
+//todo:bfd_boolean bfd_copy_private_symbol_data (PBFD ibfd, asymbol *isym, PBFD obfd, asymbol *osym));
+
+//todo:#define bfd_copy_private_symbol_data(ibfd, isymbol, obfd, osymbol)  BFD_SEND (obfd, _bfd_copy_private_symbol_data, (ibfd, isymbol, obfd, osymbol))
+
+
+function bfd_get_error: bfd_error; cdecl; external BFD_LIB_NAME;
+
+//todo:void bfd_set_error  (bfd_error error_tag));
+
+function bfd_errmsg( error_tag: bfd_error ): pchar; cdecl; external BFD_LIB_NAME;
+
+//todo:void bfd_perror  ( ShortInt *message));
+
+type
+  bfd_error_handler_type = procedure( a: pchar { VARARGS! } ); cdecl;
+
+function bfd_set_error_handler( handler: bfd_error_handler_type ):bfd_error_handler_type; cdecl; external BFD_LIB_NAME;
+
+//todo:void bfd_set_error_program_name  (const pchar));
+
+//todo:bfd_error_handler_type bfd_get_error_handler  (void));
+
+//todo:LongInt bfd_get_reloc_upper_bound (PBFD abfd, asection *sect));
+
+//todo:LongInt bfd_canonicalize_reloc (PBFD abfd, asection *sec, arelent **loc, asymbol **syms));
+
+//todo:void bfd_set_reloc (PBFD abfd, asection *sec, arelent **rel, LongWord count) );
+
+//todo:bfd_boolean bfd_set_file_flags (PBFD abfd, flagword flags));
+
+//todo:integer bfd_get_arch_size  (PBFD abfd));
+
+//todo:integer bfd_get_sign_extend_vma  (PBFD abfd));
+
+//todo:bfd_boolean bfd_set_start_address (PBFD abfd, bfd_vma vma));
+
+//todo:LongInt bfd_get_mtime (PBFD abfd));
+
+//todo:LongInt bfd_get_size (PBFD abfd));
+
+//todo:integer bfd_get_gp_size (PBFD abfd));
+
+//todo:void bfd_set_gp_size (PBFD abfd, integer i));
+
+//todo:bfd_vma bfd_scan_vma ( ShortInt *string,  pchar*end, integer base));
+
+//todo:bfd_boolean bfd_copy_private_bfd_data (PBFD ibfd, PBFD obfd));
+
+//todo: #define bfd_copy_private_bfd_data(ibfd, obfd)      BFD_SEND (obfd, _bfd_copy_private_bfd_data,                (ibfd, obfd))
+//todo:bfd_boolean bfd_merge_private_bfd_data (PBFD ibfd, PBFD obfd));
+
+//todo:#define bfd_merge_private_bfd_data(ibfd, obfd)   BFD_SEND (obfd, _bfd_merge_private_bfd_data,(ibfd, obfd))
+//todo:bfd_boolean bfd_set_private_flags (PBFD abfd, flagword flags));
+
+//todo:#define bfd_set_private_flags(abfd, flags) BFD_SEND (abfd, _bfd_set_private_flags, (abfd, flags))
+//todo:#define bfd_sizeof_headers(abfd, reloc)  BFD_SEND (abfd, _bfd_sizeof_headers, (abfd, reloc))
+
+//todo:#define bfd_find_nearest_line(abfd, sec, syms, off, file, func, line) BFD_SEND (abfd, _bfd_find_nearest_line,  (abfd, sec, syms, off, file, func, line))
+
+       (* Do these three do anything useful at all, for any back end?  *)
+//todo:#define bfd_debug_info_start(abfd)       BFD_SEND (abfd, _bfd_debug_info_start, (abfd))
+
+//todo:#define bfd_debug_info_end(abfd)         BFD_SEND (abfd, _bfd_debug_info_end, (abfd))
+
+//todo:#define bfd_debug_info_accumulate(abfd, section)         BFD_SEND (abfd, _bfd_debug_info_accumulate, (abfd, section))
+
+
+//todo:#define bfd_stat_arch_elt(abfd, stat)       BFD_SEND (abfd, _bfd_stat_arch_elt,(abfd, stat))
+
+//todo:#define bfd_update_armap_timestamp(abfd)    BFD_SEND (abfd, _bfd_update_armap_timestamp, (abfd))
+
+//todo:#define bfd_set_arch_mach(abfd, arch, mach) BFD_SEND ( abfd, _bfd_set_arch_mach, (abfd, arch, mach))
+
+//todo:#define bfd_relax_section(abfd, section, link_info, again)        BFD_SEND (abfd, _bfd_relax_section, (abfd, section, link_info, again))
+
+//todo:#define bfd_gc_sections(abfd, link_info)    BFD_SEND (abfd, _bfd_gc_sections, (abfd, link_info))
+
+//todo:#define bfd_link_hash_table_create(abfd)    BFD_SEND (abfd, _bfd_link_hash_table_create, (abfd))
+
+//todo:#define bfd_link_add_symbols(abfd, info)    BFD_SEND (abfd, _bfd_link_add_symbols, (abfd, info))
+
+//todo:#define bfd_final_link(abfd, info)          BFD_SEND (abfd, _bfd_final_link, (abfd, info))
+
+//todo:#define bfd_free_cached_info(abfd)          BFD_SEND (abfd, _bfd_free_cached_info, (abfd))
+
+//todo:#define bfd_get_dynamic_symtab_upper_bound(abfd) BFD_SEND (abfd, _bfd_get_dynamic_symtab_upper_bound, (abfd))
+
+//todo:#define bfd_print_private_bfd_data(abfd, file)   BFD_SEND (abfd, _bfd_print_private_bfd_data, (abfd, file))
+
+//todo:#define bfd_canonicalize_dynamic_symtab(abfd, asymbols) BFD_SEND (abfd, _bfd_canonicalize_dynamic_symtab, (abfd, asymbols))
+
+//todo:#define bfd_get_dynamic_reloc_upper_bound(abfd)         BFD_SEND (abfd, _bfd_get_dynamic_reloc_upper_bound, (abfd))
+
+//todo:#define bfd_canonicalize_dynamic_reloc(abfd, arels, asyms) BFD_SEND (abfd, _bfd_canonicalize_dynamic_reloc, (abfd, arels, asyms))
+
+//todo:function Pbfd_byte bfd_get_relocated_section_contents (PBFD , struct bfd_link_info *, struct bfd_link_order *, Pbfd_byte , bfd_boolean, asymbol **));cdecl; external BFD_LIB_NAME;
+//todo:symindex bfd_get_next_mapent (PBFD abfd, symindex previous, carsym **sym));cdecl; external BFD_LIB_NAME;
+//todo:bfd_boolean bfd_set_archive_head (PBFD output, PBFD new_head));cdecl; external BFD_LIB_NAME;
+//todo:PBFD bfd_openr_next_archived_file (PBFD archive, PBFD previous));cdecl; external BFD_LIB_NAME;
+//todo:pchar bfd_core_file_failing_command (PBFD abfd));cdecl; external BFD_LIB_NAME;
+//todo:integer bfd_core_file_failing_signal (PBFD abfd));cdecl; external BFD_LIB_NAME;
+//todo:bfd_boolean core_file_matches_executable_p (PBFD core_bfd, PBFD exec_bfd));cdecl; external BFD_LIB_NAME;
+
+//todo:#define BFD_SEND(bfd, message, arglist)    (( *((bfd)->xvec->message)) arglist)
+//todo:#define BFD_SEND_FMT(bfd, message, arglist)(((bfd)->xvec->message[(integer) ((bfd)->format)]) arglist)
+
+//todo:bfd_boolean bfd_set_default_target  (const ShortInt *name));cdecl; external BFD_LIB_NAME;
+//todo:const bfd_target * bfd_find_target ( ShortInt *target_name, PBFD abfd));cdecl; external BFD_LIB_NAME;
+//todo:const pchar* bfd_target_list (void));cdecl; external BFD_LIB_NAME;
+//todo:const bfd_target * bfd_search_for_target  (integer ( * search_func) (const bfd_target *, void * ), void * ));cdecl; external BFD_LIB_NAME;
+
+function bfd_check_format(abfd: PBFD; format: bfd_format): bfd_boolean;cdecl; external BFD_LIB_NAME;
+function bfd_check_format_matches(abfd: PBFD; format: bfd_format; matching: pppchar): bfd_boolean;cdecl; external BFD_LIB_NAME;
+//todo:bfd_boolean bfd_set_format (PBFD abfd, bfd_format format));cdecl; external BFD_LIB_NAME;
+//todo:pchar bfd_format_string (bfd_format format));cdecl; external BFD_LIB_NAME;
+
+(* Values that may appear in the flags field of a BFD.  These also
+   appear in the object_flags field of the bfd_target structure, where
+   they indicate the set of flags used by that backend (not all flags
+   are meaningful for all object file formats) (FIXME: at the moment,
+   the object_flags values have mostly just been copied from backend
+   to another, and are not necessarily correct).  *)
+
+(* No flags.  *)
+const
+  BFD_NO_FLAGS  = $00;
+
+(* BFD contains relocation entries.  *)
+  HAS_RELOC     = $01;
+
+(* BFD is directly executable.  *)
+  EXEC_P        = $02;
+
+(* BFD has line number information (basically used for F_LNNO in a
+   COFF header).  *)
+  HAS_LINENO    = $04;
+
+(* BFD has debugging information.  *)
+  HAS_DEBUG     = $08;
+
+(* BFD has symbols.  *)
+  HAS_SYMS      = $10;
+
+(* BFD has local symbols (basically used for F_LSYMS in a COFF
+   header).  *)
+  HAS_LOCALS    = $20;
+
+(* BFD is a dynamic object.  *)
+  DYNAMIC       = $40;
+
+(* Text section is write protected (if D_PAGED is not set, this is
+   like an a.out NMAGIC file) (the linker sets this by default, but
+   clears it for -r or -N).  *)
+  WP_TEXT       = $80;
+
+(* BFD is dynamically paged (this is like an a.out ZMAGIC file) (the
+   linker sets this by default, but clears it for -r or -n or -N).  *)
+  D_PAGED       = $100;
+
+(* BFD is relaxable (this means that bfd_relax_section may be able to
+   do something) (sometimes bfd_relax_section can do something even if
+   this is not set).  *)
+  BFD_IS_RELAXABLE = $200;
+
+(* This may be set before writing out a BFD to request using a
+   traditional format.  For example, this is used to request that when
+   writing out an a.out object the symbols not be hashed to eliminate
+   duplicates.  *)
+  BFD_TRADITIONAL_FORMAT = $400;
+
+(* This flag indicates that the BFD contents are actually cached in
+   memory.  If this is set, iostream points to a bfd_in_memory struct.  *)
+  BFD_IN_MEMORY = $800;
+
+(* Get the name of a stabs type code.  *)
+
+function bfd_get_stab_name(a:integer):pchar;cdecl; external BFD_LIB_NAME;
+
+(* Initialize a hash table.  *)
+//todo:function bfd_boolean bfd_hash_table_init  (struct bfd_hash_table *,   struct bfd_hash_entry *( * ) (struct bfd_hash_entry *, struct bfd_hash_table *, const pchar)));cdecl; external BFD_LIB_NAME;
+
+(* Initialize a hash table specifying a size.  *)
+//todo:function bfd_boolean bfd_hash_table_init_n (struct bfd_hash_table *, struct bfd_hash_entry *( * ) (struct bfd_hash_entry *,  struct bfd_hash_table *, const pchar),  LongWord size));cdecl; external BFD_LIB_NAME;
+
+(* Free up a hash table.  *)
+//todo:function void bfd_hash_table_free (struct bfd_hash_table *));cdecl; external BFD_LIB_NAME;
+
+(* Look up a string in a hash table.  If CREATE is true, a new entry
+   will be created for this string if one does not already exist.  The
+   COPY argument must be true if this routine should copy the string
+   into newly allocated memory when adding an entry.  *)
+//todo:function struct bfd_hash_entry *bfd_hash_lookup (struct bfd_hash_table *, const pchar, bfd_boolean create,  bfd_boolean copy));cdecl; external BFD_LIB_NAME;
+
+(* Replace an entry in a hash table.  *)
+//todo:function void bfd_hash_replace (struct bfd_hash_table *, struct bfd_hash_entry *old, struct bfd_hash_entry *nw));cdecl; external BFD_LIB_NAME;
+
+(* Base method for creating a hash table entry.  *)
+//todo:function struct bfd_hash_entry *bfd_hash_newfunc (struct bfd_hash_entry *, struct bfd_hash_table *,  const pchar));cdecl; external BFD_LIB_NAME;
+
+(* Grab some space for a hash table entry.  *)
+//todo:function pointer bfd_hash_allocate (struct bfd_hash_table *, LongWord));cdecl; external BFD_LIB_NAME;
+
+(* Traverse a hash table in a random order, calling a function on each
+   element.  If the function returns false, the traversal stops.  The
+   INFO argument is passed to the function.  *)
+//todo:function void bfd_hash_traverse (struct bfd_hash_table *,  bfd_boolean ( * ) (struct bfd_hash_entry *, pointer), pointer info));cdecl; external BFD_LIB_NAME;
+
+(* Print a bfd_vma x on stream s.  *)
+//todo:#define fprintf_vma(s,x) fprintf (s, "%08lx", x)
+//todo:#define sprintf_vma(s,x) sprintf (s, "%08lx", x)
+
+//todo:#define printf_vma(x) fprintf_vma(stdout,x)
+
+implementation
+
+// Makros:
+
+function bfd_get_filename(abfd: PBFD): pchar;
+begin
+  result:=abfd.filename;
+end;
+
+initialization
+  bfd_init;
+end.
author	peter <peter@3ad0048d-3df7-0310-abae-a5850022a9f2>	2008-02-02 15:48:09 +0000
committer	peter <peter@3ad0048d-3df7-0310-abae-a5850022a9f2>	2008-02-02 15:48:09 +0000
commit	c8845dfe5ca36797bebc57bcc37aae6a8e94444a (patch)
tree	a815946b5827956fef96fe9548e4a9c4d1e1b7d7 /packages/bfd/src/bfd.pas
parent	d7617abfb24ee7c360c3d123e1e9b2b5cc800a5d (diff)
download	fpc-c8845dfe5ca36797bebc57bcc37aae6a8e94444a.tar.gz