open Swig
open Catches_strings

let _ =
  try
    ignore (_StringsThrower_charstring (C_void)); assert false
  with Failure s ->
    assert (s = "charstring message")

let _ =
  try
    ignore (_StringsThrower_stdstring (C_void)); assert false
  with Failure s ->
    assert (s = "stdstring message")