TAO/tests/IDL_Test/pragma.idl

   1
   2 //=============================================================================
   3 /**
   4  *  @file    pragma.idl
   5  *
   6  *  This file contains examples of IDL code that has
   7  *  caused problems in the past for the TAO IDL
   8  *  compiler. This test is to make sure the problems
   9  *  stay fixed.
  10  *
  11  *
  12  *  @author Jeff Parsons <parsons@cs.wustl.edu> and TAO users.
  13  */
  14 //=============================================================================
  15
  16
  17 #pragma prefix "anvil.com"
  18
  19 interface hello {};
  20
  21 // These declarations all at one time caused the prefix above
  22 // to be dropped.
  23
  24 typedef string FuBar;
  25
  26 enum ClusterFu
  27   {
  28     CHAOS,
  29     MAYHEM
  30   };
  31
  32 interface aloha;
  33
  34 const long GangBa = -278;
  35
  36 exception Riot {};
  37
  38 interface goodbye {};
  39
  40 module A
  41 {
  42   exception my_exception {};
  43 };
  44
  45 module salutation
  46 {
  47 // This prefix applies only in this module
  48 # pragma prefix "hammer.com"
  49
  50   interface sayonara {};
  51 };
  52
  53 // 'anvil.com' returns
  54 interface ciao {};
  55
  56 interface aloha {};
  57