Skip to content
Snippets Groups Projects
Commit f824769e authored by gerd's avatar gerd
Browse files

Building with cgc.

	* src/lisp/Config.FreeBSD (NM): Use linux-nm.

	* src/code/gc.lisp: Use bytes_allocated for cgc because
	get_bytes_allocated_{lower,higher} is only implemented for
	gencgc.
parent cdbef3f3
No related branches found
No related tags found
No related merge requests found
...@@ -5,7 +5,7 @@ ...@@ -5,7 +5,7 @@
;;; Carnegie Mellon University, and has been placed in the public domain. ;;; Carnegie Mellon University, and has been placed in the public domain.
;;; ;;;
(ext:file-comment (ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/gc.lisp,v 1.34 2003/04/11 15:17:45 pmai Exp $") "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/gc.lisp,v 1.35 2003/05/29 12:35:05 gerd Exp $")
;;; ;;;
;;; ********************************************************************** ;;; **********************************************************************
;;; ;;;
...@@ -57,15 +57,17 @@ ...@@ -57,15 +57,17 @@
;; #+(or cgc gencgc) ;; #+(or cgc gencgc)
;; (c-var-frob dynamic-usage "bytes_allocated") ;; (c-var-frob dynamic-usage "bytes_allocated")
#+(or cgc gencgc) #+gencgc
(progn (progn
(alien:def-alien-routine get_bytes_allocated_lower c-call:int) (alien:def-alien-routine get_bytes_allocated_lower c-call:int)
(alien:def-alien-routine get_bytes_allocated_upper c-call:int) (alien:def-alien-routine get_bytes_allocated_upper c-call:int)
(defun dynamic-usage () (defun dynamic-usage ()
(dfixnum:dfixnum-pair-integer (dfixnum:dfixnum-pair-integer
(get_bytes_allocated_upper) (get_bytes_allocated_lower))) (get_bytes_allocated_upper) (get_bytes_allocated_lower))))
)
#+cgc
(c-var-frob dynamic-usage "bytes_allocated")
(defun static-space-usage () (defun static-space-usage ()
(- (* lisp::*static-space-free-pointer* vm:word-bytes) (- (* lisp::*static-space-free-pointer* vm:word-bytes)
......
...@@ -9,7 +9,7 @@ LD = ld ...@@ -9,7 +9,7 @@ LD = ld
CPP = cpp CPP = cpp
CFLAGS = -Wstrict-prototypes -Wall -O2 -g -DWANT_CGC -m486 CFLAGS = -Wstrict-prototypes -Wall -O2 -g -DWANT_CGC -m486
ASFLAGS = -g -DWANT_CGC ASFLAGS = -g -DWANT_CGC
NM = nm -gp NM = $(PATH1)/linux-nm
UNDEFSYMPATTERN = -Xlinker -u -Xlinker & UNDEFSYMPATTERN = -Xlinker -u -Xlinker &
ASSEM_SRC = x86-assem.S ASSEM_SRC = x86-assem.S
ARCH_SRC = x86-arch.c ARCH_SRC = x86-arch.c
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment