소개

CommonLisp과 GTK+3을 사용한 GUI 어플리케이션에 대해, 조사한 것을 메모해 갑니다.
우분투 17.10에서 실시.

덧붙여서, Raspberry Pi로 하려고 하면 라이브러리이다.

라이브러리 설치

Roswell에서 GTK+3 CommonLisp 래퍼 라이브러리를 설치합니다.

ros install crategus/cl-cffi-gtk

빈 창 프로그램

우선, 기본인 빈 윈도우 프로그램입니다.

simple-window.lisp

(ql:quickload :cl-cffi-gtk)

(defpackage :my-gtk
  (:use :cl
        :gtk
        :gdk
        :gdk-pixbuf
        :gobject
        :glib
        :gio
        :pango
        :cairo))

(in-package :my-gtk)

(defun main ()
  (within-main-loop
   (let ((window (make-instance 'gtk-window
                                :type :toplevel
                                :title "Hello, world!"
                                :default-width  500
                                :default-height 500)))
     (g-signal-connect window "destroy"
                       (lambda (widget)
                         (declare (ignore widget))
                         (leave-gtk-main)))
     (gtk-widget-show-all window))))

(main)

실행

다음 명령으로 실행합니다.

ros run --load simple-window.lisp

아래 스크린 샷.

마지막으로

LTK, Qt(EQL5)와 이어 세 번째 GUI 라이브러리이지만, 꽤 사용하기 쉽다고 생각했습니다.
특히 이하의 튜토리얼을 읽기 쉬운 것이 좋네요.

GTK+ 3 Tutorial for Lisp