' Gambas module file

Export 

Public Sub _Call(sPath As String, iLine As Integer, sMessage As String)
  
  Error.Raise(File.Name(Args[0]) & ": " & sPath & "." & iLine & ": " & sMessage)

End ' Gambas module file

