ed333b6b97
Go, Guile, Racket, Scilab: Add throws typemaps for std::string so that thrown string exception messages can be seen. Test all language for std::string throws typemaps
14 lines
301 B
OCaml
14 lines
301 B
OCaml
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")
|