! Public Domain.
USING: kernel sequences alien alien.syntax alien.c-types alien.parser alien.libraries ;
IN: hello-tcod

<< "tcod" "libtcod-VS.dll" cdecl add-library >>
LIBRARY: tcod

ENUM: TCOD_renderer_t TCOD_RENDERER_GLSL TCOD_RENDERER_OPENGL TCOD_RENDERER_SDL TCOD_NB_RENDERERS ;
ENUM: TCOD_bkgnd_flag_t TCOD_BKGND_NONE TCOD_BKGND_SET TCOD_BKGND_MULTIPLY TCOD_BKGND_LIGHTEN TCOD_BKGND_DARKEN TCOD_BKGND_SCREEN TCOD_BKGND_COLOR_DODGE TCOD_BKGND_COLOR_BURN TCOD_BKGND_ADD TCOD_BKGND_ADDA TCOD_BKGND_BURN TCOD_BKGND_OVERLAY TCOD_BKGND_ALPH TCOD_BKGND_DEFAULT ;
ENUM: TCOD_alignment_t TCOD_LEFT TCOD_RIGHT TCOD_CENTER ;

FUNCTION: void TCOD_console_init_root ( int w  int h  c-string title  bool fullscreen  TCOD_renderer_t renderer ) ;
FUNCTION: void TCOD_console_print_ex ( void* con int x  int y  TCOD_bkgnd_flag_t flag  TCOD_alignment_t alignment  c-string fmt ) ;
FUNCTION: void TCOD_console_flush ;
FUNCTION: void TCOD_console_wait_for_keypress ( bool flush ) ;


TCOD_RENDERER_SDL 80 50 "Libtcod Hello World" f TCOD_console_init_root
null 40 25 TCOD_BKGND_NONE TCOD_CENTER "Hello World!" TCOD_console_print_ex
TCOD_console_flush
t TCOD_console_wait_for_keypress