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
>  

Reply via email to