--- adabrowse-4.0.3.orig/debian/README.source +++ adabrowse-4.0.3/debian/README.source @@ -0,0 +1,8 @@ +This package uses quilt to manage all modifications to the upstream +source. Changes are stored in the source package as diffs in +debian/patches and applied during the build. Please see: + +/usr/share/doc/quilt/README.source + +for more information on how to apply the patches, modify patches, or +remove a patch. --- adabrowse-4.0.3.orig/debian/adabrowse.docs +++ adabrowse-4.0.3/debian/adabrowse.docs @@ -0,0 +1,2 @@ +doc/*.css +doc/*.html --- adabrowse-4.0.3.orig/debian/adabrowse.examples +++ adabrowse-4.0.3/debian/adabrowse.examples @@ -0,0 +1,2 @@ +nasty.adb +simple_test --- adabrowse-4.0.3.orig/debian/adabrowse.install +++ adabrowse-4.0.3/debian/adabrowse.install @@ -0,0 +1,2 @@ +adabrowse /usr/bin +xml/*.dtd /usr/share/adabrowse --- adabrowse-4.0.3.orig/debian/adabrowse.manpages +++ adabrowse-4.0.3/debian/adabrowse.manpages @@ -0,0 +1 @@ +debian/manpages/* --- adabrowse-4.0.3.orig/debian/changelog +++ adabrowse-4.0.3/debian/changelog @@ -0,0 +1,130 @@ +adabrowse (4.0.3-6) unstable; urgency=medium + + * Update debian/copyright file + * Update to Standards-Version 3.9.6 (no changes) + * Rebuild with gnat-4.9 and asis 2014 (Closes: #747557) + * Add debian/watch file + * Enable dpkg-buildflags hardening options + * Simplify debian/rules + * Update to debhelper 9 + + -- Adrian-Ken Rueegsegger Sun, 19 Oct 2014 12:43:15 +0200 + +adabrowse (4.0.3-5) unstable; urgency=low + + * Update to debhelper 8 + * Update debian/copyright file + * Update to Standards-Version 3.9.2 (no changes) + * Rebuild with gnat-4.6 and asis 2010 (Closes: #642609) + * Fix debian-rules-missing-recommended-target warning + * Update Vcs-Git URL + + -- Adrian-Ken Rueegsegger Mon, 02 Jan 2012 20:53:55 +0000 + +adabrowse (4.0.3-4) unstable; urgency=low + + * Add gnat-4.4 dependency (Closes: #565618). + + -- Adrian-Ken Rueegsegger Thu, 21 Jan 2010 21:17:50 +0100 + +adabrowse (4.0.3-3) unstable; urgency=low + + * Add Vcs-Browser and Vcs-Git entries. + * Remove list of architectures (Closes: #525270, #542411). + * Remove redundant build dependency for gnat. + * Bump Standards-Version to 3.8.3. + * Add README.source file. + * Rebuild with latest GNAT and ASIS. + * Use $(QUILT_STAMPFN) instead of patch target. + + -- Adrian-Ken Rueegsegger Thu, 26 Nov 2009 20:53:44 +0100 + +adabrowse (4.0.3-2) unstable; urgency=low + + * Bring packaging up-to-date. + + -- Adrian-Ken Rueegsegger Tue, 24 Feb 2009 22:47:12 +0100 + +adabrowse (4.0.3-1) unstable; urgency=low + + * Fix dh-clean-k-is-deprecated lintian warning. + * Merging upstream version 4.0.3. + * Sync copyright notice with upstream. + + -- Adrian-Ken Rueegsegger Sun, 15 Feb 2009 18:46:14 +0100 + +adabrowse (4.0.2-7) unstable; urgency=low + + * New maintainer (Closes: #497018). + * Bumped debhelper to 7. + * Bumped policy to 3.8.0. + + -- Adrian-Ken Rueegsegger Fri, 21 Nov 2008 16:54:20 +0100 + +adabrowse (4.0.2-6) unstable; urgency=low + + * Add mips, mipsel and ppc64. + * Recompile using gnat-4.3 and asis 2007. + * Update Standards-Version to 3.7.3 with no changes required. + * debian/adabrowse.gpr: adjust to asis.gpr now being a library project + file. Closes: #479936. + * debian/compat: new. + * debian/rules: do not export DH_COMPAT anymore. + + -- Ludovic Brenta Wed, 14 May 2008 23:40:56 +0200 + +adabrowse (4.0.2-5) unstable; urgency=medium + + * debian/control: add alpha, remove mips and mipsel. + * Recompile now that asis is available on all architectures. + Closes: #373247. + + -- Ludovic Brenta Tue, 8 Aug 2006 23:48:07 +0200 + +adabrowse (4.0.2-4) unstable; urgency=low + + * debian/control: + - Change my email address: now a full DD! + - Update Build-Depends to gnat (>= 4.1) and libasis-dev. + Closes: #330814. + - Add amd64, hppa, ia64, mips, mipsel and s390 to Architecture. + - Update Standards-Version to 3.7.2 with no changes. + * debian/rules: disable support for project files , FTBFS with + libgnatprj >= 4.1. + * debian/copyright: update my email address and the FSF's postal address. + Mention the GPL file on Debian systems. + + -- Ludovic Brenta Wed, 12 Jul 2006 00:53:17 +0200 + +adabrowse (4.0.2-3) unstable; urgency=low + + * debian/control: add support for GNU/kFreeBSD per request from Aurélien + Jarno. Build-depend on gnat (>= 3.15p-19) and libasis-3.15p-dev (>= + 3.15p-10). Closes: #345054. + + -- Ludovic Brenta Thu, 9 Feb 2006 19:08:25 +0100 + +adabrowse (4.0.2-2) unstable; urgency=low + + * debian/control: add powerpc to the list of supported architectures. Thanks + to Xavier Grave for making ASIS work on powerpc; see #117703. + * debian/control: build-depend on libgnatprj-dev (>= 3.15p-17) and + libasis-3.15p-dev (>= 3.15p-8). + * debian/rules: build against libgnatprj-dev, enable project manager support. + Closes: #338361. + * debian/adabrowse.gpr, debian/ad-projects-impl.ads, debian/ad-setup.ads: new; + use when building. + * debian/control, debian/changelog: change maintainer's email address. + * debian/control: bump Standards-Version to 3.6.2. + * debian/00-gnatmake.patch: new; do not call "gnat" but "gnatmake" instead. + * debian/rules (patch-stamp, unpatch): new rules. + * debian/rules (CPUS): new. Detect number of available processors and do a + parallel build. + + -- Ludovic Brenta Sat, 10 Dec 2005 18:55:14 +0100 + +adabrowse (4.0.2-1) unstable; urgency=low + + * Initial Release. Closes: #232640. + + -- Ludovic Brenta Sat, 14 Feb 2004 13:22:40 +0100 --- adabrowse-4.0.3.orig/debian/compat +++ adabrowse-4.0.3/debian/compat @@ -0,0 +1 @@ +9 --- adabrowse-4.0.3.orig/debian/control +++ adabrowse-4.0.3/debian/control @@ -0,0 +1,17 @@ +Source: adabrowse +Section: devel +Priority: optional +Maintainer: Adrian-Ken Rueegsegger +Build-Depends: debhelper (>= 9), gnat, gnat-4.9, libasis2014-dev, quilt +Standards-Version: 3.9.6 +Homepage: http://home.datacomm.ch/t_wolf/tw/ada95/adabrowse/ +Vcs-Browser: http://git.codelabs.ch/?p=debian/adabrowse.git +Vcs-Git: http://git.codelabs.ch/git/debian/adabrowse.git + +Package: adabrowse +Architecture: any +Depends: ${shlibs:Depends}, ${misc:Depends} +Description: HTML generator for Ada 95 library unit specifications + AdaBrowse is a javadoc-like HTML generator for Ada 95 library unit + specifications. It can also generate XML output; a DTD is included in + the distribution. --- adabrowse-4.0.3.orig/debian/copyright +++ adabrowse-4.0.3/debian/copyright @@ -0,0 +1,46 @@ +Format: http://www.debian.org/doc/packaging-manuals/copyright-format/1.0/ +Upstream-Name: AdaBrowse +Upstream-Contact: Thomas Wolf +Source: http://home.datacomm.ch/t_wolf/tw/ada95/adabrowse/ + +Files: * +Copyright: (C) 2002-2005 Thomas Wolf +License: GPL-2+ + 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. + . + On Debian systems, the full text of the GNU General Public License version 2 + can be found in /usr/share/common-licenses/GPL-2 file. + +Files: debian/* +Copyright: + (C) 2004-2008 Ludovic Brenta + (C) 2008-2014 Adrian-Ken Rueegsegger +License: GPL-2+ + 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. + . + On Debian systems, the full text of the GNU General Public License version 2 + can be found in /usr/share/common-licenses/GPL-3 file. --- adabrowse-4.0.3.orig/debian/manpages/adabrowse.1 +++ adabrowse-4.0.3/debian/manpages/adabrowse.1 @@ -0,0 +1,378 @@ +.TH ADABROWSE 1 "14 FEB 2004" "GNU Ada Tools" "AdaBrowse User Manual" +.SH NAME +adabrowse \- Generate fully cross-referenced HTML rendering of Ada 95 +specs +.SH SYNOPSIS +\fBadabrowse\fR [options] -f \fIfile\fR +.SH DESCRIPTION +\fBadabrowse\fR produces a fully cross-referenced HTML rendering of +Ada 95 specs (no bodies) similar to what javadoc does for Java +sources. \fBadabrowse\fR is a command-line utility; it has no +graphical user interface. + +\fBadabrowse\fR is highly configurable through command-line options, +style sheets, and configuration files. + +\fBadabrowse\fR completely takes apart the source code and produces a +HTML documentation containing: +.PD 0 +.IP \(bu 4 +All context clauses +.IP \(bu 4 +Unit header +.IP \(bu 4 +If the unit is a package: +.RS +.IP \(em 4 +All exceptions (including renames) +.IP \(em 4 +All constants +.IP \(em 4 +All variables +.IP \(em 4 +A type index containing all types and their primitive operations (the +latter only for (tagged) record types, private types, and types +derived from those). The primitive operations list is fully cross- +referenced and ordered by newly defined, overridden, and inherited +operations. +.IP \(em 4 +Any other items +.RE +.PD +.SH USAGE +There are two ways to use \fBadabrowse\fR: + +.IP 1. 4 +Call \fBadabrowse\fR for your spec: \fBadabrowse -f\fR \fIfile\fR (and +any other options as needed, in particular \fB-I\fR if the file is not +in the current directory or depends on other units whose sources are +not in the current directory!) If no tree file for the given unit +exists, \fBadabrowse\fR will try to generate one. + +or + +.IP 1. 4 +Generate the tree files for the specs you want to process by calling +\fBgnatgcc -c -gnatc -gnatt\fR \fIfile\fR (with the appropriate +\fB-I\fR options, if needed.) +.IP 2. 4 +Call \fBadabrowse\fR for these specs: \fBadabrowse -f\fR \fIfile\fR +(and any other options, as needed [look in particular at \fB-T\fR!]). +.PP +\fBadabrowse\fR generates HTML files by default in the current +directory. + +\fBadabrowse\fR doesn't care whether the tree files have been produced +from specs or bodies: since the tree file of a body always also +contains the information on the spec, it can work with either. +.SH OPTIONS +.IP \fB-h\fR,\ \fB-?\fR,\ \fB-help\fR,\ \fB--help\fR +Writes a comprehensive help text. + +.IP \fB-a\fR,\ \fB-all\fR,\ \fB--all\fR +Generate HTML not only for the unit given in the -f option, but also +for all application units on which it depends semantically (transitive +closure of "with"es and parent units). + +.IP +Note that this option processes only the application units in the +transitive closure even if the "-g" option is also given; it does not +process any "with"ed standard library unit. This also means that if +the unit given is a standard library unit, the "-all" option has no +effect. This behavior is intentional: you'll normally generate HTML +for the standard library once by processing all standard library units +explicitly, and you don't want to re-generate HTML for these units +each time one of your application unit "with"es a standard library +unit. + +.IP \fB-c\fR\ \fIfile\fR +Defines a configuration file for the HTML generator. Multiple \fB-c\fR +options may be given; the files are processed in the given order and +may overwrite earlier config settings. + +.IP \fB-f\fR\ \fIfile\fR +Gives the filename (*.ads) of the spec to process. This filename may +contain a path! See below for more comments. Only one \fB-f\fR option +may be given. + +.IP \fB-g\fR +If set, \fBadabrowse\fR also generates cross-references to items from +library units in the standard and run-time packages, except for items +from the implict package "Standard". Note: This can also be set by a +configuration file key "Refs_To_Standard". The latter definition wins. + +.IP \fB-G\fR\ \fIoutput_formats...\fR +Specify the output formats \fBadabrowse\fR shall generate. The +\fB-G\fR option must be followed by one or more output format names, +given as separate arguments. Recognized output format names are +\fBhtml\fR and \fBxml\fR (case insensitive). + +.IP \fB-i\fR\ [\fIfile\fR] +If set, \fBadabrowse\fR will generate a package index if it runs in +"file input mode" (see below) or the \fB-all\fR option is set and the +output does not go to stdout. + +If a filename is given, the index is written to that file (or to +stdout, if the filename is "-"). + +.IP \fB-is\ [\fIfile\fR] +Same as -i, but generates an index using indentation for child units. + +.IP \fB-l\fR +Make \fBadabrowse\fR generate cross-references in HTML output using +only the line number. This is what earlier versions of \fBadabrowse\fR +(up to and including V2.13) always did. As of V3.0, cross-references +are constructed taking into account both line and column number of an +item. You should use this option only if you have HTML documentation +generated by earlier \fBadabrowse\fR versions and somehow cannot +re-generate that documentation. However, the recommended usage is +never to use this option and to regenerate possibly already existing +HTML documentation. + +Note that HTML generated with \fB-l\fR is not compatible with HTML +generated without \fB-l\fR! Also, HTML generated by \fBadabrowse\fR +3.0 and beyond is compatible with HTML generated by \fBadabrowse\fR +2.13 and earlier only if the \fB-l\fR option is given. + +Usage of this option generates a warning message on stderr. + +.IP \fB-o\fR\ [\fIfile\fR] +Define the output file name. If not set, the output goes to a file +with the name of the input and suffix \fB.html\fR. If \fIfile\fR +specifies a directory (i.e., ends in a "\\" on Windows or a "/" on +Unix), all generated HTML files will be put into that directory. If +the filename is "-", output is written to stdout. Only one \fB-o\fR +option may be given. + +A dash as the filename ("-") is allowed only if there is exactly one +output format specified. If there are multiple output formats +specified (e.g. both XML and HTML), output is not allowed to go to +stdout. + +.IP \fB-p\fR\ [\fIfile\fR] +As \fB-i\fR, but generates a subprogram index over all units +processed. + +.IP \fB-private\fR,\ \fB--private\fR +If given, \fBadabrowse\fR will also process the private parts of +packages and task or protected declarations. (By default, it doesn't +do so but replaces the private parts by a comment saying +"Implementation defined".) + +.IP \fB-q\fR +Quiet mode: do not issue warning or info messages. Synonym to +\fB-w0\fR. + +.IP \fB-s\fR\ \fIURL\fR +Defines the URL to the style sheet the generated HTML file shall +use. This URL should be relative to the final place where you will put +the HTML files! Note that a \fB-s\fR option can be overwritten by a +later \fB-c\fR option, if the configuration file defines the key +"Style_Sheet". + +.IP \fB-t\fR\ [\fIfile\fR] +As \fB-i\fR, but generates a global type index over all units +processed. + +.IP \fB-version\fR,\ \fB--version\fR +Print version information of \fBadabrowse\fR to stderr. + +.IP \fB-w\fR\fIi\fR +Sets the warning level of \fBadabrowse\fR. \fIi\fR may be one of the +following: +.PD 0 +.RS 4 +.IP 0,\ or\ e 16 +print only error messages. +.IP 1,\ or\ w 16 +print warnings and errors. +.IP 2,\ or\ i,\ or\ a 16 +print all messages. +.RE +.PD + +.IP \fB-x\fR +If set, \fBadabrowse\fR never overwrites existing HTML files. (May be +useful in conjunction with the \fB-a\fR option.) + +.IP \fB-X\fB\ \fIname\fR\fB=\fR\fIvalue\fR +Define an environment variable \fIname\fR with value \fIvalue\fR. The +value supersedes any possibly already existing definition of +\fIname\fR in the system's environment for this call to +\fBadabrowse\fR. The new definition affects any configuration file +processed subsequently and also the project file (if any). The +\fIname\fR must not contain white space; if \fIvalue\fR contains white +space, quote the whole definition as in -X"user=John Doe". There may +or may not be white space between the \fB-X\fR and the variable +definition. + +.IP \fB-I\fR\ \fIdirectory\fR +Define source paths for ASIS. Same semantics as for GNAT. Multiple +\fB-I\fR options may be given. + +.IP \fB-T\fR\ \fIdirectory\fR +Define pathes for ASIS to search for tree files (*.adt). Multiple +\fB-T\fR options may be given. + +Note that if you give a filename to the \fB-i\fR option that starts +with the letter "s", you must have a white space between the option +and the filename, otherwise it will be recognized as a \fB-is\fR +option. Also, if the filename starts with "-", there mustn't be any +whitespace between the option and the filename, for if there is, +\fBadabrowse\fR will assume the filename to be the next option and +handle it as such (options all start with "-"), and not as a filename. + +The same caveat also applies to the \fB-p\fR option, if you want the +subprogram index to go to a file named "rivate": there must be a +blank, otherwise, the whole thing will be recognized as the +\fB-private\fR option. (Admittedly this is a rather pathological case, +but it's mentioned here for completeness.) + +.SH "THE -f OPTION" +The \fB-f\fR option has three different formats: + +.IP 1. 4 +If the filename is "-" or "@-", \fBadabrowse\fR reads the unit specs +of the units to process from stdin, one unit per line, until EOF is +encountered. Empty lines are skipped. (If you try this interactively, +you'll have to signal EOF yourself. Otherwise, this may be useful if +the input comes from a pipe, like in +"ls -1 *.ads | adabrowse -f- ...") + +.IP 2. 4 +If the filename starts with "@", \fBadabrowse\fR doesn't consider it a +unit spec, but as the name of a text file from which to read the unit +names, one unit per line. Empty lines in the file are ignored. + +.IP 3. 4 +If neither applies, \fBadabrowse\fR uses the given filename as the +unit spec. + +.PP +The first two cases are called the "file input mode" of +\fBadabrowse\fR. The file may contain empty lines and comments +(starting with the first "#" on a line and extending up to the end of +the line), which are ignored. Note that contrary to configuration +files, string handling for finding comment starts is not done, and +line continuations also are not allowed. + +In all three cases, a unit spec is a filename that may contain a path; +a possible suffix is ignored. Note that a unit spec is a file name; in +other words, you give \fBtest-gen\fR, or \fBtest-gen.ads\fR, and not +\fBTest.Gen\fR. The reason is simply that for most shell scripting +languages, it is easier to work with filenames than to massage them +into unit names (e.g. by replacing dashes by dots). Also, if you have +krunched file names, there is no simple connection between the file +name and the unit name. + +If a unit spec contains a path, the HTML file for that unit is placed +into that directory unless overridden by a \fB-o\fR option. Note that +if the unit spec contains a path, you'll most probably also have to +set a \fB-T\fR or \fB-I\fR option, unless you do happen to have the +ASIS information available directly (i.e., a tree file for the unit in +the current directory; but that's not exactly typical). + +In file input mode, the \fB-o\fR option (if given at all) may either +be "-" (in which case all output goes to stdout) or specify a +directory, but must not specify a file. + +\fBadabrowse\fR assumes a GNAT-like naming scheme for source and HTML +files. It also assumes that there is one library unit per file. As of +V1.4, \fBadabrowse\fR can handle krunched file names in the \fB-f\fR +option, provided it can find a source file, and it has the extension +\fB.ads\fR. If so, \fBadabrowse\fR opens and parses the source file to +extract the unit name, instead of deriving it directly from the file +name. Note that generated files always have names based on the unit +name, not the original file name: i.e., output file names will never +be krunched. + +Generated HTML files always have the suffix ".html" (not ".htm"). + +.SH "INDEX GENERATION" +Index generation is active when \fBadabrowse\fR is told to process +several units, and the output does not go to stdout (when the +\fB-o-\fR option has been given). + +There are several options controlling index generation: + +.PD 0 16 +.IP \fB-i\fR\ or\ \fB-is\fR 16 +Switches on generation of a unit index. +.IP \fB-p\fR 16 +Switches on generation of a subprogram index. +.IP \fB-t\fR 16 +Switches on generation of a type index. +.PD +.PP +All these options take an optional filename as a parameter. If a +filename follows, the index will be written to that file (or to +stdout, if the filename happens to be "-"). If no filename is given, +some default name is chosen. + +All these options are actually maintained only for backwards +compatibility reasons. As of V4.0, indices are defined primarily +through configuration file entries, not on the command line. In order +not to break existing scripts using command line options of earlier +\fBadabrowse\fR versions, these options are still available. + +\fBadabrowse\fR assumes it will process several units in the following +cases: +.PD 0 +.IP \(bu 4 +In file input mode (\fB-f @\fR\fIfile_name\fR or \fB-f-\fR). +.IP \(bu 4 +When using a project file (\fB-P\fR \fIproject_file_name\fR). +.IP \(bu 4 +When the \fB-all\fR option is given. +.PD +.PP +If no filename is given, or it doesn't contain a path, it depends upon +the setting of other options where the index will be placed: +.PD 0 +.IP \(bu 4 +In file input mode, if a \fB-o\fR option is given, it must specify a +directory. All HTML files, including the index, will be put into that +directory. +.IP \(bu 4 +If no \fB-o\fR option is given, but the first unit spec contains a +path, the index is put into the directory designated by that path. +.IP \(bu 4 +If not in file input mode, but the -all option has been given, the +\fB-o\fR option may specify a file name. The index is put into the +directory designated by the path part of that file name (the current +directory, if the filename doesn't contain a path). +.IP \(bu 4 +If using a project file, the indices are written into the +ADABROWSE_OUTPUT directory. +.IP \(bu 4 +Otherwise, this index is put in the current directory. +.PD +.PP +If a filename containing a path is given, the index will be placed +into that file in the given directory. If the filename contains only a +path, \fBadabrowse\fR will use that path and create an index named +"index.html" in the designated directory. + +If a \fB-x\fR option is given (inhibiting overwriting of existing HTML +files) and a file exists already in the place where \fBadabrowse\fR +wants to put the index, no index will be generated and \fBadabrowse\fR +will issue a warning. It'll also warn if it cannot generate an index +for any other reasons, but will otherwise continue processing. + +.SH "SEE ALSO" +.BR gnatgcc (1), +.BR gnatkr (1) + +The full user's guide in /usr/share/doc/adabrowse. + +.SH BUGS +The Debian package of \fBadabrowse\fR does not have the Project +Manager feature; the command-line option \fB-P\fR \fIproject_file\fR +is therefore disabled. + +.SH AUTHOR +\fBadabrowse\fR and the accompanying documentation was written by +Thomas Wolf . + +Ludovic Brenta merely turned part of the +user's guide into this manual page for the Debian project. --- adabrowse-4.0.3.orig/debian/misc/adabrowse.gpr +++ adabrowse-4.0.3/debian/misc/adabrowse.gpr @@ -0,0 +1,35 @@ +-- Project file to build AdaBrowse with project manager support +-- Copyright (c) 2005, 2006, 2008 Ludovic Brenta +-- +-- 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. + +with "asis.gpr"; +project Adabrowse is + -- The source dirs include the debian subdirectory, where I've + -- preconfigured AdaBrowse. + for Source_Dirs use ("../..", "../"); + for Object_Dir use "../../obj"; + for Exec_Dir use "../.."; + for Main use ("adabrowse"); + + Extra_Flags := External_As_List ("ADAFLAGS", " "); + + package Compiler is + for Default_Switches ("Ada") use + ("-O2", "-gnatafno", "-gnatVa", "-gnatwa", + "-gnaty3abefhiklmprt") & Extra_Flags; + end Compiler; + + package Linker is + for Default_Switches ("Ada") use External_As_List ("LDFLAGS", " "); + end Linker; + +end Adabrowse; --- adabrowse-4.0.3.orig/debian/patches/01-gnatmake.patch +++ adabrowse-4.0.3/debian/patches/01-gnatmake.patch @@ -0,0 +1,32 @@ +Author: Ludovic Brenta +Description: Make sure never to call the "gnat" command, just "gnatmake" or "gnatgcc". + +diff -Naurp adabrowse.orig/ad-driver.adb adabrowse/ad-driver.adb +--- adabrowse.orig/ad-driver.adb 2009-02-24 21:17:01.000000000 +0100 ++++ adabrowse/ad-driver.adb 2009-02-24 21:17:46.000000000 +0100 +@@ -660,7 +660,7 @@ package body AD.Driver is + -- it needs (configuration pragmas, naming schemes, etc.) + -- Note: we also pass on -X options! + AD.Compiler.Set_Compile_Command +- ("gnat compile -c -gnatc -gnatt -P" & ++ ("gnatmake -c -gnatc -gnatt -P" & + AD.Projects.Get_Project_File_Name & + ASU.To_String (Pass_On_Options)); + end if; +diff -Naurp adabrowse.orig/ad-projects.ads adabrowse/ad-projects.ads +--- adabrowse.orig/ad-projects.ads 2009-02-24 21:17:01.000000000 +0100 ++++ adabrowse/ad-projects.ads 2009-02-24 21:17:46.000000000 +0100 +@@ -75,9 +75,10 @@ package AD.Projects is + -- specified and no "-f" option is given, AdaBrowse will process all specs + -- from the source files of the root project. + -- +- -- Warning: if a project file is given, the compile command is changed to +- -- "gnat compile -P", if it starts with the default compiler +- -- name (which is "gcc" -- or "gnatgcc" on some Linux installations.) ++ -- Warning: if a project file is given, the compile command is ++ -- changed to "gnatmake -c -gnatc -gnatt -P", if it ++ -- starts with the default compiler name (which is "gcc" -- or ++ -- "gnatgcc" on some Linux installations.) + -- + -- The AdaBrowse currently doesn't handle the other project-related + -- switches of GNAT tools, i.e. "-X" and "-vP". To define values for --- adabrowse-4.0.3.orig/debian/patches/02-use-gnatgcc.patch +++ adabrowse-4.0.3/debian/patches/02-use-gnatgcc.patch @@ -0,0 +1,14 @@ +Author: Adrian-Ken Rueegsegger +Description: Use "gnatgcc" instead of just "gcc". + +diff -Naurp adabrowse.orig/ad-setup.ads adabrowse/ad-setup.ads +--- adabrowse.orig/ad-setup.ads 2009-02-24 21:17:01.000000000 +0100 ++++ adabrowse/ad-setup.ads 2009-02-24 21:19:04.000000000 +0100 +@@ -11,6 +11,6 @@ package AD.Setup is + private + + GNAT_Name : constant String := +- "gcc"; ++ "gnatgcc"; + + end AD.Setup; --- adabrowse-4.0.3.orig/debian/patches/series +++ adabrowse-4.0.3/debian/patches/series @@ -0,0 +1,2 @@ +01-gnatmake.patch +02-use-gnatgcc.patch --- adabrowse-4.0.3.orig/debian/rules +++ adabrowse-4.0.3/debian/rules @@ -0,0 +1,30 @@ +#!/usr/bin/make -f + +include /usr/share/quilt/quilt.make + +DPKG_EXPORT_BUILDFLAGS = 1 +include /usr/share/dpkg/buildflags.mk + +ADAFLAGS := $(filter-out -Wformat -Werror=format-security, $(CFLAGS)) +export ADAFLAGS + +CPUS := $(shell getconf _NPROCESSORS_ONLN) +CC := gcc + +%: + dh ${@} + +override_dh_auto_clean: + rm -rf obj adabrowse sdefault.adb ad-projects-impl_yes-get_parent.adb + dh_clean + +override_dh_auto_build: + mkdir -p obj + $(CC) -c util-nl.c -o obj/util-nl.o $(CFLAGS) + gnatmake -j$(CPUS) -Pdebian/misc/adabrowse.gpr + +override_dh_auto_test: +override_dh_auto_install: + +override_dh_compress: + dh_compress -X.ads -X.adb --- adabrowse-4.0.3.orig/debian/watch +++ adabrowse-4.0.3/debian/watch @@ -0,0 +1,2 @@ +version=3 +http://home.datacomm.ch/t_wolf/tw/ada95/adabrowse/ adabrowse[_\-\.](\d.*)_src\.(?:tgz|tbz2|txz|tar\.(?:gz|bz2|xz))