Examples failing in `(wlr-backend-start _)`

[wehlutyk]

First of all many thanks for this project, along with guile-wayland!

On Guix, I'm trying to get the examples to run and all of them fail, apperently on wlroots' ffi side. Here's an example using example/red-window.scm:

sl@beoga ~/C/E/R/guile-wlroots (master)> guix shell -f guix.scm guile guile-readline
sl@beoga ~/C/E/R/guile-wlroots (master)> example/red-window.scm
;;; note: source file /home/sl/Code/EDL/Related/guile-wlroots/example/red-window.scm
;;;       newer than compiled /home/sl/.cache/guile/ccache/3.0-LE-8-4.6/home/sl/Code/EDL/Related/guile-wlroots/example/red-window.scm.go
amdgpu: amdgpu_cs_ctx_create2 failed. (-13)
Backtrace:
In ice-9/boot-9.scm:
  1752:10  9 (with-exception-handler _ _ #:unwind? _ # _)
In unknown file:
           8 (apply-smob/0 #<thunk 7fa8e7314300>)
In ice-9/boot-9.scm:
    724:2  7 (call-with-prompt _ _ #<procedure default-prompt-handle…>)
In ice-9/eval.scm:
    619:8  6 (_ #(#(#<directory (guile-user) 7fa8e7317c80>)))
    619:8  5 (_ #(#(#<directory (guile-user) 7fa8e7317c80>) (("e…"))))
In wlroots/backend.scm:
    40:14  4 (wlr-backend-start _)
In unknown file:
Exception thrown while printing backtrace:
In procedure primitive-call-ip: Wrong type argument in position 1 (expecting PRIMITIVE_P): #<procedure 7fa8e1ffaf20 (_)>

oop/goops.scm:1585:2: In procedure goops-error:
#<<wlr-output> 7fa8dc513f00> is not a pointer, bytestructure, integer or superclass's object

I'm new to guile, so not sure why printing the backtrace itself fails (due to failure in FFI?). The first line, amdgpu: amdgpu_cs_ctx_create2 failed. (-13), seems unrelated as explained in https://gitlab.freedesktop.org/wlroots/wlroots/-/issues/3543#note_1661557 .

Any idea where this could be coming from?

System

In case this is useful

sl@beoga ~/C/E/R/guile-wlroots (master)> guix describe
Generation 56	Oct 02 2024 15:12:12	(current)
  nonguix 820e171
    repository URL: https://gitlab.com/nonguix/nonguix
    branch: master
    commit: 820e1715034d4dcabe249cc2adbc440f01cac88d
  guix-science 3736b80
    repository URL: https://github.com/guix-science/guix-science.git
    branch: master
    commit: 3736b80cf569511cc0a13f87cb03411761290dd8
  guix 6590f5c
    repository URL: https://git.savannah.gnu.org/git/guix.git
    branch: master
    commit: 6590f5c5cd30c4dcdb4309b1a7884cd9d0a4ae4d

[Z572]

sorry, after c55cf98 guile-wlroots auto wrap some data, so examples is a little out of date 79137bd should fix it.

[wehlutyk]

Awesome, thanks!!