#define fbc -dll -Wl " --entry _MAIN@12"

#include "windows.bi"
#include "crt.bi"

function main ( HINSTANCE as handle , uReason as uinteger , Reserved as any ptr ) as integer export
  select case uReason
  case DLL_PROCESS_ATTACH
    puts("Process attach")
    fb_Init( 0, NULL, 0 )

  case DLL_PROCESS_DETACH

  case DLL_THREAD_ATTACH:

  case DLL_THREAD_DETACH:

  end select
  return 1
end function