Re: [Geiser-users] geiser-xref-callers does not seem to work

[Andy Wingo]

On Sat 16 Dec 2017 08:55, Chris Marusich <address@hidden> writes:

> * Place point on symbol expression->derivation-in-linux-vm on line 203
>   (in the definition of the iso9660-image procedure), and press "C-c <".
>
> When I do this, I receive the following message in the minibuffer:
>
>   No callers found for ’expression->derivation-in-linux-vm’
>
> And yet, if I run "M-x rgrep" on the same symbol, there are obviously
> many call sites:
>
>   ./gnu/system/vm.scm:68:  #:export (expression->derivation-in-linux-vm
>   ./gnu/system/vm.scm:105:(define* (expression->derivation-in-linux-vm name 
> exp
>   ./gnu/system/vm.scm:203:  (expression->derivation-in-linux-vm
>   ./gnu/system/vm.scm:274:  (expression->derivation-in-linux-vm
>
> What might the problem be?  When I run "M-x geiser-doc-symbol-at-point"
> on this symbol, it also claims that there is no documentation
> available.  I feel like maybe I've misconfigured something, but I don't
> know what.

It appears to be a Geiser problem and not a Guile problem:

    address@hidden:~/src/guix$ ./pre-inst-env guile
    GNU Guile 2.2.2
    Copyright (C) 1995-2017 Free Software Foundation, Inc.

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

    Enter `,help' for help.
    scheme@(guile-user)> (use-modules (gnu system vm))
    scheme@(guile-user)> expression->derivation-in-linux-vm 
    $1 = #<procedure expression->derivation-in-linux-vm (name exp #:key system 
linux initrd qemu env-vars guile-for-build single-file-output? make-disk-image? 
references-graphs memory-size disk-image-format disk-image-size)>
    scheme@(guile-user)> (use-modules (system xref))
    scheme@(guile-user)> (procedure-callers $1)
    ERROR: In procedure scm-error:
    ERROR: expected a variable, symbol, or (modname . sym) #<procedure 
expression->derivation-in-linux-vm (name exp #:key system linux initrd qemu 
env-vars guile-for-build single-file-output? make-disk-image? references-graphs 
memory-size disk-image-format disk-image-size)>

    Entering a new prompt.  Type `,bt' for a backtrace or `,q' to continue.
    scheme@(guile-user) [1]> ,q
    scheme@(guile-user)> (procedure-callers '((gnu system vm) . 
expression->derivation-in-linux-vm))
    $2 = (((gnu system vm) #<procedure qemu-image (#:key name system qemu 
disk-image-size disk-image-format file-system-type file-system-label 
file-system-uuid os-drv bootcfg-drv bootloader register-closures? inputs 
copy-inputs?)> #<procedure iso9660-image (#:key name file-system-label 
file-system-uuid system qemu os-drv bootcfg-drv bootloader register-closures? 
inputs)>))

I assume your Scheme files are indeed compiled?

Andy