= DosGiveSharedMem =