From a00b8a9da3a4ad87d1c7363870a01d8681081121 Mon Sep 17 00:00:00 2001 From: Bruce Mitchener Date: Mon, 23 Jun 2014 21:20:43 +0700 Subject: [PATCH] [crt] Remove primitive_byte_allocate(). --- sources/lib/run-time/c-run-time.c | 9 --------- sources/lib/run-time/run-time.h | 1 - 2 files changed, 10 deletions(-) diff --git a/sources/lib/run-time/c-run-time.c b/sources/lib/run-time/c-run-time.c index a7350c0c97..b9777d5417 100644 --- a/sources/lib/run-time/c-run-time.c +++ b/sources/lib/run-time/c-run-time.c @@ -109,15 +109,6 @@ dylan_value primitive_allocate (DSINT size) { return((dylan_value)allocate(size * sizeof(dylan_value))); } -dylan_value primitive_byte_allocate (DSINT number_words, DSINT number_bytes) { - size_t size = (number_words * sizeof(dylan_value)) + number_bytes; -#if defined(GC_USE_BOEHM) - return (dylan_value)GC_MALLOC_ATOMIC(size); -#elif defined(GC_USE_MALLOC) - return (dylan_value)malloc(size); -#endif -} - dylan_value primitive_untraced_allocate (DSINT size) { return dylan__malloc__misc(size * sizeof(dylan_value)); } diff --git a/sources/lib/run-time/run-time.h b/sources/lib/run-time/run-time.h index 2f5b5f6d23..b772535f81 100644 --- a/sources/lib/run-time/run-time.h +++ b/sources/lib/run-time/run-time.h @@ -1189,7 +1189,6 @@ extern void mps__free(size_t *old); /* ALLOCATION PRIMITIVES */ extern dylan_value primitive_allocate(DSINT); -extern dylan_value primitive_byte_allocate(DSINT, DSINT); extern dylan_value primitive_untraced_allocate(DSINT); extern dylan_value primitive_manual_allocate(dylan_value); extern void primitive_manual_free(dylan_value);