Forum > General
capture apl_exec stdout
TRon:
--- Quote from: toby on February 16, 2023, 08:18:31 pm ---Tron
looks like you have no problem taking my original libapl work and appropriating it as your own
pretty sad
--- End quote ---
TRon:
--- Quote ---APL Library itself published under the GNU General Public License
--- End quote ---
TRon:
--- Quote ---All Pascal related files in this archive are licensed as "Pay it forward"
--- End quote ---
TRon:
--- Quote from: toby on February 16, 2023, 08:18:31 pm ---Tron
looks like you have no problem taking my original libapl work and appropriating it as your own
pretty sad
--- End quote ---
@toby:
Please accept my deepest apologies as I humbly ask you to forgive me for my rude manners in copy-pasting all your hard work and claim it as my own (wherever I supposedly did that, thus please enlighten me).
Would you be so kind and point me to the work that you designated as your "original libapl work" so that I am able to rectify my blameworthy behaviour ?
As a (demonstrable) reminder: All my work, with the exception of users mentioned in post #68 (as well as in the source-files) is based on publications from libapl and/or is actually my own.
toby:
you want to show me where a libaplu.pas was in any apl publications or online??
there was NO libaplu.pas until i wrote it and submitted it as reply #6 to this topic
NOTHING you did has increased the usable functionality of my libaplu.pas - NOTHING
nothing you did in your ulibapl.pas is needed to get the most complex apl/apl_exec statements running - NOTHING
in fact i have been able to bring the results of an apl_exec statement into an fpc ansistring and tstinglist for years
your call back increases the time to get the rsults into a tstiringlist and ansistring to unacceptable amounts
---
timing testing : run on your system to verify - use your apl_exec callback compare for relative times from my system to yours
also note the bug in the results your callback and fpdup methods produce
Date Friday 2/17/2023 Time 13:58.46.298 20 msec to create rs with 1 line of 900000 chars
rs←900000↑"ab "
⍴rs
900000
Date Friday 2/17/2023 Time 13:58.46.318
Date Friday 2/17/2023 Time 13:58.46.318
soa rs 45 msec for my apl fns to bring rs into an fpc tstringlist and then ansistring s
astringlist.count : 1 correct nymber of lines of 900000 chars
s := astringlist.text;
length(s) : 900000 correct number of chars
Date Friday 2/17/2023 Time 13:58.46.363
Date Friday 2/17/2023 Time 13:58.46.363
so rs 10 seconds 239 msec for fpdup2 method to bring rs into an foc tstringlist and then ansistring s
astringlist.count : 12163 it should be 1 line of chars not 12163 lines
length(s) : 985134 it should be 900000 chars
Date Friday 2/17/2023 Time 13:58.56.602
Date Friday 2/17/2023 Time 13:58.56.602
soc rs 11 seconds 862 msec fpr your call back code to bring rs into an fpc tsringslit and then ansistring s
astringlist.count : 12163 it should be 1 line of chars not 12163
length(s) : 985135 it should be 900000 chars
Date Friday 2/17/2023 Time 13:59.8.482
run bringing the rs apl variable into an fpc taringlist and assistring from the fpdup and call back methods on your system and post the timing results
your problem is even more pronouned with a simple
rs←⍕3 3000⍴⍳9
which should resukt in rs being a 3x3000 array 3 lines of 3000 '9'
your code and the fpdup code produce result of 243 lines and different lengths if s
in order to fix your code to give correct reaults the time was increased from and already unacceptable time
Navigation
[0] Message Index
[*] Previous page