Jürgen, gute Besserung.
Am 22.01.23 um 14:07 schrieb Dr. Jürgen Sauermann:
Gentlemen,
I am sorry for not responding earlier to any emails to bug-apl@gnu.org.
I was unexpectedly taken offline after new year and I am
now online again, although only for a short period. Just
having returned from
Hi,
I have some bigger data collections to analyze.
Zeros are represented as .000 within the records.
Reading the files with ⎕FIO[49], I get a vector of vector with numbers.
⊃⍎¨ file should return the matrix of numbers.
⍎¨ fails with RANK ERROR on .000
Short extract:
⍎¨⊂'.000'
RANK ERROR+
μ-
Hi,
Works as expected
⊃'Sue' 'Maria' 'Annalisa'
is an array 3 by 8.
⊂⊃'Susan' 'Mary' 'Annalisa'
is an element (⊂) of a 3 by 8 array (⊃'Susan' 'Mary' 'Annalisa' ).
Finally each element in ⊃'Sue' 'Maria' 'Annalisa' gets assigned an
array of ⊃'Susan' 'Mary' 'Annalisa'
Greetings
Hans-Peter
2 3 4 Sue
5 6 7 8 Maria
9 10 11 12 Annalisa
5 4 1 2 3 4 Susan
5 6 7 8 Mary
9 10 11 12 Annalisa
APL+Win 4.0
var←0 0 0 ⋄ (1⊃var)←5 4 ⋄ (2⊃var)←3 4⍴⍳12 ⋄ (3⊃var)←⊃'Sue' 'Maria' 'Annalisa'
⋄ var ⋄ (3⊃var)←⊂⊃'Susan
room for interpretation.
However, both APL2 and Dyalog agree on case 1 and therefore I changed
GNU APL to behave the same.
Best Regards,
Jürgen
On 3/4/23 8:25 PM, Hans-Peter Sorge wrote:
Hi,
Works as expected
⊃'Sue' 'Maria' 'Annalisa'
is an array 3 by 8.
⊂⊃&#x
DOMAIN ERROR in this case.
Best Regards,
Jürgen
On 3/6/23 9:16 PM, Hans-Peter Sorge wrote:
Hello Jürgen,
I agree with your case 1/2 Statement.
The examples I was showing is actually "off by 1".
I was referring to
(1/3⊃V)←1
having
a←
length 1 axis added by
1/ when*X* is
scalar) and therefore *(3⊃V)←1 *and *(1/3⊃V)←1 *should IMHO yield the
same.
Best Regards,
Jürgen
On 3/6/23 9:16 PM, Hans-Peter Sorge wrote:
Hello Jürgen,
I agree with your case 1/2 Statement.
The examples I was showing is actually "off by 1".
3/8/23 9:05 PM, Hans-Peter Sorge wrote:
Hello Jürgen,
sorry that I'm so insistent
in
APL2 Programming:Language Reference
it is stated:
Selective Specification:Compress can be used for selective specification:
M←32ρι6
M
12
34
56
(10/M)←'ABC'
M
A2
B4
C6
Using our example V
V←
e that in one way or
the other seems not really satisfactory but somewhat arbitrary.
I would therefore propose to avoid such constructs for the sake
of portability.
Best Regards,
Jürgen
On 3/9/23 6:56 PM, Hans-Peter Sorge wrote:
Hi Jürgen,
thank you for considering it.
Your work is admirabl
A 1 2 3 4 5 1 1 1
1 1 1
1 1 1
(1/3⊃V) ≡ 3⊃V
1
(3⊃V)←1
(1/3⊃V) ≡ 3⊃V
1*
Best Regards,
Jürgen
On 3/12/23 7:02 PM, Hans-Peter Sorge wrote:
Hi Jürgen,
back from wintry Hahnenklee/Harz here are my thoughts.
In ref.: "like a variable
Hi Jürgen,
looks like I have plenty of time,
however, it's being usefully invested:-)
(SVN 1660)
This displays as expected.
X (8⎕CR X ←1 2 3 ⊃¨⊂'A' 'CD' 'EF')
A CD EF ┌→──┐
│A ┌→─┐ ┌→─┐│
│ │CD│ │EF││
│ └──┘ └──┘│
└ϵ──┘
A..CD
*⊃* give different results
in GNU APL and also in IBM APL2 (PC version).
Best Regards,
Jürgen
On 3/14/23 10:12 PM, Hans-Peter Sorge wrote:
Hi Jürgen,
looks like I have plenty of time,
however, it's being usefully invested:-)
(SVN 1660)
This displays as expected.
X (8⎕CR X ←1 2 3
Hi,
*This gives a stack trace:*
X←0 2⍴ ⊂'0'
⍎¨X[;1]
==
Assertion failed: start <= body_from_to.low
in Function: set_error_info
in file: Executable.cc:602
C/C++ call stack:
*** usele
Hi,
I have a function E (as simple as in test below) in my workspace (WS
size 2.9MB).
)DUMP and
)loading it produces an error:
)LOAD
DUMPED 2023-09-28 19:44:54 (GMT+2)
VALENCE ERROR
⎕CT←1 E-13
^ ^
Just
)ERASE E
∇E ∇ ⍝ recreate ist
)DUMP
)LOAD ...
fix
L tends to use uppercase E and ¯ (like 1E¯13)
in .apl files and lowercase e and ASCII - (like 1e-13) in .xml files.
Therefore
the combination of uppercase E and ASCII - is not supposed to occur in
either file format.
Best Regards,
Jürgen
On 9/29/23 14:28, Hans-Peter Sorge wrote:
Hi,
I have a fu
l and .apl
files
are human readable). GNU APL tends to use uppercase E and ¯ (like 1E¯13)
in .apl files and lowercase e and ASCII - (like 1e-13) in .xml files.
Therefore
the combination of uppercase E and ASCII - is not supposed to occur in
either file format.
Best Regards,
Jürgen
On 9/29/23 14:28,
created with this
bug then maybe the following can fix them:
*)CLEAR**
**∇Z←A E B**
** Z←A×10⋆B**
**∇**
**)COPY broken_WS**
**)DUMP broken_WS**
*
Best Regards,
Jürgen
On 9/30/23 15:54, Hans-Peter Sorge wrote:
Hi Jürgen,
.. not every key-stroke.
But this one:
⎕FC←'.,⋆0_*-*'
Hi Jürgen,
thank you a lot.
Best Regards,
Hans-Peter
Am 29.09.23 um 16:08 schrieb Dr. Jürgen Sauermann:
Hi Peter,
thanks, fixed in *SVN 1734*.
Best Regards,
Jürgen
On 9/27/23 23:08, Hans-Peter Sorge wrote:
Hi,
*This gives a stack trace:*
X←0 2⍴ ⊂'0'
Hi,
Just for fun i did some "Home work" for my wife.
Kids in school were to guess (and calculate) numbers.
For the calculation part I came up with an APL Funktion (No more school
- right ?-).
[0] Mathe_Bug
[1] L←278 213 1046 2884 391
[2] R←87 32 49 479 324
[3] E←L∘.× R ⍝ Possible cal
Jürgen,
Thank you.
Best Regards
Hans-Peter
Am 10.03.24 um 12:16 schrieb Dr. Jürgen Sauermann:
Hi Hans-Peter,
thanks, fixed in *SVN 1764*.
Best Regards,
Jürgen
On 3/6/24 15:24, Hans-Peter Sorge wrote:
Hi,
Just for fun i did some "Home work" for my wife.
Kids in school were to
Jürgen, thank you!
Am 30.06.24 um 13:41 schrieb Dr. Jürgen Sauermann:
Hi,
I am happy to announce that *GNU APL 1.9* has been released.
GNU APL is a free implementation of the ISO standard 13751 aka.
"Programming Language APL, Extended".
The 1.9 release contains:
* Bug fixes
Have fun!
Dr
Hi,
Just a simple test:
x.y ← 1 2 3
x.y
1 2 3
x.y[1]
1
1⊃x.y
1
⎕IO⊃x.y
1
(⎕IO⊃x.y)←⊂ 'abc'
SYNTAX ERROR+
(⎕IO⊃x.y)←⊂'abc'
^ ^
(1⊃x.y)←⊂ 'abc'
x.y
abc 2 3
Greetings
Hans-Peter
Peter,
according to the IBM language reference page 41 is
selective specification limited to specific functions,
and *'.'* is unfortunately not one of them.
I will look into making this working, but it could be tricky and take
a while,
In the meantime you could use *x['y']* ins
Hi Jürgen,
thank you.
Best Regards
Hans-Peter
Am 28.08.24 um 13:40 schrieb Dr. Juergen Sauermann:
Hi Hans-Peter,
thanks, fixed in *SVN 1779*.
Best Regards,
Jürgen
On 8/25/24 18:35, Hans-Peter Sorge wrote:
Hello Jürgen,
the case stems from Simple_SQL.apl
I was loading the Workspace, did
Am 12.04.2016 um 13:18 schrieb Jay Foad:
> 'foobartestfootest' replace 'foo' 'xy'
Hi,
there are some corner conditions ((1↓u),⍺ contains u, but ⍺ does not):
replace←{(⍴v)↓∊(⊂v),¨(↑⍴u)↓¨(+\u⍷a)⊂a←u,⍺⊣(u v)←⍵}
'foobartestfootest' replace 'foo' 'xy'
xybartestxytest
'fo
Hi,
this looks more like a comma separated value list ( fds ⎕CSV Array )
fds: field delimiter string like
fds←' ",;≡'
fds[1] ←→ Numeric field quote -
alt ⊂'()' or other brackets to output (field)
fds[2] ←→ Character field quote -
alt ⊂'<>' or other brackets to output
fds[3
Am 15.05.2016 um 03:49 schrieb David B. Lamkins:
> While `$ info apl` speaks to the issues around function/operator ambiguity,
> it does not make any mention of the outer product case.
>
> I suspect that the failure of "outer product expand" is an oversight. This
> case is disambiguated by notic
Hi,
in files
trunk/README-9-post-installation
and
trunk/support-files/105-key-International-Keyboard/keyboard1.txt
"gnu.apl" should be named "gnu-apl".
fix:
cd $YOURPATH/trunk
sed -i s/gnu[.]apl/gnu-apl/ \
README-9-post-installation \
support-files/105-key-International-Keyboard/keyboard1
..
and further:
dates ← '2017-01-02' '2017-01-03'
(⊂'s/([0-9]+)-([0-9]+)-([0-9]+)/\1 \2 \3/') ⎕Regex ¨ dates
results in
('2017' '01' '02') ('2017' '01' '03')
and
dates ← ⊃ '2017-01-02' '201
running < ⍎¨ 10 ⍴'0' > takes 2 sec
running < ⍎¨ 50 ⍴'0' > takes 72 sec
On a Lenovo W520.
The time it takes to convert vectors with >> 50 elements
is just too much.
Can this be fixed?
Hans-Peter
ould there be a need for a fix anyway? aren't all 'lines'
> (10/50) treated the same and run as fast as possible anyway?
>
>
> On Fri, 5 Jan 2018 17:05:59 +0100
> Hans-Peter Sorge wrote:
>
>> running < ⍎¨ 10 ⍴'0' > takes 2 sec
>&g
Hello Juergen,
in Quad_SVx.cc around line 570:
char filename[APL_PATH_MAX + 1];
int slen = snprintf(filename, APL_PATH_MAX, "%s/%s",
dirname, entry->d_name);
if (slen >= APL_PATH_MAX) filename[APL_PATH_MAX] = 0;
filename will be returned at most
Hello Chris,
thank you for this master piece. The line editing in GNU APL is a bit
cumbersome.
But the apl session gets blocked during editing (edif2).
Currently I have no clue, how to analyze it.
Thank you again.
Hans-Peter
Am 30.07.2018 um 20:52 schrieb Chris Moller:
>
> Thanks, Jürgen.
>
Hello Jürgen,
this is off by one:
∇qio_test
[1] ⎕IO∇
qio_test
1
⍎¨ 'qio_test' 'qio_test'
0
0
Naturally it affects indexing too.
Greetings
Hans-Peter
⍎¨'qio_test' 'qio_test'
> 1
> 1*
>
> Which SVN version are you using?
>
> /// Jürgen
>
>
>
> On 08/02/2018 01:19 PM, Hans-Peter Sorge wrote:
>> Hello Jürgen,
>>
>> this is off by one:
>>
>> ∇qio_test
>
test
> [1] ⎕IO
> ∇
> ⍎¨'qio_test' 'qio_test'
> 1
> 1*
>
> Which SVN version are you using?
>
> /// Jürgen
>
>
>
> On 08/02/2018 01:19 PM, Hans-Peter Sorge wrote:
>> Hello Jürgen,
>>
>> this is off by one:
&
occur only on 64 bit machines
>> (strange enough).
>> I will look into it.
>>
>> /// Jürgen
>>
>>
>>
>> On 08/02/2018 03:25 PM, Hans-Peter Sorge wrote:
>>> Hello Jürgen,
>>>
>>> some drilling
>>>
>>>
itted the update to https://github.com/ChrisMoller/edif
>
> --Chris
>
>
> On 02/08/18 07:12, Hans-Peter Sorge wrote:
>>
>> Hello Chris,
>>
>> thank you for this master piece. The line editing in GNU APL is a bit
>> cumbersome.
>>
>> But the apl s
Hello,
The ⎕IO bug is back.
(note: ⎕IO ←→ 0 seems to be set to 0 using edif2)
∇qio_test[⎕]∇
∇
[0] qio_test
[1] ⎕IO
∇
⎕IO←1
⎕IO
1
qio_test
1
⍎¨ 'qio_test' 'qio_test'
1
1
⎕IO←0
⎕IO
0
qio_test
0
⍎¨ '
Hi Jürgen,
is fixed - thank You.
Best Regards,
Hans-Peter
Am 16.08.2018 um 21:14 schrieb Juergen Sauermann:
> Hi Hans-Peter,
>
> thanks, hopefully fixed in *SVN 1069*.
>
> Best Regards,
> /// Jürgen
>
>
> On 08/16/2018 07:29 PM, Hans-Peter Sorge wrote:
>>
>
auermann wrote:
>> Hi Hans-Peter,
>>
>> thanks, hopefully fixed in *SVN 1069*.
>>
>> Best Regards,
>> /// Jürgen
>>
>>
>> On 08/16/2018 07:29 PM, Hans-Peter Sorge wrote:
>>>
>>> Hello,
>>>
>>&
>
>> Best Regards,
>>
>> Hans-Peter
>>
>>
>> Am 16.08.2018 um 21:31 schrieb Chris Moller:
>>>
>>> Not that I expected otherwise, but edif and edif2 still work as
>>> expected.
>>>
>>> cm
>>>
>>
e queue, and
> more signals being emitted. I've put a patch in (but haven't
> committed it yet, and it should fix the segfault) that prevents all
> that, but my question is whether the "session blocked" bug happens
> only after the second quad-fx. I just can&
t
>
> Mostly, what it does is detect multiple ⎕fx invocations of libedif2.so
> and short-circuits them, leaving the inotify() process intact and the
> message queue opened only once. It also detects )clear and
> closes/unlinks the queue, kills the inotify() process, and closes any
&
YES - Thank You -
I'll have a good night sleep now:-)
Peter
Am 20.08.2018 um 21:17 schrieb Chris Moller:
> Aha! That both versions, edif and edif2, fail the same was a great
> clue! Another patch just committed...
>
>
> On 20/08/18 13:03, Hans-Peter Sorge wrote:
>>
ould be great. It works on my machines, but obviously that's no
> guarantee.
>
> Thanks,
> Chris
>
> (Now maybe I can get a good night's sleep...)
>
>
> On 20/08/18 17:58, Hans-Peter Sorge wrote:
>>
>> YES - Thank You -
>>
>> I'll have a good night sleep now:-)
>>
>> Peter
>>
>>
>
t;corrupted
> double-linked list" message comes from malloc, so I'm guessing
> unallocated memory is being stepped on, but valgrind didn't catch any
> of that so I'm not sure what's causing it.
>
> I'll look into the inotify stuff.
>
> Chris
>
>
>
Hello Jürgen,
compile fails with
Executable.cc: In member function 'void Executable::setup_lambdas()':
Executable.cc:529:46: error: no matching function for call to
'Executable::setup_one_lambda(ShapeItem&, int&)'
b = setup_one_lambda(b, ++lambda_num) - 1; // -1 due to ++b
in loop(b)
.**
> **
> *
> Best Regards,
> /// Jürgen
>
>
>
> On 10/08/2018 10:08 PM, Hans-Peter Sorge wrote:
>> Hello Jürgen,
>>
>> compile fails with
>>
>> Executable.cc: In member function 'void Executable::setup_lambdas()':
>> Execut
Hello Jürgen,
here comes an other corner case.
The following two cases work as expected.
(⍳16)⍴'a'
SYSTEM LIMIT (rank)
(⍳16)⍴'a'
^ ^
(⍳16)⍴⊂'a'
SYSTEM LIMIT (rank)
(⍳16)⍴⊂'a'
^ ^
This case fails to detect the SYSTEM LIMIT and Kills the session:
Hello Jürgen,
This looks rather simple ...
)clear
CLEAR WS
' '=⊂⊂'yy'
==
Assertion failed: !sub_val->is_simple_scalar()
in Function: PointerCell
in file: PointerCell.cc:30
Call stack:
---
Hi Jürgen,
it looks like there is some inconsistency.
x←4 4⍴'XX' '' '' '' '' '' '' ''
s←(⍳4)∘.,⍳4
s
1 1 1 2 1 3 1 4
2 1 2 2 2 3 2 4
3 1 3 2 3 3 3 4
4 1 4 2 4 3 4 4
((∊2=⍴¨x)/,s)⌷x
XX
XX
- expected (no leading empty elements)
XX
XX
⍴((∊2=
Hi Jay,
My intend was to get each matrix element defined by a (row,column)-pair
like:
1 3 5∘.,1 3 5 ⍝ the row,column pairs in a matrix
1 1 1 3 1 5
3 1 3 3 3 5
5 1 5 3 5 5
(1 3 5∘.,1 3 5)⌷¨⊂A ⍝ the matrix elements (in a matrix)
ACE
KMO
UWY
(1 3 ∘.,1 3 )⌷¨⊂A ⍝ works ni
Hi,
Tokenizer.cc:764:4: error: floating constant exceeds range of 'long
double' [-Werror=overflow]
exp_0_9(1E30)
^~~
setting
static const long double expo_tab[300] =
and removing
exp_0_9(1E30)
Fixes it.
Thanks
Hans-Peter
Hi,
on arm 64 bit
*automake* returns with
/./config.guess: unable to guess system type/
*uname -m* returns /aarch64/
to fix the problem run
*automake --add-missing*
If the most recent version of config.guess was included from svn it
should fix it.
Greetings
HP
Hi,
it rarely happens - here is one.
[joy@joyw520 ~]$ apl
__ _ __ __ __ ___ __
/ // | / // / / / / | / __ \ / /
/ / __ / |/ // / / / / /| | / /_/ // /
/ /_/ // /| // /_/ / / ___ |
Hi,
There are two inconsistencies (and slightly annoying) when editing:
1 - is a small inconsistency when deleting lines in editor mode.
∇X[⎕]
[0] X
[1] a
[2] b
[3] c
[4] d
[5] e
[6] f
∇
[7] [∆1-3] the editor only deletes lines 1 and 2
[6] [⎕]
∇
[0] X
[3] c
[4]
Weitergeleitete Nachricht
Betreff:Re: Function editing and line editing have inconsistencies.
Datum: Thu, 12 Mar 2020 19:04:38 +0100
Von:Hans-Peter Sorge
An: Blake McBride
I'd like it that way.
In IBM APL2 you can do full screen editing. But in Gn
d fantastic mode for GNU APL:
https://github.com/lokedhs/gnu-apl-mode
It makes working with GNU APL a pleasure and removes the necessity
of the
full screen editing.
Br,
/Alexey
Hans-Peter Sorge mailto:hanspeterso...@netscape.net>> writes:
> Weite
entry line 456
cursor up - display entry line 123
cursor down - display entry line 456
cursor down - display current entry line
which looks OK to me.
Best Regards,
Jürgen
On 3/12/20 3:40 PM, Hans-Peter Sorge wrote:
Hi,
There are two inconsistencies (and slightly annoying) when editing:
1 - is a
Hi,
Your ⎕IO is 0
⎕IO←1
Display (2 2 ⍴ 104 105 106 107) ⍳ (3 4 ⍴ 100+⍳100)
┏→━━┓
↓┏⊖┓ ┏⊖┓ ┏⊖┓ ┏→━━┓┃
┃┃0┃ ┃0┃ ┃0┃ ┃1 1┃┃
┃┗━┛ ┗━┛ ┗━┛ ┗━━━┛┃
┃┏→━━┓ ┏→━━┓ ┏→━━┓ ┏⊖┓ ┃
┃┃1 2┃ ┃2 1┃ ┃2 2┃ ┃0┃ ┃
┃┗━━━┛ ┗━━━┛ ┗━━━┛ ┗━┛ ┃
┃┏⊖┓ ┏⊖┓ ┏⊖┓ ┏⊖┓ ┃
┃┃0┃
Hi,
how about
∇find_grade[⎕]∇
∇
[0] r←find_grade g;gm;gl
[1] gm←0 65 70 80 90
[2] gl←'FDCBA'
[3] r←,¨gl[+/[1]gm ∘.≤ g]
∇
m,find_grade m←5 2⍴0 64 65 69 70 79 80 89 90 100
0 64 F F
65 69 D D
70 79 C C
80 89 B B
90 100 A A
Regards
Hans-Peter
Am 14.04.2
Hi,
I just noted some inconsistencies:
0÷0
1
0.1÷0
DOMAIN ERROR
0.1÷0
^ ^
0.1÷0 1
DOMAIN ERROR
0.1÷0 1
^ ^
0÷0 1
1 0
1 0 ÷ 0
DOMAIN ERROR
1 0÷0
^ ^
0 0 ÷ 0
1 1
0 ÷ 0 0
1 1
1 ÷ 0 0
DOMAIN ERROR
1÷0
Hi,
this case should be all zeros:
gradeDistri 'G'
A 0 100
B 0 100
C 0 100
D 0 100
F 0 100
looks ok:
gradeDistri 'AG'
A 1 100
B 0 0
C 0 0
D 0 0
F 0 0
Regards
Hans-Peter
Am 17.04.20 um 17:29 schrieb Otto Diesenbacher-Reinmüller:
Hi APLers,
first, many thanks to Mohammad, K
10:26:09PM +0200, Hans-Peter Sorge wrote:
Hi,
I just noted some inconsistencies:
0÷0
1
0.1÷0
DOMAIN ERROR
0.1÷0
^ ^
0.1÷0 1
DOMAIN ERROR
0.1÷0 1
^ ^
0÷0 1
1 0
1 0 ÷ 0
DOMAIN ERROR
1 0÷0
^ ^
0 0 ÷ 0
1 1
B 0 0.0 B 0 0.0
C 3 20.0 C 1 20.0 C 0 0.0 C 0 0.0 C 0 0.0
D 2 13.3 D 1 20.0 D 0 0.0 D 0 0.0 D 0 0.0
F 1 6.7 F 1 20.0 F 0 0.0 F 0 0.0 F 0 0.0
Regards
Hans-Peter
Am 17.04.20 um 22:29 schrieb Hans-Peter Sorge:
Hi,
this case should be all z
Hi, this boils down to:
i←63
t←? 1000 ⍴ i
t = 2÷⍨ {⍵×2} fasteach t
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
This is some intermittent bug..
with less than 255 elements the all elements are always equal
t←? 255 ⍴ i
+/t = 2÷⍨ {⍵×2} fasteach t
255
t←? 512 ⍴ i
+/t = 2÷⍨ {⍵×2} fasteach t
50
t←? 300 ⍴ i
+/t = 2÷⍨ {⍵×2} fasteach t
9
256 elements random number of ele
Hi,
just to let you know (FC32, most recent version). The dependency shows
dnf deplist apl-1.8-0.x86_64.rpm
.
dependency: libstdc++.so.6(GLIBCXX_3.4.9)(64bit)
provider: libstdc++-10.2.1-1.fc32.x86_64
dependency: libtinfo.so.5()(64bit)
provider: ncurses-compat-libs-6.1-15.20191109.f
Hi,
the recent update to emacs 27.1 gave me some headaches.
Starting emacs FILE, the warning 'Package cl is depricated' popped up
and did not open FILE.
To make it short:
Emacs started with path /usr/share/emacs/27.1/site-lisp in mind.
Then it did not find a proper file and continued to loo
Hi,
the Command is being correctly executed, the return codes are -10
Command←'echo "sad x asds" | sed "s/x/y/g"'
Handle←⎕FIO[24] Command
D←⎕FIO[6] Handle
ZN←⎕UCS D
ZN
sad y asds
⎕FIO[25] Handle
¯10
Command←'sed "s/x/y/g" <<< "sad x asds"'
Handle
Hi,
the return size from ⎕FIO[24] / ⎕FIO[6] is limited to 5000B:
long←6000⍴'#'
Command←'echo "',long,'"'
Handle←⎕FIO[24] Command
D←⎕FIO[6] Handle
ZN←⎕UCS D
⍴ZN
5000
Should be: What ever it takes :-)
Regards
Hans-Peter
Hi,
⍝ works as expected
(3) ↑ 'abcd'
abc
⍝ works as expected too
(,3) ↑ 'abcd'
abc
⍝ looks like a bug here - IBM APL is OK
(,3) ↑¨ 'abcd' 'wxyz' ''
LENGTH ERROR
(,3)↑¨'abcd' 'wxyz' ''
^ ^
⍝ needs to be a scalar
(,/,3) ↑¨ 'abcd' 'wxyz' ''
, Oct 29, 2020 at 10:22:52PM +0100, Hans-Peter Sorge wrote:
the return size from ⎕FIO[24] / ⎕FIO[6] is limited to 5000B:
(...)
Should be: What ever it takes :-)
It's not limited to 5000B, it's just the default size and you can use
any other with dyadic form. ⎕FIO is fairly low-lev
Handle←⎕FIO[24] Command) ◊ ⎕FIO[25] Handle**
**sad y asds**
**
**768**
*
The *728* above is the exit code *3* shifted 8 bits. This is only to
demonstrate the shift,
normally you would use 0 instead of 3.
Hope this helps,
Jürgen
On 10/29/20 9:06 PM, Hans-Peter Sorge wrote:
Hi,
the Command is b
Hi,
working with an external editor under some circumstances some function
content gets destroyed:
)wsid
IS CLEAR WS
'libedif2.so' ⎕FX 'edif2'
edif2
'emacs' edif2 'FN1' - adding two lines, save and exit
'emacs' edif2 'FN1' - body OK
'emacs' edif2 'FN2' - n
Hi Jürgen,
thank you.
Best Regards
Hans-Peter
Am 30.10.20 um 19:09 schrieb Dr. Jürgen Sauermann:
i Hans-Peter,
thanks for reporting this. Fixed in *SVN 1350*.
Best Regards,
Jürgen
On 10/30/20 3:22 PM, Hans-Peter Sorge wrote:
Hi,
⍝ works as expected
(3) ↑ 'abcd'
abc
EIJHHH - never thought about it - COOOL.
⍝IBM APL:
⍎ ')HOST ls'
VALUE ERROR
)HOST ls
^
⍎')HOST ls'
^
⍝ GNU-APL:
l ← ⍎ ')HOST ls -1'
And it works:-)) Makes life much easier.
f ← ⍎ ')HOST cat filename'
⍝ returns the file as nested vec
Hi,
the ∨/¨ on nested logical vectors is running slow.
)WSID
IS CLEAR WS
⍝ get the data for testing
⍴f ← ⎕FIO[49] '/OTH/APL/trunk/src/Makefile.in'
5246
⍝ timer
t←⎕FIO[50] 1
⍝ Finding SQL-records is fast. The ∨/¨ is the slow guy - about 2 min.
⍝ I would expect that " (
Hi,
⍝ this is OK:
C10←2⍴⊂'AB12EF12IJ'
C10
AB12EF12IJ AB12EF12IJ
P10←(⊂2/⍳5)⊂¨C10
S10←P10∊¨⊂⊂'12'
S10
0 1 0 1 0 0 1 0 1 0
S10/¨P10
12 12 12 12
⍝ for a one element nested vector it ends in a stack trace:
C10←,⊂'AB12EF12IJ'
P10←(⊂
Hi Christian,
I'm still learning ..
errno -l or errno NNN
helps a lot. I had to install the moreutils package.
Never before I got across this helpful stuff.
Thank you for the eye opener:-)
Best Regards
Hans-Peter
Am 01.11.20 um 07:46 schrieb Christian Robert:
For your eyes,
strerr
Hello Jürgen,
I have a corrupted workspace and the still working backup.
Do you want me to send them to you for analysis?
It's just some experimental stuff and related to the previous reports I
sent.
Best Regards
Hans-Peter
Hello Jürgen,
amazing, thank you.
Best Regards
Hans-Peter
Am 01.11.20 um 19:59 schrieb Dr. Jürgen Sauermann:
Hi Hans-Peter,
thanks, fixed in *SVN 1351*.
Best Regards,
Jürgen
On 10/31/20 4:52 PM, Hans-Peter Sorge wrote:
Hi,
the ∨/¨ on nested logical vectors is running slow.
)WSID
most cases (and especially for interactive use
cases) the current solution is more convenient since the result can
be displayed directly (at least for text output).
Best Regards,
Jürgen
On 10/31/20 4:10 PM, Hans-Peter Sorge wrote:
EIJHHH - never thought about it - COOOL.
⍝IBM APL:
⍎ &
er becomes available at APL level and can be
recovered by subtracting 0x10 from the codepoint) rather than raisong
an error.
*SVN 1352*.
Best Regards,
Jürgen
On 11/2/20 10:05 AM, Hans-Peter Sorge wrote:
Hi Jürgen,
I agree. A *cat BIN_FILE* in a terminal session is of artistically
value on
Hello Jürgen,
thank your for the insight.
Best Regards
Hans-Peter
Am 03.11.20 um 11:29 schrieb Dr. Jürgen Sauermann:
Hi Hans-Peter,
see below.
Best Regards,
Jürgen
On 11/2/20 8:02 PM, Hans-Peter Sorge wrote:
Hello Jürgen,
as far as some UTF study got me I have 2 questions:
Two
ller:
Looks like it might be a concurrency problem--edif2 forks, IIRC,
twice, serially, and I never was completely sure that I had the
waitpid()s right. I'll take a look.
Chris
On 10/30/20 11:22 AM, Hans-Peter Sorge wrote:
Hi,
working with an external editor under some circumstances some
Hi,
I thought so, APL is fun:-)
The following 4 expressions are just a repeat:
⍝1 - a vector replicates a scalar. The result is a simple vector
1 2 3/'A'
AA
⍝2 - scalar by scalar - simple vector as result
1 2 3/'ABC'
ABBCCC
⍝3 - as in ⍝1 but for each scalar a vector replicates
ples are showing something different, where you're
introducing an extra level of nesting to the right argument but
without changing its rank or shape.
Jay.
On Thu, 26 Nov 2020 at 23:56, Hans-Peter Sorge
wrote:
Hi Jay,
.. not quite:
(,6)/'a'
aa
(,6)/,¨&#x
bound to /**
** AA BB CC
*which corresponds to pattern (A O) P B above. This is almost as easy as
using parentheses for values.
Best Regards,
Jürgen
On 11/26/20 1:28 PM, Hans-Peter Sorge wrote:
Hi,
I thought so, APL is fun:-)
The following 4 expressions are just a repeat:
⍝1 - a vector
ieb Chris Moller:
Looks like it might be a concurrency problem--edif2 forks, IIRC,
twice, serially, and I never was completely sure that I had the
waitpid()s right. I'll take a look.
Chris
On 10/30/20 11:22 AM, Hans-Peter Sorge wrote:
Hi,
working with an external editor under some circumsta
problem.
Explanation:
IN_NOTIFY gets fired if as soon as a file gets created.
IN_CLOSE_WRITE as soon as the file content got fully written and the
file got closed. So reading the file content is save
Best Regard
Hans-Peter
Am 02.12.20 um 16:27 schrieb Hans-Peter Sorge:
Hi Chris,
I have done
mitted and pushed.
Chris
On 12/2/20 7:24 PM, Hans-Peter Sorge wrote:
Hi,
sorry for the previous long mail.
Here is quite a short solution:-)
In edif2.cc
replace
// int inotify_rc = inotify_add_watch(inotify_fd, dir,
IN_CREATE | IN_MODIFY );
by
int inotify_rc = inotify
10 10 10 10 10 10 10
but it is
625¨⍴5 10 15 20 25
Just asking ..:-)
Best Regards
Hans-Peter
Am 02.12.20 um 17:27 schrieb Dr. Jürgen Sauermann:
Hi,
in following up the recent email discussions with Jay Foad and
Hans-Peter Sorge,
I have changed the operator-to-operator binding in
Hi,
a short test gives:
$ apl -q
X←⊂'XXX'
)WSID DUMP_TEST
WAS CLEAR WS
)DUMP
2020-12-03 18:20:00 (GMT+1)
)OFF
)load DUMP_TEST.apl
DUMPED 2020-12-03 18:20:00 (GMT+1)
SYNTAX ERROR
((⎕IO+)⊃X)←'XXX'
^ ^
$ less DUMP_TEST.apl
.
X←00
((⎕IO+)
irectory **:
*find -exec sed -i 's/IO+)/⎕IO+⍬)/g' {} \;*
Please note that the character to be inserted is ⍬(Zilde) and not
0(Zero); the
difference is difficult to see with some fonts.
Best Regards,
Jürgen
On 12/3/20 6:35 PM, Hans-Peter Sorge wrote:
Hi,
a short test gives:
$ apl
nswer the tricky ones).
Best Regards,
Jürgen
On 12/3/20 2:26 PM, Hans-Peter Sorge wrote:
Sorry, did not hit the mailing list...
Hi,
frankly I try to find out what it does...
4/2 2⍴⍳4
1 1 1 1 2 2 2 2
3 3 3 3 4 4 4 4
basically replicates the last column
4//2 2⍴⍳4
2 2 2 2 4
Hi,
⎕FX 'library_function' should probably return 'Domain Error'
'libedif2.so' ⎕fx 'edif2'
edif2
⍝ just happened to be an accident ...
⎕fx 'edif2'
==
Assertion failed: old_ufun
in Function: fi
Hans-Peter,
thanks, see below.
Best Regards,
Jürgen
On 12/4/20 10:54 AM, Hans-Peter Sorge wrote:
Hi,
⎕FX 'library_function' should probably return 'Domain Error'
No. It defines a niladic function named library_function with an empty
function body.
'libe
Hi,
is there a way that )DUMP preserves function fidelity - that is - keep
empty lines and indents?
It would improve readability a lot by eg. separating code and next
comment by a space line.
Best Regards
Hans-Peter
Am 08.11.20 um 20:07 schrieb Dr. Jürgen Sauermann:
Hi everybody,
I am curr
1 - 100 of 170 matches
Mail list logo
