← Back to branch summary

~ubuntu-branches/ubuntu/jaunty/adacontrol/jaunty

« back to all changes in this revision

Viewing changes to test/x_no_operator_usage.ads

  • Committer: Bazaar Package Importer
  • Author(s): Ludovic Brenta
  • Date: 2008-04-27 15:25:59 UTC
  • mfrom: (1.1.3 upstream)
  • Revision ID: james.westby@ubuntu.com-20080427152559-qrlic533a1x02flu
Tags: 1.8r8-1

* New upstream version.
* debian/adacontrol.gpr: delete; use upstream's project file instead.
* patches/build.patch: patch upstream's project file to change Object_Dir
  and Exec_Dir.
* Build-depend on asis 2007 and gnat-4.3.
* Add support for mips, mipsel and ppc64.
* Build and provide ptree.
* ptree.1: new.
* adactl.1: update; new options and rules are available.

Show diffs side-by-side

added added

removed removed

Lines of Context:
test/x_no_operator_usage.ads
 
1
package X_No_Operator_Usage is
 
2
   type X1 is new Integer;                 -- no operators
 
3
 
 
4
   package Internal is
 
5
      type X2 is new X1 range 1 .. 10;
 
6
      function "+" (L, R : X2) return X2;
 
7
   end Internal;
 
8
 
 
9
   type X3 is private;
 
10
   type X4 is private;
 
11
   function "abs" (L : X4) return X4;
 
12
private
 
13
   type Intermediate1 is range 1 .. 10;    -- no operators
 
14
   subtype Intermediate2 is Intermediate1 range 3..5;
 
15
   type X3 is new intermediate2;           -- no operators
 
16
   type X4 is range 1 .. 10;
 
17
end X_No_Operator_Usage;