It is indeed fixed. Thanks !
But now I have a question about a subtle difference between niladic
"traditional" function and niladic "inline" functions. What is the
right channel to ask ?
Sincerely,
--
Emmanuel Charpentier
Le jeudi 08 juin 2023 à 12:39 +0200, Dr. Jürgen Sauermann a écrit :
> Hi Emmanuel,
>
> thanks. fixed in SVN 1709.
>
> Best Regards,
> Jürgen
>
>
> On 6/8/23 08:22, Emmanuel Charpentier wrote:
>
> >
> > From SVN 1708, used throug emacs' gnu-apl inferior mode :
> > This is the gnu-apl-mode interactive buffer.
> >
> > To toggle keyboard help, call M-x gnu-apl-show-keyboard (C-c C-k by
> > default).
> > APL symbols are bound to the standard keys with the Super key. You can also
> > activate the APL-Z input method (M-x toggle-input-method or C-\) which
> > allows you to input APL symbols by prefixing the key with a "." (period).
> >
> > There are several customisation options that can be set.
> > Click the link or run M-x customize-group RET gnu-apl to set up.
> >
> > To disable this message, set gnu-apl-show-tips-on-start to nil.
> >
> > Network listener started. Connection information: mode:tcp addr:46345
> >
> > ______ _ __ __ __ ___ ____ __
> > / ____// | / // / / / / | / __ \ / /
> > / / __ / |/ // / / / / /| | / /_/ // /
> > / /_/ // /| // /_/ / / ___ | / ____// /___
> > \____//_/ |_/ \____/ /_/ |_|/_/ /_____/
> >
> > Welcome to GNU APL version 1.8 / SVN: Unversioned directory
> >
> > Copyright © 2008-2023 Dr. Jürgen Sauermann
> > Banner by FIGlet: www.figlet.org
> >
> > This program comes with ABSOLUTELY NO WARRANTY;
> > for details run: /usr/bin/apl --gpl.
> >
> > This program is free software, and you are welcome to redistribute it
> > according to the GNU Public License (GPL) version 3 or later.
> >
> > Illegal : in immediate execution+
> > ⍝ Pasted from a buffer
> > bar←{(+/(,(v⍴(1,⍵⍴O))-m+.×⌹m←(v←2⍴⍵)⍴(2*⍵)?⍵)*2)*÷2}
> > ⎕CR 'bar'
> > λ←λ1 ⍵
> > λ←(+/(,(v⍴(1,⍵⍴O))-m+.×⌹m←(v←2⍴⍵)⍴(2*⍵)?⍵)*2)*÷2
> > ⍝ The functin seems to have been correctly defined.
> > ⍝ Test it
> > bar 3
> > DOMAIN ERROR
> > bar[1] λ←(+/(,(v⍴(1,⍵⍴O))-m+.×⌹m←(v←2⍴\0
> > ^ ^
> > ]si
> > Depth: 1
> > Exec: 0x564d4ce54700
> > Safe exec: 0
> > Pmode: ∇ bar[1]
> > PC: 14 (51) ⍴
> > Stat: λ←(+/(,(v⍴(1,⍵⍴O))-m+.×⌹m←(v←2⍴⍵)⍴(2*⍵)?⍵)*2)*÷2
> > err_code: 0x50004
> > thrown at: ScalarFunction.cc:1034
> > e_msg_1: 'DOMAIN ERROR'
> > e_msg_2: 'bar[1] λ←(+/(,(v⍴(1,⍵⍴O))-m+.×⌹m←(v←2⍴\0'
> > e_msg_3: ' ^ ^'
> >
> > Depth: 0
> > Exec: 0x564d4ce52c90
> > Safe exec: 0
> > Pmode: ◊ bar 3
> > PC: 3 (4) RETURN_STATS
> > Stat: bar 3
> > err_code: 0x0
> > Version information :
> > charpent@zen-book-flip:~/Dev/apl/trunk$ svn info
> > Chemin : .
> > Chemin racine de la copie de travail : /home/charpent/Dev/apl/trunk
> > URL : http://svn.savannah.gnu.org/svn/apl/trunk
> > Relative URL: ^/trunk
> > Racine du dépôt : http://svn.savannah.gnu.org/svn/apl
> > UUID du dépôt : bd74f7bd-1a55-4bac-9fab-68015b139e80
> > Révision : 1708
> > Type de nœud : répertoire
> > Tâche programmée : normale
> > Auteur de la dernière modification : j_sauermann
> > Révision de la dernière modification : 1708
> > Date de la dernière modification: 2023-06-05 20:08:38 +0200 (lun. 05 juin
> > 2023)
> > Configuration and compilation logs attached : Debian package
> > installed via dpkg + manual copy of Python libraries.
> > HTH,
> > -- Emmanuel Charpentier
>
