From mboxrd@z Thu Jan  1 00:00:00 1970
Path: news.gmane.org!not-for-mail
From: A Soare <alinsoar@voila.fr>
Newsgroups: gmane.emacs.devel
Subject: "garbage collection"
Date: Mon, 19 Mar 2007 12:07:59 +0100 (CET)
Message-ID: <31839729.686101174302479292.JavaMail.www@wwinf4206>
Reply-To: alinsoar@voila.fr
NNTP-Posting-Host: lo.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit
X-Trace: sea.gmane.org 1174302496 4016 80.91.229.12 (19 Mar 2007 11:08:16 GMT)
X-Complaints-To: usenet@sea.gmane.org
NNTP-Posting-Date: Mon, 19 Mar 2007 11:08:16 +0000 (UTC)
To: "Emacs   Dev  [emacs-devel]" <emacs-devel@gnu.org>
Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Mon Mar 19 12:08:08 2007
Return-path: <emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org>
Envelope-to: ged-emacs-devel@m.gmane.org
Original-Received: from lists.gnu.org ([199.232.76.165])
	by lo.gmane.org with esmtp (Exim 4.50)
	id 1HTFif-0005w5-Q4
	for ged-emacs-devel@m.gmane.org; Mon, 19 Mar 2007 12:08:06 +0100
Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43)
	id 1HTFk8-0000EP-Vq
	for ged-emacs-devel@m.gmane.org; Mon, 19 Mar 2007 06:09:36 -0500
Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43)
	id 1HTFk6-0000EI-Bc
	for emacs-devel@gnu.org; Mon, 19 Mar 2007 07:09:34 -0400
Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43)
	id 1HTFk3-0000Do-L0
	for emacs-devel@gnu.org; Mon, 19 Mar 2007 07:09:34 -0400
Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43) id 1HTFk3-0000De-HJ
	for emacs-devel@gnu.org; Mon, 19 Mar 2007 06:09:31 -0500
Original-Received: from smtp3.voila.fr ([193.252.22.173])
	by monty-python.gnu.org with esmtp (Exim 4.60)
	(envelope-from <alinsoar@voila.fr>) id 1HTFib-0001gF-D7
	for emacs-devel@gnu.org; Mon, 19 Mar 2007 07:08:01 -0400
Original-Received: from me-wanadoo.net (localhost [127.0.0.1])
	by mwinf4203.voila.fr (SMTP Server) with ESMTP id 56F891C00075
	for <emacs-devel@gnu.org>; Mon, 19 Mar 2007 12:07:59 +0100 (CET)
Original-Received: from wwinf4206 (wwinf4206 [10.232.2.33])
	by mwinf4203.voila.fr (SMTP Server) with ESMTP id 4A84D1C0005F
	for <emacs-devel@gnu.org>; Mon, 19 Mar 2007 12:07:59 +0100 (CET)
X-ME-UUID: 20070319110759305.4A84D1C0005F@mwinf4203.voila.fr
X-Originating-IP: [89.34.170.37]
X-Wum-Nature: EMAIL-NATURE
X-WUM-FROM: |~|
X-WUM-TO: |~|
X-WUM-REPLYTO: |~|
X-detected-kernel: Linux 2.4-2.6
X-BeenThere: emacs-devel@gnu.org
X-Mailman-Version: 2.1.5
Precedence: list
List-Id: "Emacs development discussions." <emacs-devel.gnu.org>
List-Unsubscribe: <http://lists.gnu.org/mailman/listinfo/emacs-devel>,
	<mailto:emacs-devel-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/pipermail/emacs-devel>
List-Post: <mailto:emacs-devel@gnu.org>
List-Help: <mailto:emacs-devel-request@gnu.org?subject=help>
List-Subscribe: <http://lists.gnu.org/mailman/listinfo/emacs-devel>,
	<mailto:emacs-devel-request@gnu.org?subject=subscribe>
Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org
Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org
Xref: news.gmane.org gmane.emacs.devel:68093
Archived-At: <http://permalink.gmane.org/gmane.emacs.devel/68093>

What is "garbage collection" from Feval is good for in this place?


DEFUN ("eval", Feval, Seval, 1, 1, 0,
       doc: /* Evaluate FORM and return its value.  */)
     (form)
     Lisp_Object form;
{
  Lisp_Object fun, val, original_fun, original_args;
  Lisp_Object funcar;
  struct backtrace backtrace;
  struct gcpro gcpro1, gcpro2, gcpro3;

  if (handling_signal)
    abort ();

  if (SYMBOLP (form))
    return Fsymbol_value (form);
  if (!CONSP (form))
    return form;

  QUIT;
  if ((consing_since_gc > gc_cons_threshold
       && consing_since_gc > gc_relative_threshold)
      ||
      (!NILP (Vmemory_full) && consing_since_gc > memory_full_cons_threshold))
    {
      GCPRO1 (form);
      Fgarbage_collect ();
      UNGCPRO;
    }

Merci d'avance.