From xemacs-m  Sat Feb  8 13:59:39 1997
Received: from crystal.WonderWorks.COM (crystal.WonderWorks.com [192.203.206.1])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id NAA01080
	for <xemacs-beta@xemacs.org>; Sat, 8 Feb 1997 13:59:37 -0600 (CST)
Received: by crystal.WonderWorks.COM 
	id QQccax12138; Sat, 8 Feb 1997 14:59:37 -0500 (EST)
Date: Sat, 8 Feb 1997 14:59:37 -0500 (EST)
Message-Id: <QQccax12138.199702081959@crystal.WonderWorks.COM>
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
From: Kyle Jones <kyle_jones@wonderworks.com>
To: xemacs-beta@xemacs.org
Subject: wot i need

This loop, uncompiled, runs about twice as fast under FSF Emacs
as it does under XEmacs 20.0.  Why?

(let ((i 0)) (while (< i 300000) (setq i (1+ i))))

If we can find out and solve it, I have a feeling we could go a
long way toward speeding up XEmacs.  Look at that loop.  No
consing, nothing but subrs called, no magic symbols, no buffer local
variables.  What is it that XEmacs is doing twice as much of to
get the same result?

