On Wed, 03 Dec 2008, David Mitchell wrote:
> Don,
>
> A more correct answer:
>
> Update to bigfiles.ijs
> ...
> CreateFileW=: >@{.@('kernel32 CreateFileW i *w i i * i i i'&(15!:0))
> ...
> u=: +./@(131072 2&=&(3!:0))
> ...
> bfsize=: 3 : 0
> if. u y do.
> try. fh=: CreateFileW ((7 u: y),{.a.);0;0;NULLPTR;OPEN_EXISTING;0;0 catch.
I guess it should be
try. fh=: CreateFileW (([: u: 7 u: y),{.a.);0;0;NULLPTR;OPEN_EXISTING;0;0
catch.
or
try. fh=: CreateFileW ((uucp y),{.a.);0;0;NULLPTR;OPEN_EXISTING;0;0 catch.
unless J will automatically coerce single byte data to wchar for *w
which I'm not sure.
--
regards,
====================================================
GPG key 1024D/4434BAB3 2008-08-24
gpg --keyserver subkeys.pgp.net --recv-keys 4434BAB3
唐詩203 柳宗元 登柳州城樓寄漳汀封連四州刺史
城上高樓接大荒 海天愁思正茫茫 驚風亂颭芙蓉水 密雨斜侵薜荔牆
嶺樹重遮千里目 江流曲似九迴腸 共來百越文身地 猶自音書滯一鄉
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
