[Dotgnu-pnet-commits] CVS: pnet/engine int_proto.h,1.63,1.64 int_table.c,1.65,1.66 lib_info.c,1.2,1.3

[Rhys Weatherley <address@hidden>]

Update of /cvsroot/dotgnu-pnet/pnet/engine
In directory subversions:/tmp/cvs-serv20704/engine

Modified Files:
        int_proto.h int_table.c lib_info.c 
Log Message:


Add the "InfoMethods.GetPlatformID" internalcall.


Index: int_proto.h
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/engine/int_proto.h,v
retrieving revision 1.63
retrieving revision 1.64
diff -C2 -r1.63 -r1.64
*** int_proto.h 4 Jun 2003 03:57:44 -0000       1.63
--- int_proto.h 21 Jun 2003 02:57:05 -0000      1.64
***************
*** 527,531 ****
  extern ILString * _IL_InfoMethods_GetRuntimeVersion(ILExecThread * _thread);
  extern ILString * _IL_InfoMethods_GetNetBIOSMachineName(ILExecThread * 
_thread);
! extern ILObject * _IL_InfoMethods_GetOSVersion(ILExecThread * _thread);
  extern ILString * _IL_InfoMethods_GetUserDomainName(ILExecThread * _thread);
  extern ILBool _IL_InfoMethods_IsUserInteractive(ILExecThread * _thread);
--- 527,531 ----
  extern ILString * _IL_InfoMethods_GetRuntimeVersion(ILExecThread * _thread);
  extern ILString * _IL_InfoMethods_GetNetBIOSMachineName(ILExecThread * 
_thread);
! extern ILInt32 _IL_InfoMethods_GetPlatformID(ILExecThread * _thread);
  extern ILString * _IL_InfoMethods_GetUserDomainName(ILExecThread * _thread);
  extern ILBool _IL_InfoMethods_IsUserInteractive(ILExecThread * _thread);

Index: int_table.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/engine/int_table.c,v
retrieving revision 1.65
retrieving revision 1.66
diff -C2 -r1.65 -r1.66
*** int_table.c 4 Jun 2003 03:57:44 -0000       1.65
--- int_table.c 21 Jun 2003 02:57:05 -0000      1.66
***************
*** 2462,2466 ****
        IL_METHOD("GetRuntimeVersion", "()oSystem.String;", 
_IL_InfoMethods_GetRuntimeVersion, marshal_pp)
        IL_METHOD("GetNetBIOSMachineName", "()oSystem.String;", 
_IL_InfoMethods_GetNetBIOSMachineName, marshal_pp)
!       IL_METHOD("GetOSVersion", "()oSystem.OperatingSystem;", 
_IL_InfoMethods_GetOSVersion, marshal_pp)
        IL_METHOD("GetUserDomainName", "()oSystem.String;", 
_IL_InfoMethods_GetUserDomainName, marshal_pp)
        IL_METHOD("IsUserInteractive", "()Z", 
_IL_InfoMethods_IsUserInteractive, marshal_bp)
--- 2462,2466 ----
        IL_METHOD("GetRuntimeVersion", "()oSystem.String;", 
_IL_InfoMethods_GetRuntimeVersion, marshal_pp)
        IL_METHOD("GetNetBIOSMachineName", "()oSystem.String;", 
_IL_InfoMethods_GetNetBIOSMachineName, marshal_pp)
!       IL_METHOD("GetPlatformID", "()vSystem.PlatformID;", 
_IL_InfoMethods_GetPlatformID, marshal_ip)
        IL_METHOD("GetUserDomainName", "()oSystem.String;", 
_IL_InfoMethods_GetUserDomainName, marshal_pp)
        IL_METHOD("IsUserInteractive", "()Z", 
_IL_InfoMethods_IsUserInteractive, marshal_bp)

Index: lib_info.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/engine/lib_info.c,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** lib_info.c  15 May 2003 06:02:07 -0000      1.2
--- lib_info.c  21 Jun 2003 02:57:05 -0000      1.3
***************
*** 51,60 ****
  
  /*
!  * public static OperatingSystem GetOSVersion();
   */
! ILObject *_IL_InfoMethods_GetOSVersion(ILExecThread *thread)
  {
!       /* TODO: recognise Windows versions */
!       return 0;
  }
  
--- 51,63 ----
  
  /*
!  * public static PlatformID GetPlatformID();
   */
! ILInt32 _IL_InfoMethods_GetPlatformID(ILExecThread *thread)
  {
! #ifdef IL_WIN32_PLATFORM
!       return 2;                       /* PlatformID.Win32NT */
! #else
!       return 128;                     /* PlatformID.Unix */
! #endif
  }