1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-06 22:31:13 -07:00

Add mpsw3.h

Copied from Perforce
 Change: 19228
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Pekka Pirinen 1998-01-16 18:41:54 +00:00
parent ab870063b9
commit d1b7febe6f
2 changed files with 19 additions and 14 deletions

View file

@ -1,6 +1,6 @@
/* impl.c.finalcv: FINALIZATION COVERAGE TEST
*
* $HopeName: MMsrc!finalcv.c(trunk.8) $
* $HopeName: MMsrc!finalcv.c(trunk.9) $
* Copyright (C) 1996,1997, 1998 Harlequin Group, all rights reserved
*
* READERSHIP
@ -28,20 +28,22 @@
/* What does the next line mean? @@@@ */
/* .hack.order.1, .hack.order.2 */
#include <assert.h>
#include <stdlib.h>
#include <stdio.h>
#include "testlib.h"
#include "mps.h"
#include "mpscamc.h"
#include "mpsavm.h"
#include "fmtdy.h"
#include "mpstd.h"
#ifdef MPS_OS_W3
#include "mpsw3.h"
#endif
#ifdef MPS_OS_SU
#include "ossu.h"
#endif
#include <assert.h>
#include <stdlib.h>
#include <stdio.h>
#define testArenaSIZE ((size_t)16<<20)
#define rootCOUNT 20

View file

@ -1,8 +1,8 @@
/* impl.c.qs: QUICKSORT
/* impl.c.qs: QUICKSORT
*
* $HopeName: MMsrc!qs.c(trunk.12) $
* $HopeName: MMsrc!qs.c(trunk.13) $
*
* Copyright (C) 1995,1996, 1998 Harlequin Group, all rights reserved
* Copyright (C) 1995, 1996, 1998 Harlequin Group, all rights reserved
*
* The purpose of this program is to act as a "real" client of the MM.
* It is a test, but (hopefully) less contrived than some of the other
@ -19,22 +19,24 @@
* list length 1000 makes 40404 conses (by experiment).
*
* Some registers are not nulled out when they could be.
*
*/
#include <assert.h>
#include <stdio.h>
#include <stdlib.h>
#include "testlib.h"
#include "mps.h"
#include "mpsavm.h"
#include "mpscamc.h"
#include "mpscmv.h"
#include "mpstd.h"
#ifdef MPS_OS_W3
#include "mpsw3.h"
#endif
#ifdef MPS_OS_SU
#include "ossu.h"
#endif
#include <assert.h>
#include <stdio.h>
#include <stdlib.h>
#define testArenaSIZE ((size_t)16<<20)
@ -548,5 +550,6 @@ int main(void)
mps_tramp(&r, &go, NULL, 0);
mps_arena_destroy(arena);
fprintf(stderr, "\nConclusion: Failed to find any defects.\n");
return 0;
}