🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.lisp
Article #159

Re: MS-DOS 動作可能な LISP を探しています。

#159
From: KURODA Hisao / くろだ ひさお
Date: Tue, 31 Mar 1998 00:00
17 lines
1288 bytes
In article <6fpoou$k89$1@maingate.hitachi-ms.co.jp> "Nobita" <takahash@hitachi-ms.co.jp> writes:

 | すべての要素に同じ関数を施すには、よく下のような関数が用いられます。
 | (非破壊的な場合)
 | 
 | (defun foo (x)
 |   (cond ((null x) nil)
 |         (t (cons (bar (car x)) (foo (cdr x))))))

すべての要素に同じ関数を施すには普通はmapを使うと思います。

(mapcar #'bar x)

;;; $Id: .signature,v 1.3 1996/09/20 07:06:26 kuroda Exp $
(define (くろだ ひさお)
  (email kuroda@msi.co.jp))
Technical Details
Message-ID: <KURODA.98Mar31174147@msi.co.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <6fpoou$k89$1@maingate.hitachi-ms.co.jp>

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 1421c0,6445cce8859c3a2c
X-Google-Attributes: gid1421c0,public
From: kuroda@msi.co.jp (KURODA Hisao / くろだ ひさお)
Subject: Re: MS-DOS 動作可能な LISP を探しています。
Date: 1998/03/31
Message-ID: <KURODA.98Mar31174147@msi.co.jp>
X-Deja-AN: 339417854
References: <6fpoou$k89$1@maingate.hitachi-ms.co.jp>
X-Nsubject: Re: MS-DOS $BF0:n2DG=$J(B LISP $B$rC5$7$F$$$^$9!#(B
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-2022-JP
Organization: Mathematical Systems Inc.,Tokyo,Japan / 株式会社 数理システム
Newsgroups: fj.lang.lisp