gnue/appserver/src/_featuretest thekitchensink.odl

[Daniel E. Baumann]

CVSROOT:        /cvsroot/gnue
Module name:    gnue
Changes by:     Daniel E. Baumann <address@hidden>      02/07/23 07:03:49

Modified files:
        appserver/src/_featuretest: thekitchensink.odl 

Log message:
        Finish adding to the kitchen sink, this should be sufficient now for 
testing.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/gnue/appserver/src/_featuretest/thekitchensink.odl.diff?tr1=1.3&tr2=1.4&r1=text&r2=text

Patches:
Index: gnue/appserver/src/_featuretest/thekitchensink.odl
diff -c gnue/appserver/src/_featuretest/thekitchensink.odl:1.3 
gnue/appserver/src/_featuretest/thekitchensink.odl:1.4
*** gnue/appserver/src/_featuretest/thekitchensink.odl:1.3      Mon Jul 22 
07:20:26 2002
--- gnue/appserver/src/_featuretest/thekitchensink.odl  Tue Jul 23 07:03:49 2002
***************
*** 30,36 ****
   default: string trout;
  };
  
! enum TroutType {brown, rainbow, lake};
  
  typedef Bar bar;
  typedef Trout trout_t;
--- 30,41 ----
   default: string trout;
  };
  
! enum TroutType 
! {
!   brown, 
!   rainbow, 
!   lake
! };
  
  typedef Bar bar;
  typedef Trout trout_t;
***************
*** 136,142 ****
      default: long x;
    };
  
!   enum FooType{bar, biz, bazz};
    
    typedef Foo foo;
  
--- 141,152 ----
      default: long x;
    };
  
!   enum FooType
!     {
!       bar, 
!       biz, 
!       bazz
!     };
    
    typedef Foo foo;
  
***************
*** 171,177 ****
  
    interface DaMasta: Sadist
    {
!     enum BeatingType{mild, profuse};
  
      typedef BeatingType beating_t
  
--- 181,191 ----
  
    interface DaMasta: Sadist
    {
!     enum BeatingType
!       {
!       mild, 
!       profuse
!       };
  
      typedef BeatingType beating_t
  
***************
*** 200,207 ****
  
    interface CodeSlave: Masochist
    {
!     enum HackType {common, forms, appserver, designer, 
!                    reports, navigator, phpforms};
  
      typedef HackType hack_t;
  
--- 214,229 ----
  
    interface CodeSlave: Masochist
    {
!     enum HackType 
!       {
!       common, 
!       forms, 
!       appserver, 
!       designer, 
!         reports, 
!       navigator, 
!       phpforms
!       };
  
      typedef HackType hack_t;
  
***************
*** 257,281 ****
      class Chillywilly extends Goat
      ( extent goats)
      {
!       void troutSlap(in Goat slapee);
      };
  
      class Jcater extends Goat
      ( extent goats)
      {
!       void consumeDonut(in DonutType donut);
      };
  
      class Jamest extends Goat
      ( extent goats)
      {
!       void consumeAtmosphericCrack();
      };
  
      class Reinhard extends Goat
      ( extent goats)
      {
!       string IRCQuitMessage();
      }
    };
  
--- 279,368 ----
      class Chillywilly extends Goat
      ( extent goats)
      {
!       exception OutOfStock{string why;};
!       exception GoatDucked{};
!       exception ExceededTroutLimit{unsigned short limit;};
! 
!       enum TroutType 
!       {
!       brown, 
!       rainbow, 
!       lake
!       };
! 
!       typedef TroutType trout_t;
! 
!       const trout_t preferredTrout = rainbow;
! 
!       attribute boolean troutslap;
!       attribute bag<trout_t> trout;
! 
!       relationship Jcater favoriteSlapee inverse Jcater::isTroutSlappedBy;
! 
!       boolean addTrout(in trout_t trout, out unsigned short inStock) 
!                                                raises (ExceededTroutLimit);
!       void troutSlap(in Goat slapee, in trout_t trout) raises (OutOfStock, 
GoatDucked);
      };
  
      class Jcater extends Goat
      ( extent goats)
      {
!       exception InvalidDonutType{donut_t donut;};
! 
!       enum DonutType
!       {
!         glazed,
!         krispy_kreme,
!         jelly,
!         powdered
!       };
! 
!       struct Currency
!       {
!       string type;
!       float emount;
!       };
! 
!       typedef DonutType donut_t;
! 
!       const donut_t preferredDonut = krispy_kreme;
! 
!       attribute bag<donut_t> donuts;
! 
!       void consumeDonut(in donut_t donut) raises(InvalidDonutType);
!       boolean purchaseDonuts(in Currency money, out bag<donut_t> donuts) 
raises(NotEnoughMoney);
      };
  
      class Jamest extends Goat
      ( extent goats)
      {
!       exception CrackLevelsTooLow{unsigned short levels};
! 
!       struct AtmosphericCrack
!       {
!         string kind;
!         unsigned long weight;
!         float percentage;
!       };
! 
!       typedef AtmosphereicCrack atmoscrack_t;
! 
!       attribute bag<atmoscrack_t> crackReserves;
! 
!       void inhaleAtmosphericCrack(in AtmosphereicCrack crack) raises 
(CrackLevelsTooLow);
      };
  
      class Reinhard extends Goat
      ( extent goats)
      {
!       exception FileDoesNotExist{string filename;};
!       exception FileIsEmpty{string filename;};
! 
!       attribute list<string> quitMessages;
!       attribute string filename;
! 
!       boolean loadQuitMessages(in string filename) raises(FileDoesNotExist, 
FileIsEmpty);
!       string displayWittyIRCQuitMessage();
      }
    };