[Waba-commits] CVS: waba/vm/win32 nmwin32_c.c,1.10,1.11 nmwin32_c.h,1.5,1.6

[MURANAKA M. <mo...@us...>]

Update of /cvsroot/waba/waba/vm/win32
In directory usw-pr-cvs1:/tmp/cvs-serv27666/win32

Modified Files:
	nmwin32_c.c nmwin32_c.h 
Log Message:
Implemented Vm.exit(). It corresponds to System.exit(). We have already got MainWindow.exit() but console application because it isn't defined as static. Even if it was defined as static, it's funny to call UI packages from console application.

Index: nmwin32_c.c
===================================================================
RCS file: /cvsroot/waba/waba/vm/win32/nmwin32_c.c,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -d -r1.10 -r1.11
*** nmwin32_c.c	2001/09/02 03:48:43	1.10
--- nmwin32_c.c	2001/09/02 10:06:51	1.11
***************
*** 3359,3362 ****
--- 3359,3380 ----
  	}
  
+ Var VmExit(Var stack[])
+ 	{
+ 	Var v;
+ 	int32 exitcode;
+ 
+ 	v.obj = 0;
+ 	exitcode = stack[0].intValue;
+ 
+ 	if (isApplication)
+ 	  {
+ 	    PostQuitMessage(exitCode);
+ 	  }
+ 	else
+ 	  {
+ 	    exit(exitcode);
+ 	  }
+ 	}
+ 
  Var VmSleep(Var stack[])
  	{

Index: nmwin32_c.h
===================================================================
RCS file: /cvsroot/waba/waba/vm/win32/nmwin32_c.h,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** nmwin32_c.h	2001/08/18 20:26:21	1.5
--- nmwin32_c.h	2001/09/02 10:06:51	1.6
***************
*** 47,50 ****
--- 47,51 ----
  FUNC(VmGetTimeStamp);
  FUNC(copyArray);
+ FUNC(VmExit);
  FUNC(VmSleep);
  FUNC(VmSetDeviceAutoOff);