<?xml version="1.0" encoding="UTF-8" ?>

<bugzilla version="5.2"
          urlbase="https://bugzilla.altlinux.org/"
          
          maintainer="jenya@basealt.ru"
>

    <bug>
          <bug_id>33324</bug_id>
          
          <creation_ts>2017-04-03 14:04:54 +0300</creation_ts>
          <short_desc>guile20 fails on: (use-modules (ice-9 readline))</short_desc>
          <delta_ts>2017-04-03 19:37:24 +0300</delta_ts>
          <reporter_accessible>1</reporter_accessible>
          <cclist_accessible>1</cclist_accessible>
          <classification_id>4</classification_id>
          <classification>Development</classification>
          <product>Sisyphus</product>
          <component>guile20</component>
          <version>unstable</version>
          <rep_platform>all</rep_platform>
          <op_sys>Linux</op_sys>
          <bug_status>CLOSED</bug_status>
          <resolution>FIXED</resolution>
          
          
          <bug_file_loc></bug_file_loc>
          <status_whiteboard></status_whiteboard>
          <keywords></keywords>
          <priority>P3</priority>
          <bug_severity>normal</bug_severity>
          <target_milestone>---</target_milestone>
          
          
          <everconfirmed>1</everconfirmed>
          <reporter>gordmisha</reporter>
          <assigned_to name="Yuri N. Sedunov">aris</assigned_to>
          <cc>aris</cc>
    
    <cc>imz</cc>
    
    <cc>mike</cc>
    
    <cc>obirvalger</cc>
          
          <qa_contact>qa-sisyphus</qa_contact>

      

      

      

          <comment_sort_order>oldest_to_newest</comment_sort_order>  
          <long_desc isprivate="0" >
    <commentid>162958</commentid>
    <comment_count>0</comment_count>
      <attachid>7028</attachid>
    <who name="">gordmisha</who>
    <bug_when>2017-04-03 14:04:54 +0300</bug_when>
    <thetext>Created attachment 7028
Текст ошибки

Установил пакет guile20 в Starterkit p8 cinnamon.
При запуске guile возникает ошибка, она приведена в файле.</thetext>
  </long_desc><long_desc isprivate="0" >
    <commentid>162961</commentid>
    <comment_count>1</comment_count>
    <who name="Andrey Cherepanov">cas</who>
    <bug_when>2017-04-03 16:36:20 +0300</bug_when>
    <thetext>Под root работает, под обычным пользователем выдаёт 

In unknown file:
   ?: 2 [primitive-load-path &quot;ice-9/readline&quot; ...]
In ice-9/readline.scm:
  43: 1 [#&lt;procedure ba18c0 ()&gt;]
In unknown file:
   ?: 0 [load-extension &quot;libguilereadline-v-18&quot; &quot;scm_init_readline&quot;]

При этом 
$ ll /usr/lib64/libguilereadline-v-18.so.18
lrwxrwxrwx 1 root root 31 апр  3 16:32 /usr/lib64/libguilereadline-v-18.so.18 -&gt; libguilereadline-v-18.so.18.0.0</thetext>
  </long_desc><long_desc isprivate="0" >
    <commentid>162963</commentid>
    <comment_count>2</comment_count>
    <who name="Yuri N. Sedunov">aris</who>
    <bug_when>2017-04-03 17:00:43 +0300</bug_when>
    <thetext>
Отправил в p8 сизифную версию, которая работает. Проверьте.
[#181254] p8 DONE srpm=guile20-2.0.14-alt0.M80P.1.src.rpm

$ guile20 
GNU Guile 2.0.14
Copyright (C) 1995-2016 Free Software Foundation, Inc.

Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w&apos;.
This program is free software, and you are welcome to redistribute it
under certain conditions; type `,show c&apos; for details.

Enter `,help&apos; for help.
scheme@(guile-user)&gt; ,help
Help Commands [abbrev]:

 ,help [all | GROUP | [-c] COMMAND]
                              [,h] - Show help.
 ,show [TOPIC]                     - Gives information about Guile.
 ,apropos REGEXP              [,a] - Find bindings/modules/packages.
 ,describe OBJ                [,d] - Show description/documentation.

Command Groups:

 ,help all                         - List all commands
 ,help module                      - List module commands
 ,help language                    - List language commands
 ,help compile                     - List compile commands
 ,help profile                     - List profile commands
 ,help debug                       - List debug commands
 ,help inspect                     - List inspect commands
 ,help system                      - List system commands

Type `,help -c COMMAND&apos; to show documentation of a particular command.
scheme@(guile-user)&gt;</thetext>
  </long_desc><long_desc isprivate="0" >
    <commentid>162965</commentid>
    <comment_count>3</comment_count>
    <who name="Andrey Cherepanov">cas</who>
    <bug_when>2017-04-03 17:13:52 +0300</bug_when>
    <thetext>cas@cas ~ $ rpm -q guile20
guile20-2.0.14-alt0.M80P.1
cas@cas ~ $ guile20
Backtrace:
In ice-9/boot-9.scm:
 160: 19 [catch #t #&lt;catch-closure 9865a0&gt; ...]
In unknown file:
   ?: 18 [apply-smob/1 #&lt;catch-closure 9865a0&gt;]
In ice-9/boot-9.scm:
  66: 17 [call-with-prompt prompt0 ...]
In ice-9/eval.scm:
 432: 16 [eval # #]
In unknown file:
   ?: 15 [primitive-load &quot;/home/cas/.guile&quot;]
In ice-9/eval.scm:
 505: 14 [#&lt;procedure 8634c0 at ice-9/eval.scm:499:4 (exp)&gt; (use-modules #)]
In ice-9/psyntax.scm:
1107: 13 [expand-top-sequence ((use-modules (ice-9 readline))) () ...]
 990: 12 [scan ((use-modules (ice-9 readline))) () ...]
 279: 11 [scan ((# #) #(syntax-object *unspecified* # #)) () (()) ...]
In ice-9/boot-9.scm:
3622: 10 [process-use-modules (((ice-9 readline)))]
 712: 9 [map #&lt;procedure 927d80 at ice-9/boot-9.scm:3622:25 (mif-args)&gt; ((#))]
3623: 8 [#&lt;procedure 927d80 at ice-9/boot-9.scm:3622:25 (mif-args)&gt; (#)]
2900: 7 [resolve-interface (ice-9 readline) #:select ...]
2825: 6 [#&lt;procedure 8f8660 at ice-9/boot-9.scm:2813:4 (name #:optional autoload version #:key ensure)&gt; # ...]
3101: 5 [try-module-autoload (ice-9 readline) #f]
2412: 4 [save-module-excursion #&lt;procedure b7c7b0 at ice-9/boot-9.scm:3102:17 ()&gt;]
3121: 3 [#&lt;procedure b7c7b0 at ice-9/boot-9.scm:3102:17 ()&gt;]
In unknown file:
   ?: 2 [primitive-load-path &quot;ice-9/readline&quot; ...]
In ice-9/readline.scm:                                                                                                                                                                                                                                                            
  43: 1 [#&lt;procedure ba3980 ()&gt;]                                                                                                                                                                                                                                                  
In unknown file:                                                                                                                                                                                                                                                                  
   ?: 0 [load-extension &quot;libguilereadline-v-18&quot; &quot;scm_init_readline&quot;]                                                                                                                                                                                                              
                                                                                                                                                                                                                                                                                  
ERROR: In procedure load-extension:                                                                                                                                                                                                                                               
ERROR: In procedure dynamic-link: file: &quot;libguilereadline-v-18&quot;, message: &quot;file not found&quot;                                                                                                                                                                                        
cas@cas ~ $ su -
Password:                                                                                                                                                                                                                                                                         
cas ~ # guile20                                                                                                                                                                                                                                                                   
GNU Guile 2.0.14                                                                                                                                                                                                                                                                  
Copyright (C) 1995-2016 Free Software Foundation, Inc.                                                                                                                                                                                                                            
                                                                                                                                                                                                                                                                                  
Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w&apos;.                                                                                                                                                                                                              
This program is free software, and you are welcome to redistribute it                                                                                                                                                                                                             
under certain conditions; type `,show c&apos; for details.                                                                                                                                                                                                                             
                                                                                                                                                                                                                                                                                  
Enter `,help&apos; for help.                                                                                                                                                                                                                                                           
scheme@(guile-user)&gt;</thetext>
  </long_desc><long_desc isprivate="0" >
    <commentid>162966</commentid>
    <comment_count>4</comment_count>
    <who name="Andrey Cherepanov">cas</who>
    <bug_when>2017-04-03 17:22:35 +0300</bug_when>
    <thetext>Наверное, из-за файла
cas@cas ~ $ cat ~/.guile
(use-modules (ice-9 readline))
(activate-readline)

При его удалении всё работает.

Этот файл появился при предыдущем запуске guile18. В man об этом сказано:
FILES
       ~/.guile is a guile script that is executed before any other processing occurs.  For example, the following .guile activates guile&apos;s readline interface:

           (use-modules (ice-9 readline))
           (activate-readline)

Предлагается проверить, создаётся ли этот файл по умолчанию.</thetext>
  </long_desc><long_desc isprivate="0" >
    <commentid>162967</commentid>
    <comment_count>5</comment_count>
    <who name="Yuri N. Sedunov">aris</who>
    <bug_when>2017-04-03 17:35:41 +0300</bug_when>
    <thetext>(В ответ на комментарий №4)
&gt; Наверное, из-за файла
&gt; cas@cas ~ $ cat ~/.guile
&gt; (use-modules (ice-9 readline))
&gt; (activate-readline)
&gt; 
&gt; При его удалении всё работает.
&gt; 
&gt; Этот файл появился при предыдущем запуске guile18. В man об этом сказано:
&gt; FILES
&gt;        ~/.guile is a guile script that is executed before any other processing
&gt; occurs.  For example, the following .guile activates guile&apos;s readline
&gt; interface:
&gt; 
&gt;            (use-modules (ice-9 readline))
&gt;            (activate-readline)
&gt; 
&gt; Предлагается проверить, создаётся ли этот файл по умолчанию.

guile20 не создает ~/.guile при запуске. Ошметки от предыдущих версий -- забота пользователя.</thetext>
  </long_desc><long_desc isprivate="0" >
    <commentid>162968</commentid>
    <comment_count>6</comment_count>
    <who name="Andrey Cherepanov">cas</who>
    <bug_when>2017-04-03 17:41:14 +0300</bug_when>
    <thetext>Согласен.</thetext>
  </long_desc><long_desc isprivate="0" >
    <commentid>162969</commentid>
    <comment_count>7</comment_count>
    <who name="Ivan Zakharyaschev">imz</who>
    <bug_when>2017-04-03 18:15:13 +0300</bug_when>
    <thetext>В guile20-2.0.14-alt1.x86_64 не хватает символической ссылки:

ln -s libguilereadline-v-18.so.18 /usr/lib64/libguilereadline-v-18.so

После её добавления в guile20 можно без ошибок исполнить:

           (use-modules (ice-9 readline))
           (activate-readline)

В guile18-1.8.7-alt4.x86_64 или guile22-2.2.0-alt1.x86_64 это тоже работает без ошибки сразу из пакета.

Вот такая ситуация:

[user@prodesk0 ~]$ locate libguilereadline
/usr/lib64/libguilereadline-v-17.so
/usr/lib64/libguilereadline-v-17.so.17
/usr/lib64/libguilereadline-v-17.so.17.0.3
/usr/lib64/libguilereadline-v-18.so.18
/usr/lib64/libguilereadline-v-18.so.18.0.0
[user@prodesk0 ~]$ locate libguilereadline | xargs rpm -qf
guile18-1.8.7-alt4.x86_64
guile18-1.8.7-alt4.x86_64
guile18-1.8.7-alt4.x86_64
libguile20-2.0.14-alt1.x86_64
libguile20-2.0.14-alt1.x86_64
[user@prodesk0 ~]$</thetext>
  </long_desc><long_desc isprivate="0" >
    <commentid>162970</commentid>
    <comment_count>8</comment_count>
    <who name="Yuri N. Sedunov">aris</who>
    <bug_when>2017-04-03 18:54:24 +0300</bug_when>
    <thetext>#181278 POSTPONED #1 p8 srpm=guile20-2.0.14-alt1.M80P.1.src.rpm
#181277 AWAITING #1 sisyphus srpm=guile20-2.0.14-alt2.src.rpm</thetext>
  </long_desc><long_desc isprivate="0" >
    <commentid>162974</commentid>
    <comment_count>9</comment_count>
    <who name="Repository Robot">repository-robot</who>
    <bug_when>2017-04-03 19:37:24 +0300</bug_when>
    <thetext>guile20-2.0.14-alt2 -&gt; sisyphus:

* Mon Apr 03 2017 Yuri N. Sedunov &lt;aris@altlinux&gt; 2.0.14-alt2
- moved %_libdir/libguilereadline-v-%gl_ver.so to libguile20 subpackage (ALT #33324)</thetext>
  </long_desc>
      
          <attachment
              isobsolete="0"
              ispatch="0"
              isprivate="0"
          >
            <attachid>7028</attachid>
            <date>2017-04-03 14:04:54 +0300</date>
            <delta_ts>2017-04-03 14:04:54 +0300</delta_ts>
            <desc>Текст ошибки</desc>
            <filename>guile-error.txt</filename>
            <type>text/plain</type>
            <size>1556</size>
            <attacher>gordmisha</attacher>
            
              <data encoding="base64">QmFja3RyYWNlOgpJbiBpY2UtOS9ib290LTkuc2NtOgogMTU3OiAxOSBbY2F0Y2ggI3QgIzxjYXRj
aC1jbG9zdXJlIDk4ZDU4MD4gLi4uXQpJbiB1bmtub3duIGZpbGU6CiAgID86IDE4IFthcHBseS1z
bW9iLzEgIzxjYXRjaC1jbG9zdXJlIDk4ZDU4MD5dCkluIGljZS05L2Jvb3QtOS5zY206CiAgNjM6
IDE3IFtjYWxsLXdpdGgtcHJvbXB0IHByb21wdDAgLi4uXQpJbiBpY2UtOS9ldmFsLnNjbToKIDQz
MjogMTYgW2V2YWwgIyAjXQpJbiB1bmtub3duIGZpbGU6CiAgID86IDE1IFtwcmltaXRpdmUtbG9h
ZCAiL2hvbWUvb2JpcnZhbGdlci8uZ3VpbGUiXQpJbiBpY2UtOS9ldmFsLnNjbToKIDUwNTogMTQg
WyM8cHJvY2VkdXJlIDg2NDZhMCBhdCBpY2UtOS9ldmFsLnNjbTo0OTk6NCAoZXhwKT4gKHVzZS1t
b2R1bGVzICMpXQpJbiBpY2UtOS9wc3ludGF4LnNjbToKMTEwNjogMTMgW2V4cGFuZC10b3Atc2Vx
dWVuY2UgKCh1c2UtbW9kdWxlcyAoaWNlLTkgcmVhZGxpbmUpKSkgKCkgLi4uXQogOTg5OiAxMiBb
c2NhbiAoKHVzZS1tb2R1bGVzIChpY2UtOSByZWFkbGluZSkpKSAoKSAuLi5dCiAyNzk6IDExIFtz
Y2FuICgoIyAjKSAjKHN5bnRheC1vYmplY3QgKnVuc3BlY2lmaWVkKiAjICMpKSAoKSAoKCkpIC4u
Ll0KSW4gaWNlLTkvYm9vdC05LnNjbToKMzU5NzogMTAgW3Byb2Nlc3MtdXNlLW1vZHVsZXMgKCgo
aWNlLTkgcmVhZGxpbmUpKSldCiA3MDI6IDkgW21hcCAjPHByb2NlZHVyZSA5MmJhMjAgYXQgaWNl
LTkvYm9vdC05LnNjbTozNTk3OjI1IChtaWYtYXJncyk+ICgoIykpXQozNTk4OiA4IFsjPHByb2Nl
ZHVyZSA5MmJhMjAgYXQgaWNlLTkvYm9vdC05LnNjbTozNTk3OjI1IChtaWYtYXJncyk+ICgjKV0K
Mjg2NDogNyBbcmVzb2x2ZS1pbnRlcmZhY2UgKGljZS05IHJlYWRsaW5lKSAjOnNlbGVjdCAuLi5d
CjI3ODk6IDYgWyM8cHJvY2VkdXJlIDkxZDM0MCBhdCBpY2UtOS9ib290LTkuc2NtOjI3Nzc6NCAo
bmFtZSAjOm9wdGlvbmFsIGF1dG9sb2FkIHZlcnNpb24gIzprZXkgZW5zdXJlKT4gIyAuLi5dCjMw
NjU6IDUgW3RyeS1tb2R1bGUtYXV0b2xvYWQgKGljZS05IHJlYWRsaW5lKSAjZl0KMjQwMTogNCBb
c2F2ZS1tb2R1bGUtZXhjdXJzaW9uICM8cHJvY2VkdXJlIGI4NWJkMCBhdCBpY2UtOS9ib290LTku
c2NtOjMwNjY6MTcgKCk+XQozMDg1OiAzIFsjPHByb2NlZHVyZSBiODViZDAgYXQgaWNlLTkvYm9v
dC05LnNjbTozMDY2OjE3ICgpPl0KSW4gdW5rbm93biBmaWxlOgogICA/OiAyIFtwcmltaXRpdmUt
bG9hZC1wYXRoICJpY2UtOS9yZWFkbGluZSIgLi4uXQpJbiBpY2UtOS9yZWFkbGluZS5zY206CiAg
NDM6IDEgWyM8cHJvY2VkdXJlIGJjOGM0MCAoKT5dCkluIHVua25vd24gZmlsZToKICAgPzogMCBb
bG9hZC1leHRlbnNpb24gImxpYmd1aWxlcmVhZGxpbmUtdi0xOCIgInNjbV9pbml0X3JlYWRsaW5l
Il0KCkVSUk9SOiBJbiBwcm9jZWR1cmUgbG9hZC1leHRlbnNpb246CkVSUk9SOiBJbiBwcm9jZWR1
cmUgZHluYW1pYy1saW5rOiBmaWxlOiAibGliZ3VpbGVyZWFkbGluZS12LTE4IiwgbWVzc2FnZTog
ImZpbGUgbm90IGZvdW5kIgo=
</data>

          </attachment>
      

    </bug>

</bugzilla>