Start libavcoded swig integration, some changes to status-line

parent c2a932f6
Pipeline #1251 passed with stage
in 11 minutes and 4 seconds
......@@ -349,7 +349,8 @@ SWIG_SRC = unix/androidlib.i unix/egl.i unix/gles.i unix/gles3.i unix/gl.i \
unix/glx.i unix/jni.i unix/omxal.i unix/openvg.i unix/png16.i \
unix/soil.i unix/soil2.i unix/xlib.i unix/ios-gles.i unix/ios-gles3.i \
unix/freetype_gl.i unix/wingdi.i unix/winuser.i unix/wayland.i \
unix/gps.i unix/vulkan.i unix/harfbuzz.i unix/gobject.i unix/gst.i
unix/gps.i unix/vulkan.i unix/harfbuzz.i unix/gobject.i unix/gst.i \
unix/avcodec.i
EXTRA_DOC = code.fs objects.fs oof.fs moofglos.fs regexp.fs fft.fs \
@NO_CROSS@ mkdir.fs cilk.fs coverage.fs $(LIBCC_SRC)
......
......@@ -1512,6 +1512,13 @@ if test x$has_swig = xyes || test -f $srcdir/unix/gobject-fsi.c; then
AC_CHECK_HEADER(glib-object.h, SWIGMODULES="$SWIGMODULES gobject.fs"
SWIGLIBS="$SWIGLIBS gobject.fs" SWIGINCLUDES="$SWIGINCLUDES `pkg-config --cflags gobject-2.0 | tr ' ' '\n' | grep ^-I | tr '\n' ' '`", CPPFLAGS="$CPPFLAGS_1",), ,)
fi
if test x$has_swig = xyes || test -f $srcdir/unix/avcodec-fsi.c; then
CPPFLAGS_1="$CPPFLAGS"
CPPFLAGS="$CPPFLAGS `pkg-config --cflags libavcodec`"
AC_CHECK_LIB(avcodec,avcodec_version,
AC_CHECK_HEADER(libavcodec/avcodec.h, SWIGMODULES="$SWIGMODULES avcodec.fs"
SWIGLIBS="$SWIGLIBS avcodec.fs" SWIGINCLUDES="$SWIGINCLUDES `pkg-config --cflags libavcodec | tr ' ' '\n' | grep ^-I | tr '\n' ' '`", CPPFLAGS="$CPPFLAGS_1",), ,)
fi
if test x$has_swig = xyes || test -f $srcdir/unix/gst-fsi.c; then
CPPFLAGS_1="$CPPFLAGS"
CPPFLAGS="$CPPFLAGS `pkg-config --cflags gstreamer-gl-1.0`"
......
......@@ -28,18 +28,21 @@ blue >bg white >fg or bold or Value status-attr
.\" \e7"
0 rows 1 - at-xy cols spaces
.\" \e8" ;
: replace-char ( c1 c2 addr u -- )
bounds U+DO
over I c@ = IF dup I c! THEN
LOOP 2drop ;
: .status-line ( -- ) { | w^ status$ }
base @
[: ." gforth 😷 | " unused 1024 / 0 u.r
." k free | order: " order
." | base=" .
." | " depth 0= IF ." ∅" ELSE ... THEN ;]
[: ." gforth 😷 | " unused 1024 / 0 u.r
." k free|o " order
." |b=" 0 .r
." | " depth 0= IF ." ∅" ELSE ... THEN ;]
[: dup #10 <> IF ." base=" 0 .r ." | " ELSE drop THEN
depth 0= fdepth 0= and IF ." " ELSE ... THEN
." | order: " order ;]
[: dup #10 <> IF ." b=" 0 .r ." | " ELSE drop THEN
depth 0= fdepth 0= and IF ." " ELSE ... THEN
." |o " order ;]
cols 100 > select
#10 ['] base-execute status$ $exec
#lf '|' status$ $@ replace-char
cols status$ $@ x-width - dup 0> IF
['] spaces status$ $exec
ELSE 0< IF
......
// this file is in the public domain
%module avcodec
%insert("include")
%{
#include <libavcodec/avcodec.h>
%}
#define attribute_deprecated
%include <libavcodec/avcodec.h>
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment