hg.stevelosh.com > cl-blt

src/low-level/bearlibterminal.swig @ 712aef6ff9cb 

Update BLT, add `(setf font)`
author Steve Losh <steve@stevelosh.com>
date Tue, 04 Jul 2017 17:49:09 +0000
parents 8e35ed93d731
children e0811ef78cce 
%module bearlibterminal

%insert("lisphead") %{
(cl:in-package :bearlibterminal/low-level)

(cffi:defctype color :uint)

(cffi:define-foreign-library blt:bearlibterminal
  (:darwin (:or "Contents/Frameworks/libBearLibTerminal.dylib"
                "lib/libBearLibTerminal.dylib")))

(cffi:use-foreign-library blt:bearlibterminal)
%}

%feature("intern_function","1");
%feature("export");

%typemap(cin)  color_t "color";
%typemap(cout) color_t "color";

%typemap(cin)  int8_t* ":string";
%typemap(cout) int8_t* ":string";

%include "src/low-level/include/BearLibTerminal.h"