← Back to branch summary

~ubuntu-branches/ubuntu/wily/japitools/wily

« back to all changes in this revision

Viewing changes to bin/japiotext

  • Committer: Bazaar Package Importer
  • Author(s): Wolfgang Baer
  • Date: 2006-01-16 15:32:32 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20060116153232-8uc0tt0tb26w71fk
Tags: 0.9.5+cvs20060115-1
* New upstream cvs snapshot
* kaffe compiler transition

Show diffs side-by-side

added added

removed removed

Lines of Context:
bin/japiotext
25
25
@categories = ();
26
26
@packages = ();
27
27
# Would be nice not to hardcode this - maybe later...
28
 
@things = ("package", "class", "interface", "field", "method", "constructor");
 
28
@things = ("package", "class", "interface", "enum", "annotation", "field", "method", "constructor");
29
29
 
30
30
$javatypes = {Z=>'boolean', B=>'byte', C=>'char', D=>'double', F=>'float',
31
31
                  I=>'int', J=>'long', S=>'short', V=>'void'};
169
169
    if ($errors->{"$pkg/$cat"}) {
170
170
      my $cap = uc($1).$2 if $cat =~ /^(.)(.*)$/;
171
171
      print "$cap\n";
172
 
      foreach my $line (@{$errors->{"$pkg/$cat"}}) {
 
172
      foreach my $line (sort @{$errors->{"$pkg/$cat"}}) {
173
173
        my ($etype, $isa, $item, $sups, $rest) = split / /, $line, 5;
174
174
        my ($was, $is) = split /\//, $rest;
175
175
        $was =~ s/~s/\//g; $was =~ s/~t/~/g;
191
191
    $class =~ s/\$/./g;
192
192
    $ritem .= ".$class";
193
193
  }
194
 
  $ritem .= "." . readable_member($member) if $member;
 
194
  if ($member) {
 
195
    $ritem .= "." unless $member =~ /^\(/;
 
196
    $ritem .= readable_member($member);
 
197
  }
195
198
  return $ritem;
196
199
}
197
200
 
254
257
  }
255
258
  push @result, $class if $class;
256
259
  return @result;
257
 
}
 
 
b'\\ No newline at end of file'
 
260
}