From mboxrd@z Thu Jan  1 00:00:00 1970
From: mdj@sourceware.cygnus.com
To: guile-cvs@sourceware.cygnus.com
Subject: guile/guile-core/ice-9 boot-9.scm
Date: Thu, 05 Aug 1999 05:06:00 -0000
Message-id: <19990805120600.32181.qmail@egcs.cygnus.com>
X-SW-Source: 1999-q3/msg00213.html
List-Id: <guile-cvs.sourceware.org>

CVSROOT:	/cvs/guile
Module name:	guile
Changes by:	mdj@egcs.cygnus.com	99/08/05 05:06:00

Modified files:
	guile-core/ice-9: boot-9.scm 

Log message:
	GOOPS needs the observer protocol specified for the new module
	system.  Here's a simple version for the old module system:
	* boot-9.scm (module-observers, module-weak-observers,
	module-observer-id, set-module-observers!,
	set-module-observer-id!): New accessors.
	(module-type): Added slots `observers',	`weak-observers' and
	`observer-id'.
	(module-observe, module-observe-weak, module-unobserve,
	module-modified!): New procedures.
	(module-make-local-var!, module-add!, module-remove!,
	module-clear!, module-define!, module-use!): Call module-modified!.