9 lines
292 B
Scheme
9 lines
292 B
Scheme
|
;;; Package for Static heaps for the Scheme Shell
|
||
|
|
;;; Copyright (c) 1995 by Brian D. Carlstrom. See file COPYING.
|
||
|
|
|
||
|
|
;;; based on Scheme48 implementation.
|
||
|
|
;;; Copyright (c) 1993, 1994 by Richard Kelsey and Jonathan Rees.
|
||
|
|
|
||
|
|
(define (newspace-begin) *newspace-begin*)
|
||
|
|
(define (heap-pointer) *hp*)
|