Ejemplos de VMRun en C++ (Cpp)

Ejemplo n.º 1

Archivo: GL.c Proyecto: drudru/cel

void GLidle(void)
{
   VMSetupCall(Cpu, (uint32) GLidleObj, (uint32) GLidleMethod);
   VMRun(Cpu, 1);
   // Remove the returned result
   pull(Cpu);
}

Ejemplo n.º 2

Archivo: GL.c Proyecto: drudru/cel

void GLdisplay(void)
{
   VMSetupCall(Cpu, (uint32) GLdispObj, (uint32) GLdispMethod);
   VMRun(Cpu, 1);
   // Remove the returned result
   pull(Cpu);
}

Ejemplo n.º 3

Archivo: GL.c Proyecto: drudru/cel

void GLkeyboard(unsigned char key, int x, int y)
{
   Proto tmp;
   Proto pArray[3];
   char  tmpStr[2];

   GCOFF();

   tmpStr[0] = key;
   tmpStr[1] = 0;

   tmp = (Proto) stringToAtom(tmpStr);
   pArray[0] = tmp;
   tmp = objectNewInteger(x);
   pArray[1] = tmp;
   tmp = objectNewInteger(y);
   pArray[2] = tmp;

   VMSetupCallWithArgs(Cpu, (uint32) GLkeybObj, (uint32) GLkeybMethod, 3, (unsigned int *) pArray);
   VMRun(Cpu, 1);
   // Remove the returned result
   pull(Cpu);

   GCON();
}

Ejemplo n.º 4

Archivo: IDolphinStart.cpp Proyecto: brunobuzzi/DolphinVM

STDMETHODIMP CDolphinSmalltalk::Run(IUnknown* punkOuter)
{
	extern int APIENTRY VMRun(DWORD);

	piVM = this;
	
	Lock();

	HRESULT hr = VMRun(reinterpret_cast<DWORD>(punkOuter));

	Unlock();

	return hr;
}

Ejemplo n.º 5

Archivo: GL.c Proyecto: drudru/cel

void GLreshape(int width, int height)
{
   Proto tmp;
   Proto pArray[2];

   tmp = objectNewInteger(width);
   pArray[0] = tmp;
   tmp = objectNewInteger(height);
   pArray[1] = tmp;

   VMSetupCallWithArgs(Cpu, (uint32) GLreshapeObj, (uint32) GLreshapeMethod, 2, (unsigned int *) pArray);
   VMRun(Cpu, 1);
   // Remove the returned result
   pull(Cpu);
}

Ejemplo n.º 6

Archivo: IDolphinStart.cpp Proyecto: krodelin/DolphinVM

STDMETHODIMP CDolphinSmalltalk::Run(IUnknown* punkOuter)
{
#ifdef _AFX
	return E_NOTIMPL;
#else
	extern int APIENTRY VMRun(DWORD);

	piVM = this;
	
	Lock();

	HRESULT hr = VMRun(reinterpret_cast<DWORD>(punkOuter));

	Unlock();

	return hr;
#endif
}

Ejemplo n.º 7

Archivo: GL.c Proyecto: drudru/cel

void GLmotion(int x, int y)
{
   Proto tmp;
   Proto pArray[2];

   GCOFF();

   tmp = objectNewInteger(x);
   pArray[0] = tmp;
   tmp = objectNewInteger(y);
   pArray[1] = tmp;

   VMSetupCallWithArgs(Cpu, (uint32) GLmotionObj, (uint32) GLmotionMethod, 2, (unsigned int *) pArray);
   VMRun(Cpu, 1);
   // Remove the returned result
   pull(Cpu);

   GCON();
}

Ejemplo n.º 8

Archivo: GL.c Proyecto: drudru/cel

void GLmouse(int button, int state, int x, int y)
{
   Proto tmp;
   Proto pArray[4];

   GCOFF();

   tmp = objectNewInteger(button);
   pArray[0] = tmp;
   tmp = objectNewInteger(state);
   pArray[1] = tmp;
   tmp = objectNewInteger(x);
   pArray[2] = tmp;
   tmp = objectNewInteger(y);
   pArray[3] = tmp;

   VMSetupCallWithArgs(Cpu, (uint32) GLmouseObj, (uint32) GLmouseMethod, 4, (unsigned int *) pArray);
   VMRun(Cpu, 1);
   // Remove the returned result
   pull(Cpu);

   GCON();
}