[Gambas-user] found interesting bug

kobolds kobolds at ...2041...
Mon Jul 6 10:13:10 CEST 2009


 I found very interesting bug . here how to emulate it (took me a while to
trace it)

1 . create 2 module

module Mtest1

public function test() as boolean

  error.raise("this is error 1")

  return true
catch
  Mtest2.test2(error.text)
  return false
end

'__________________________________
module Mtest2

public function test2(arg_msg as string)
   message.error(arg_msg)
end


when you run you will notice message.error show nothing . the message ""this
is error 1" lose . 
solution 1

module Mtest1

public function test() as boolean
  dim m_err as string
  error.raise("this is error 1")

  return true
catch
  m_err = error.text
  Mtest2.test2(m_err)
  return false
end

'__________________________________
module Mtest2

public function test2(arg_msg as string)
   message.error(arg_msg)
end


solution 2

module Mtest1

public function test() as boolean
  dim m_err as string
  error.raise("this is error 1")

  return true
catch
  m_err = error.text
  Mtest2.test2(m_err)
  return false
end

public function test2(arg_msg as string)
   message.error(arg_msg)
end






is this a bug or not ? 
-- 
View this message in context: http://www.nabble.com/found-interesting-bug-tp24351370p24351370.html
Sent from the gambas-user mailing list archive at Nabble.com.





More information about the User mailing list