From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 20892 invoked by alias); 9 Jan 2003 06:55:57 -0000 Mailing-List: contact cgen-help@sources.redhat.com; run by ezmlm Precedence: bulk List-Subscribe: List-Archive: List-Post: List-Help: , Sender: cgen-owner@sources.redhat.com Received: (qmail 20883 invoked from network); 9 Jan 2003 06:55:56 -0000 Received: from unknown (HELO neon-gw.transmeta.com) (63.209.4.196) by 209.249.29.67 with SMTP; 9 Jan 2003 06:55:56 -0000 Received: (from root@localhost) by neon-gw.transmeta.com (8.9.3/8.9.3) id WAA25871; Wed, 8 Jan 2003 22:55:38 -0800 Received: from mailhost.transmeta.com(10.1.1.15) by neon-gw.transmeta.com via smap (V2.1) id xma025851; Wed, 8 Jan 03 22:55:09 -0800 Received: from casey.transmeta.com (casey.transmeta.com [10.10.25.22]) by deepthought.transmeta.com (8.11.6/8.11.6) with ESMTP id h096tF318229; Wed, 8 Jan 2003 22:55:15 -0800 (PST) Received: (from dje@localhost) by casey.transmeta.com (8.9.3/8.7.3) id WAA13726; Wed, 8 Jan 2003 22:55:15 -0800 From: Doug Evans MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Message-ID: <15901.7379.309396.411858@casey.transmeta.com> Date: Thu, 09 Jan 2003 06:55:00 -0000 To: Ben Elliston Cc: cgen@sources.redhat.com Subject: exposed pipeline patch (long!) In-Reply-To: References: X-SW-Source: 2003-q1/txt/msg00009.txt.bz2 Ben Elliston writes: > I'm posting this patch on behalf of Graydon Hoare, who write this > exposed pipeline support last year. It's a more generalised form of > the (delay ..) rtx and has been used for a couple of ports already. Also, nit. I'd rather not add seq when there's already iota. > Index: utils.scm > +(define (seq p q) (if (> p q) '() (cons p (seq (+ p 1) q))))