Welcome to the CHICKEN Scheme pasting service
Error: (match) during expansion of (define-concurrent-native-callback ...) added by zilti on Thu Dec 14 15:49:24 2017
(define-concurrent-native-callback (activate (c-pointer app) (c-pointer user-data))
(let ((window (gtk-application-window-new app)))
(gtk-window-set-title window "Hello World")
(gtk-window-set-default-size window 800 600)
(gtk-widget-show-all window)))