Changeset 737 for trunk/src/kernel32

Timestamp:

Aug 29, 1999, 4:56:47 PM (26 years ago)

Author:

sandervl

Message:

Interlock apis ported from Wine

Location:

trunk/src/kernel32

Files:

• KERNEL32.CPP (modified) (2 diffs)
• exceptutil.asm (modified) (2 diffs)
• interlock.asm (added)
• makefile (modified) (3 diffs)

trunk/src/kernel32/KERNEL32.CPP

@@ -1 @@
-/* $Id: KERNEL32.CPP,v 1.18 1999-08-26 12:55:34 sandervl Exp $ */
+/* $Id: KERNEL32.CPP,v 1.19 1999-08-29 14:56:02 sandervl Exp $ */
 
 /*
@@ -173 +173 @@
 //******************************************************************************
 //******************************************************************************
-LONG WIN32API InterlockedDecrement(LPLONG lplVal)
-{
-  dprintf(("KERNEL32:  InterlockedDecrement\n"));
-  return(O32_InterlockedDecrement(lplVal));
-}
-//******************************************************************************
-//******************************************************************************
-LONG WIN32API InterlockedIncrement(LPLONG lplVal)
-{
-  dprintf(("KERNEL32:  InterlockedIncrement\n"));
-  return(O32_InterlockedIncrement(lplVal));
-}
-//******************************************************************************
-//******************************************************************************
-LONG WIN32API InterlockedExchange( PLONG arg1, LONG  arg2)
-{
-    dprintf(("KERNEL32:  InterlockedExchange\n"));
-    return O32_InterlockedExchange(arg1, arg2);
-}
-
-
-/************************************************************************
- *           InterlockedCompareExchange     [KERNEL32.879]
- *
- * Atomically compares Destination and Comperand, and if found equal exchanges
- * the value of Destination with Exchange
- *
- * RETURNS
- * Prior value of value pointed to by Destination
- */
-PVOID WIN32API InterlockedCompareExchange(
-       PVOID *Destination, /* Address of 32-bit value to exchange */
-       PVOID Exchange,      /* change value, 32 bits */
-            PVOID Comperand      /* value to compare, 32 bits */
-) {
-   PVOID ret;
-   /* StopAllThreadsAndProcesses() */
-
-   ret=*Destination;
-        if(*Destination==Comperand) *Destination=Exchange;
-
-   /* ResumeAllThreadsAndProcesses() */
-   return ret;
-}
-
-/************************************************************************
- *           InterlockedExchangeAdd            [KERNEL32.880]
- *
- * Atomically adds Increment to Addend and returns the previous value of
- * Addend
- *
- * RETURNS
- * Prior value of value pointed to by cwAddendTarget
- */
-LONG WIN32API InterlockedExchangeAdd(
-       PLONG Addend, /* Address of 32-bit value to exchange */
-       LONG Increment /* Value to add */
-) {
-   LONG ret;
-   /* StopAllThreadsAndProcesses() */
-
-   ret = *Addend;
-   *Addend += Increment;
-
-   /* ResumeAllThreadsAndProcesses() */
-   return ret;
-}
-
-
 //******************************************************************************
 //******************************************************************************

trunk/src/kernel32/exceptutil.asm

@@ -1 @@
-; $Id: exceptutil.asm,v 1.1 1999-08-22 12:55:57 sandervl Exp $
+; $Id: exceptutil.asm,v 1.2 1999-08-29 14:56:02 sandervl Exp $
 
 ;/*
@@ -12 +12 @@
 
 CODE32          SEGMENT DWORD PUBLIC USE32 'CODE'
-                ASSUME  CS:FLAT ,DS:FLAT,SS:FLAT
         public  RaiseExceptionAsm
         extrn   OS2RAISEEXCEPTION : near

trunk/src/kernel32/makefile

@@ -1 @@
-# $Id: makefile,v 1.35 1999-08-26 15:05:14 sandervl Exp $
+# $Id: makefile,v 1.36 1999-08-29 14:56:02 sandervl Exp $
 
 #
@@ -33 +33 @@
  atom.obj disk.obj directory.obj cvtbitmap.obj hmmmap.obj \
  cvtmenu.obj cvtaccel.obj cvticon.obj cvticongrp.obj \
- cvtcursor.obj cvtcursorgrp.obj stubs.obj 
+ cvtcursor.obj cvtcursorgrp.obj stubs.obj interlock.obj
 
 
@@ -326 +326 @@
 cvtcursorgrp.obj: cvtcursorgrp.cpp $(PDWIN32_INCLUDE)\wincursor.h $(PDWIN32_INCLUDE)\winicon.h $(PDWIN32_INCLUDE)\misc.h cvtresource.h
 
+interlock.obj: interlock.asm
+
 clean:
         $(RM) *.OBJ *.LIB *.dll *~ *.map *.pch