Remove tests that fail badly on Windows 98.
[wine] / dlls / kernel / tests / heap.c
1 /*
2  * Unit test suite for heap functions
3  *
4  * Copyright 2003 Dimitrie O. Paun
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  */
20
21 #include <stdarg.h>
22 #include <stdlib.h>
23
24 #include "windef.h"
25 #include "winbase.h"
26 #include "wine/test.h"
27
28 START_TEST(heap)
29 {
30     void *mem;
31     HGLOBAL gbl;
32     SIZE_T size;
33
34     /* Heap*() functions */
35     mem = HeapAlloc(GetProcessHeap(), 0, 0);
36     ok(mem != NULL, "memory not allocated for size 0\n");
37
38     mem = HeapReAlloc(GetProcessHeap(), 0, NULL, 10);
39     ok(mem == NULL, "memory allocated by HeapReAlloc\n");
40
41     /* Global*() functions */
42     gbl = GlobalAlloc(GMEM_MOVEABLE, 0);
43     ok(gbl != NULL, "global memory not allocated for size 0\n");
44
45     gbl = GlobalReAlloc(gbl, 10, GMEM_MOVEABLE);
46     ok(gbl != NULL, "Can't realloc global memory\n");
47     size = GlobalSize(gbl);
48     ok(size >= 10 && size <= 16, "Memory not resized to size 10, instead size=%ld\n", size);
49
50     todo_wine
51     { 
52         gbl = GlobalReAlloc(gbl, 0, GMEM_MOVEABLE);
53         ok(gbl != NULL, "GlobalReAlloc should not fail on size 0\n");
54     }
55
56     size = GlobalSize(gbl);
57     ok(size == 0, "Memory not resized to size 0, instead size=%ld\n", size);
58     ok(GlobalFree(gbl) == NULL, "Memory not freed\n");
59     size = GlobalSize(gbl);
60     ok(size == 0, "Memory should have been freed, size=%ld\n", size);
61
62     gbl = GlobalReAlloc(0, 10, GMEM_MOVEABLE);
63     ok(gbl == NULL, "global realloc allocated memory\n");
64
65     /* Local*() functions */
66     gbl = LocalAlloc(LMEM_MOVEABLE, 0);
67     ok(gbl != NULL, "local memory not allocated for size 0\n");
68
69     gbl = LocalReAlloc(gbl, 10, LMEM_MOVEABLE);
70     ok(gbl != NULL, "Can't realloc local memory\n");
71     size = LocalSize(gbl);
72     ok(size >= 10 && size <= 16, "Memory not resized to size 10, instead size=%ld\n", size);
73
74     todo_wine
75     {
76         gbl = LocalReAlloc(gbl, 0, LMEM_MOVEABLE);
77         ok(gbl != NULL, "LocalReAlloc should not fail on size 0\n");
78     }
79
80     size = LocalSize(gbl);
81     ok(size == 0, "Memory not resized to size 0, instead size=%ld\n", size);
82     ok(LocalFree(gbl) == NULL, "Memory not freed\n");
83     size = LocalSize(gbl);
84     ok(size == 0, "Memory should have been freed, size=%ld\n", size);
85
86     gbl = LocalReAlloc(0, 10, LMEM_MOVEABLE);
87     ok(gbl == NULL, "local realloc allocated memory\n");
88
89 }