Mercurial > core / lisp/ffi/gstreamer/play.lisp
changeset 475: |
2ce4891d0661 |
author: |
Richard Westhaver <ellis@rwest.io> |
date: |
Mon, 24 Jun 2024 20:59:53 -0400 |
permissions: |
-rw-r--r-- |
description: |
inig gst-play |
1 ;;; play.lisp --- Gstreamer FFI Play API 6 (in-package :gstreamer) 8 (define-alien-loader gst-play t "/usr/lib/" "gstplay-1.0") 11 (define-opaque gst-play) 12 (define-opaque gst-play-class) 13 (define-opaque gst-play-signal-adapter) 14 (define-opaque gst-play-signal-adapter-class) 15 (define-opaque gst-play-video-renderer) 16 (define-opaque gst-play-video-renderer-interface)) 18 (define-alien-type gst-play-video-renderer-interface-t 19 (struct gst-play-video-renderer-interface 20 (parent-iface gtype-interface) 23 (define-alien-routine gst-play-state-get-type gtype) 25 (define-alien-routine gst-play-error-quark gquark) 26 ;; (gst-play-state-get-type) 27 (define-alien-routine gst-play-error-get-type gtype) 29 (define-alien-enum (gst-play-error int) 32 (define-alien-routine gst-play-error-get-name c-string (error gst-play-error)) 34 (define-alien-enum (gst-play-state int) 40 (define-alien-routine gst-play-state-get-name c-string (state gst-play-state)) 42 (define-alien-enum (gst-play-message int) 51 :video-dimensions-changed 8 57 (define-alien-routine gst-play-message-get-name c-string (message-type gst-play-message)) 59 (define-alien-routine gst-play-get-type gtype) 61 (define-alien-routine gst-play-new (* gst-play) (video-renderer (* gst-play-video-renderer)))