๐Ÿš€ go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.lisp
Article #161

[gcl] how to make stream from file descriptor

#161
From: KURODA Hisao / ใใ‚ใ  ใฒใ•ใŠ
Date: Fri, 10 Apr 1998 00:00
21 lines
1332 bytes
gcl-2.2.2ใงใƒ•ใ‚กใ‚คใƒซ่จ˜่ฟฐๅญใ‹ใ‚‰ใ‚นใƒˆใƒชใƒผใƒ ใ‚’็”Ÿๆˆใ™ใ‚‹ใ“ใจใฏๅฏ่ƒฝใงใ—ใ‚‡ใ†ใ‹?

ๅ…ทไฝ“็š„ใซใฏใ€ๆฌกใฎใ‚ˆใ†ใซใ‚ฝใ‚ฑใƒƒใƒˆใ‚’ใ‚ชใƒผใƒ—ใƒณใ™ใ‚‹ใจใ€

>(setq socket (si::open-named-socket))
(6 . 10164)

car้ƒจใซใƒ•ใ‚กใ‚คใƒซ่จ˜่ฟฐๅญใŒ่ฟ”ใฃใฆใใพใ™ใŒใ€ใ“ใ‚Œใซread/writeใ‚’็™บ่กŒใ—ใŸใ„ใฎ
ใงใ™ใ€‚ใ‚ใ‚‹ใ„ใฏใ€

> (setq sock-stream (si::make-socket-stream "localhost" 5001))
#<two-way stream 00250c18>

ใฎใปใ†ใฏใกใ‚ƒใ‚“ใจใ‚นใƒˆใƒชใƒผใƒ ใ‚’่ฟ”ใ—ใฆใใ‚Œใ‚‹ใฎใงใ™ใŒใ€ใ“ใ‚Œใซ้กžไผผใ—ใŸ้–ขๆ•ฐใŒ
ใ‚ใ‚Œใฐๆ•™ใˆใฆใใ ใ•ใ„ใ€‚o/socket.cใจo/run_process.cใ‚’ใ–ใฃใจ่ฆ‹ใŸใฎใงใ™ใŒใ€
ใฟใคใ‘ใ‚‹ใ“ใจใŒใงใใพใ›ใ‚“ใงใ—ใŸใ€‚

;;; $Id: .signature,v 1.3 1996/09/20 07:06:26 kuroda Exp $
(define (ใใ‚ใ  ใฒใ•ใŠ)
  (email kuroda@msi.co.jp))
Technical Details
Message-ID: <KURODA.98Apr10172519@msi.co.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 1421c0,bdbe51cac4d31924,start
X-Google-Attributes: gid1421c0,public
From: kuroda@msi.co.jp (KURODA Hisao / ใใ‚ใ  ใฒใ•ใŠ)
Subject: [gcl] how to make stream from file descriptor
Date: 1998/04/10
Message-ID: <KURODA.98Apr10172519@msi.co.jp>
X-Deja-AN: 342687411
Followup-To: fj.lang.lisp
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-2022-JP
Organization: Mathematical Systems Inc.,Tokyo,Japan / ๆ ชๅผไผš็คพ ๆ•ฐ็†ใ‚ทใ‚นใƒ†ใƒ 
Newsgroups: fj.lang.lisp