-- Autogenerated by MSIL2Ada v. 2
-- By: Martin C. Carlisle
--     Department of Computer Science
--     US Air Force Academy
--     carlislem@acm.org
pragma Extensions_Allowed(On);
with MSSyst.Object;
with MSIL_Types;
use MSIL_Types;
with type MSSyst.IComparable.Ref is access;
with type MSSyst.IFormattable.Ref is access;
with type MSSyst.IConvertible.Ref is access;
with type MSSyst.Object.Ref is access;
with type MSSyst.Type_k.Ref is access;
with MSSyst.TypeCode;
with type MSSyst.String.Ref is access;
with type MSSyst.IFormatProvider.Ref is access;
package MSSyst.Net.HttpStatusCode is
   type ValueType is (
      Continue,
      SwitchingProtocols,
      OK,
      Created,
      Accepted,
      NonAuthoritativeInformation,
      NoContent,
      ResetContent,
      PartialContent,
      Ambiguous,
      Moved,
      Redirect,
      RedirectMethod,
      NotModified,
      UseProxy,
      Unused,
      RedirectKeepVerb,
      BadRequest,
      Unauthorized,
      PaymentRequired,
      Forbidden,
      NotFound,
      MethodNotAllowed,
      NotAcceptable,
      ProxyAuthenticationRequired,
      RequestTimeout,
      Conflict,
      Gone,
      LengthRequired,
      PreconditionFailed,
      RequestEntityTooLarge,
      RequestUriTooLong,
      UnsupportedMediaType,
      RequestedRangeNotSatisfiable,
      ExpectationFailed,
      InternalServerError,
      NotImplemented,
      BadGateway,
      ServiceUnavailable,
      GatewayTimeout,
      HttpVersionNotSupported);
   pragma Convention (MSIL, ValueType);
   for ValueType use (
      Continue =>  100,
      SwitchingProtocols =>  101,
      OK =>  200,
      Created =>  201,
      Accepted =>  202,
      NonAuthoritativeInformation =>  203,
      NoContent =>  204,
      ResetContent =>  205,
      PartialContent =>  206,
      Ambiguous =>  300,
      Moved =>  301,
      Redirect =>  302,
      RedirectMethod =>  303,
      NotModified =>  304,
      UseProxy =>  305,
      Unused =>  306,
      RedirectKeepVerb =>  307,
      BadRequest =>  400,
      Unauthorized =>  401,
      PaymentRequired =>  402,
      Forbidden =>  403,
      NotFound =>  404,
      MethodNotAllowed =>  405,
      NotAcceptable =>  406,
      ProxyAuthenticationRequired =>  407,
      RequestTimeout =>  408,
      Conflict =>  409,
      Gone =>  410,
      LengthRequired =>  411,
      PreconditionFailed =>  412,
      RequestEntityTooLarge =>  413,
      RequestUriTooLong =>  414,
      UnsupportedMediaType =>  415,
      RequestedRangeNotSatisfiable =>  416,
      ExpectationFailed =>  417,
      InternalServerError =>  500,
      NotImplemented =>  501,
      BadGateway =>  502,
      ServiceUnavailable =>  503,
      GatewayTimeout =>  504,
      HttpVersionNotSupported =>  505);
   type ValueType_Arr is array (Natural range <>) of ValueType; -- start at 0
   type ValueType_Array is access all ValueType_Arr;
   type ValueType_addrof is access all ValueType;
   type ValueType_array_addrof is access all ValueType_Array;
   MultipleChoices : constant Valuetype := Ambiguous;
   MovedPermanently : constant Valuetype := Moved;
   Found : constant Valuetype := Redirect;
   SeeOther : constant Valuetype := RedirectMethod;
   TemporaryRedirect : constant Valuetype := RedirectKeepVerb;
   function CompareTo(
      This : Valuetype;
      target : MSSyst.Object.Ref) return Integer;
   function Equals(
      This : Valuetype;
      obj : MSSyst.Object.Ref) return Standard.Boolean;
   function GetHashCode(
      This : Valuetype) return Integer;
   function GetType(
      This : Valuetype) return MSSyst.Type_k.Ref;
   function GetTypeCode(
      This : Valuetype) return MSSyst.TypeCode.Valuetype;
   function ToString(
      This : Valuetype;
      format : MSSyst.String.Ref) return MSSyst.String.Ref;
   function ToString(
      This : Valuetype) return MSSyst.String.Ref;
   function ToString(
      This : Valuetype;
      format : MSSyst.String.Ref;
      provider : MSSyst.IFormatProvider.Ref) return MSSyst.String.Ref;
   function ToString(
      This : Valuetype;
      provider : MSSyst.IFormatProvider.Ref) return MSSyst.String.Ref;
private
   pragma Import(MSIL,CompareTo,"CompareTo");
   pragma Import(MSIL,Equals,"Equals");
   pragma Import(MSIL,GetHashCode,"GetHashCode");
   pragma Import(MSIL,GetType,"GetType");
   pragma Import(MSIL,GetTypeCode,"GetTypeCode");
   pragma Import(MSIL,ToString,"ToString");
end MSSyst.Net.HttpStatusCode;
pragma Extensions_Allowed(Off);
pragma Import(MSIL,MSSyst.Net.HttpStatusCode,
   ".ver 1:0:5000:0 .publickeytoken=( 96 9d b8 05 3d 33 22 ac )",
   "[System]System.Net.HttpStatusCode");
