Discussion:
[Lisp-cn] 关于common lisp 含有汉字的流写入文件报错问题
e***@gmail.com
2016-09-15 02:12:46 UTC
Permalink
我的猖译环境是windows
例emacs+slime+sbcl,平时甚汉语写lisp文件郜可以猖译运行,䜆是想芁把含有汉字的流写入文件就䌚报错,CLTL里面关于:element
type的参数基本郜试过了,然并卵啊,请问倧神芁怎么解决?
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn

---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁退订歀矀组并停止接收歀矀组的电子邮件请发送电子邮件到lisp-cn+***@googlegroups.com。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
宋 为
2016-09-15 08:50:46 UTC
Permalink
馊主意:看看用这个flexi-streams库行不行
(ql:quickload :flexi-streams)
(with-open-file (s "./a.txt"
:direction :output
:element-type '(unsigned-byte 8)
:if-exists :append)
(setq s (flexi-streams:make-flexi-stream
s
:external-format :utf-8))
(write-line "人生经验" s)
(write-line "长生不老" s))
我的编译环境是windows
下emacs+slime+sbcl,平时用汉语写lisp文件都可以编译运行,但是想要把含有汉字的流写入文件就会报错,CLTL里面关于:element
type的参数基本都试过了,然并卵啊,请问大神要怎么解决?
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn

---
您收到此邮件是因为您订阅了 Google 网上论坛的“Lisp-cn(Lisp中文用户组)”群组。
要退订此群组并停止接收此群组的电子邮件,请发送电子邮件到lisp-cn+***@googlegroups.com。
要查看更多选项,请访问 https://groups.google.com/d/opt
e***@gmail.com
2016-09-16 09:43:47 UTC
Permalink
谢谢,我把sbcl换成了ccl,于是问题解决了.............

圚 2016幎9月15日星期四 UTC+8䞋午4:50:52凉拌茶叶写道
銊䞻意看看甚这䞪flexi-streams库行䞍行
(ql:quickload :flexi-streams)
(with-open-file (s "./a.txt"
:direction :output
:element-type '(unsigned-byte 8)
:if-exists :append)
(setq s (flexi-streams:make-flexi-stream
s
:external-format :utf-8))
(write-line "人生经验" s)
(write-line "长生䞍老" s))
我的猖译环境是windows
例emacs+slime+sbcl,平时甚汉语写lisp文件郜可以猖译运行,䜆是想芁把含有汉字的流写入文件就䌚报错,CLTL里面关于:element
type的参数基本郜试过了,然并卵啊,请问倧神芁怎么解决?
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
<javascript:>
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn

---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁退订歀矀组并停止接收歀矀组的电子邮件请发送电子邮件到lisp-cn+***@googlegroups.com。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
Liutos
2016-09-18 02:27:26 UTC
Permalink
其实盞圓于没解决光速逃
Post by e***@gmail.com
谢谢,我把sbcl换成了ccl,于是问题解决了.............
圚 2016幎9月15日星期四 UTC+8䞋午4:50:52凉拌茶叶写道
銊䞻意看看甚这䞪flexi-streams库行䞍行
(ql:quickload :flexi-streams)
(with-open-file (s "./a.txt"
:direction :output
:element-type '(unsigned-byte 8)
:if-exists :append)
(setq s (flexi-streams:make-flexi-stream
s
:external-format :utf-8))
(write-line "人生经验" s)
(write-line "长生䞍老" s))
我的猖译环境是windows
例emacs+slime+sbcl,平时甚汉语写lisp文件郜可以猖译运行,䜆是想芁把含有汉字的流写入文件就䌚报错,
CLTL里面关于:element
type的参数基本郜试过了,然并卵啊,请问倧神芁怎么解决?
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
Liutos Love Linux LaTeX Lisp Ling

我的GitHub䞻页https://github.com/Liutos
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn

---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁退订歀矀组并停止接收歀矀组的电子邮件请发送电子邮件到lisp-cn+***@googlegroups.com。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
loong0
2016-09-18 03:29:28 UTC
Permalink
open的时候:external-format有给参数吗
我这里䞍给的话默讀是LATIN-1写䞭文䌚报猖码错误:external-format倌䌠:gbk或者:utf-8写䞭文就ok了
Post by Liutos
其实盞圓于没解决光速逃
Post by e***@gmail.com
谢谢,我把sbcl换成了ccl,于是问题解决了.............
圚 2016幎9月15日星期四 UTC+8䞋午4:50:52凉拌茶叶写道
銊䞻意看看甚这䞪flexi-streams库行䞍行
(ql:quickload :flexi-streams)
(with-open-file (s "./a.txt"
:direction :output
:element-type '(unsigned-byte 8)
:if-exists :append)
(setq s (flexi-streams:make-flexi-stream
s
:external-format :utf-8))
(write-line "人生经验" s)
(write-line "长生䞍老" s))
我的猖译环境是windows
例emacs+slime+sbcl,平时甚汉语写lisp文件郜可以猖译运行,䜆是想芁把含有汉字的流写入文件就䌚报错,CL
TL里面关于:element
type的参数基本郜试过了,然并卵啊,请问倧神芁怎么解决?
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
Liutos Love Linux LaTeX Lisp Ling
我的GitHub䞻页https://github.com/Liutos
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
Follow your dream!
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn

---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁退订歀矀组并停止接收歀矀组的电子邮件请发送电子邮件到lisp-cn+***@googlegroups.com。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
e***@gmail.com
2016-09-20 12:22:10 UTC
Permalink
嗯确实是这样。䞍过䞍胜C-c,M-k猖译含有汉字凜数的文件....

圚 2016幎9月18日星期日 UTC+8䞊午11:29:30cc写道
Post by loong0
open的时候:external-format有给参数吗
我这里䞍给的话默讀是LATIN-1写䞭文䌚报猖码错误:external-format倌䌠:gbk或者:utf-8写䞭文就ok了
Post by Liutos
其实盞圓于没解决光速逃
Post by e***@gmail.com
谢谢,我把sbcl换成了ccl,于是问题解决了.............
圚 2016幎9月15日星期四 UTC+8䞋午4:50:52凉拌茶叶写道
銊䞻意看看甚这䞪flexi-streams库行䞍行
(ql:quickload :flexi-streams)
(with-open-file (s "./a.txt"
:direction :output
:element-type '(unsigned-byte 8)
:if-exists :append)
(setq s (flexi-streams:make-flexi-stream
s
:external-format :utf-8))
(write-line "人生经验" s)
(write-line "长生䞍老" s))
我的猖译环境是windows
例emacs+slime+sbcl,平时甚汉语写lisp文件郜可以猖译运行,䜆是想芁把含有汉字的流写入文件就䌚报错,CLTL里面关于:element
type的参数基本郜试过了,然并卵啊,请问倧神芁怎么解决?
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
<javascript:>。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
Liutos Love Linux LaTeX Lisp Ling
我的GitHub䞻页https://github.com/Liutos
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
<javascript:>。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
Follow your dream!
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn

---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁退订歀矀组并停止接收歀矀组的电子邮件请发送电子邮件到lisp-cn+***@googlegroups.com。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
e***@gmail.com
2016-09-25 14:49:32 UTC
Permalink
.emacsäž­(set-language-environment 'utf-8),这句䜿甚utf-8时打匀䞭文名的文件䌚䞍星瀺。
Post by e***@gmail.com
嗯确实是这样。䞍过䞍胜C-c,M-k猖译含有汉字凜数的文件....
圚 2016幎9月18日星期日 UTC+8䞊午11:29:30cc写道
Post by loong0
open的时候:external-format有给参数吗
我这里䞍给的话默讀是LATIN-1写䞭文䌚报猖码错误:external-format倌䌠:gbk或者:utf-8写䞭文就ok了
Post by Liutos
其实盞圓于没解决光速逃
Post by e***@gmail.com
谢谢,我把sbcl换成了ccl,于是问题解决了.............
圚 2016幎9月15日星期四 UTC+8䞋午4:50:52凉拌茶叶写道
銊䞻意看看甚这䞪flexi-streams库行䞍行
(ql:quickload :flexi-streams)
(with-open-file (s "./a.txt"
:direction :output
:element-type '(unsigned-byte 8)
:if-exists :append)
(setq s (flexi-streams:make-flexi-stream
s
:external-format :utf-8))
(write-line "人生经验" s)
(write-line "长生䞍老" s))
我的猖译环境是windows
例emacs+slime+sbcl,平时甚汉语写lisp文件郜可以猖译运行,䜆是想芁把含有汉字的流写入文件就䌚报错,CLTL里面关于:element
type的参数基本郜试过了,然并卵啊,请问倧神芁怎么解决?
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
Liutos Love Linux LaTeX Lisp Ling
我的GitHub䞻页https://github.com/Liutos
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
Follow your dream!
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn

---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁退订歀矀组并停止接收歀矀组的电子邮件请发送电子邮件到lisp-cn+***@googlegroups.com。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
e***@gmail.com
2017-04-15 02:05:53 UTC
Permalink
https://my.oschina.net/ether/blog/755906,解决方匏参考这䞪铟接.
Post by e***@gmail.com
我的猖译环境是windows
例emacs+slime+sbcl,平时甚汉语写lisp文件郜可以猖译运行,䜆是想芁把含有汉字的流写入文件就䌚报错,CLTL里面关于:element
type的参数基本郜试过了,然并卵啊,请问倧神芁怎么解决?
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn

---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁退订歀矀组并停止接收歀矀组的电子邮件请发送电子邮件到lisp-cn+***@googlegroups.com。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
继续阅读narkive:
Loading...