Added test for GAP exception

oscar-system · Nov 8, 2018 · 7fa8432 · 7fa8432
1 parent 49a460e
commit 7fa8432
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 2 deletions.
diff --git a/LibGAP.jl/src/initialization.jl b/LibGAP.jl/src/initialization.jl
@@ -24,11 +24,11 @@ read_sysinfo_gap = function(dir::String)
     return d
 end
 
-function error_handler(message)
+function error_handler()
     error("Error thrown by GAP")
 end
 
-error_handler_func = @cfunction(error_handler,Cvoid,(Ptr{Char},))
+error_handler_func = @cfunction(error_handler,Cvoid,())
 
 const pkgdir = realpath(dirname(@__FILE__))
 

diff --git a/LibGAP.jl/test/basics.jl b/LibGAP.jl/test/basics.jl
@@ -16,4 +16,7 @@
     @test GAP.True
     @test ! GAP.False
 
+
+    xx = GAP.to_gap([1,2,3])
+    @test_throws ErrorException xx[4]
 end