485
edits
m (source tag) |
m (→Using mutexes: Removed html breaks in VDF source) |
||
Line 24: | Line 24: | ||
// Constants | // Constants | ||
Define ERROR_INVALID_HANDLE for 6 // taken from error.h of VS7 | Define ERROR_INVALID_HANDLE for 6 // taken from error.h of VS7 | ||
Define ERROR_ALREADY_EXISTS for 183 | Define ERROR_ALREADY_EXISTS for 183 | ||
Handle ghMuteX | |||
Handle ghMuteX | |||
// external functions | // external functions | ||
#IFNDEF Get_CreateMuteX | #IFNDEF Get_CreateMuteX | ||
Line 32: | Line 34: | ||
#IFNDEF Get_CloseHandle | #IFNDEF Get_CloseHandle | ||
External_Function CloseHandle "CloseHandle" Kernel32.dll Integer i1 Returns Integer | External_Function CloseHandle "CloseHandle" Kernel32.dll Integer i1 Returns Integer | ||
#ENDIF | #ENDIF | ||
// function to create a mutex | // function to create a mutex | ||
Procedure Create_MuteX_Object | Procedure Create_MuteX_Object | ||
Line 52: | Line 55: | ||
End | End | ||
Else Send None // rare error; object could not be created | Else Send None // rare error; object could not be created | ||
End_Procedure // Create_MuteX_Object | End_Procedure // Create_MuteX_Object | ||
// create the mutex | // create the mutex | ||
Send Create_MuteX_Object | Send Create_MuteX_Object |