Index: putil.ijs
===================================================================
--- putil.ijs (revision 515)
+++ putil.ijs (working copy)
@@ -163,13 +163,15 @@
NB. returns matrix with 4 cols: x0,y0,x1,y1
NB. special cases solid "pattern" of 1 0
linepattern=: 4 : 0
+nap=. ,`...@.('' -: ])`...@.('' -: [) NB. null appendable without effect
x=. > x
y=. _2 [\ y
if. x -: 1 0 do.
<. 2 ,\ y
else.
a=. ; 2 < @ (x&linepattern1) \ }: y
- <. _2 ,\ a , x linepattern2 _2 {. y
+ <. _2 ,\ a nap x linepattern2 _2 {. y NB. changed simple append into nap
+ NB. see
http://www.jsoftware.com/pipermail/programming/2009-April/014528.html
end.
)
On Tue, Apr 28, 2009 at 3:56 PM, bill lam <[email protected]> wrote:
> On Tue, 28 Apr 2009, June Kim wrote:
>> If there are cleaner modification, of which existence I am sure, I'd
>> be happy to hear. Also I wish this bug is removed in the later
>> release.
>
> Can you check out the svn and make a diff file of your patch so that I can
> apply the patch for you?
>
> --
> regards,
> ====================================================
> GPG key 1024D/4434BAB3 2008-08-24
> gpg --keyserver subkeys.pgp.net --recv-keys 4434BAB3
> 唐詩107 杜甫 春宿左省
> 花隱掖垣暮 啾啾棲鳥過 星臨萬戶動 月傍九霄多
> 不寢聽金鑰 因風想玉珂 明朝有封事 數問夜如何
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
