Make custom error interface more flexible with READABLE_STRING_... instead of STRING_...
This commit is contained in:
@@ -2,8 +2,8 @@ note
|
|||||||
description : "Objects that represent a custom error"
|
description : "Objects that represent a custom error"
|
||||||
legal: "See notice at end of class."
|
legal: "See notice at end of class."
|
||||||
status: "See notice at end of class."
|
status: "See notice at end of class."
|
||||||
date: "$Date$"
|
date: "$Date: 2015-10-10 00:55:41 +0200 (sam., 10 oct. 2015) $"
|
||||||
revision: "$Revision$"
|
revision: "$Revision: 97980 $"
|
||||||
|
|
||||||
class
|
class
|
||||||
ERROR_CUSTOM
|
ERROR_CUSTOM
|
||||||
@@ -24,7 +24,7 @@ feature {NONE} -- Initialization
|
|||||||
if a_message /= Void then
|
if a_message /= Void then
|
||||||
message := a_message
|
message := a_message
|
||||||
else
|
else
|
||||||
message := "Error: " + a_name + " (code=" + a_code.out + ")"
|
message := {STRING_32} "Error: " + a_name + " (code=" + a_code.out + ")"
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
|
||||||
|
|||||||
@@ -2,8 +2,8 @@ note
|
|||||||
description : "Objects that handle error..."
|
description : "Objects that handle error..."
|
||||||
legal: "See notice at end of class."
|
legal: "See notice at end of class."
|
||||||
status: "See notice at end of class."
|
status: "See notice at end of class."
|
||||||
date: "$Date$"
|
date: "$Date: 2015-10-10 00:55:41 +0200 (sam., 10 oct. 2015) $"
|
||||||
revision: "$Revision$"
|
revision: "$Revision: 97980 $"
|
||||||
|
|
||||||
class
|
class
|
||||||
ERROR_HANDLER
|
ERROR_HANDLER
|
||||||
@@ -216,7 +216,7 @@ feature -- Basic operation
|
|||||||
on_error_added (a_error)
|
on_error_added (a_error)
|
||||||
end
|
end
|
||||||
|
|
||||||
add_error_details, add_custom_error (a_code: INTEGER; a_name: STRING; a_message: detachable STRING_32)
|
add_error_details, add_custom_error (a_code: INTEGER; a_name: STRING; a_message: detachable READABLE_STRING_32)
|
||||||
-- Add custom error to the stack of error
|
-- Add custom error to the stack of error
|
||||||
local
|
local
|
||||||
e: ERROR_CUSTOM
|
e: ERROR_CUSTOM
|
||||||
|
|||||||
Reference in New Issue
Block a user