Make custom error interface more flexible with READABLE_STRING_... instead of STRING_...

This commit is contained in:
2015-10-10 00:58:07 +02:00
parent c92b1b8c3b
commit 66f204b1f2
2 changed files with 6 additions and 6 deletions

View File

@@ -2,8 +2,8 @@ note
description : "Objects that represent a custom error"
legal: "See notice at end of class."
status: "See notice at end of class."
date: "$Date$"
revision: "$Revision$"
date: "$Date: 2015-10-10 00:55:41 +0200 (sam., 10 oct. 2015) $"
revision: "$Revision: 97980 $"
class
ERROR_CUSTOM
@@ -24,7 +24,7 @@ feature {NONE} -- Initialization
if a_message /= Void then
message := a_message
else
message := "Error: " + a_name + " (code=" + a_code.out + ")"
message := {STRING_32} "Error: " + a_name + " (code=" + a_code.out + ")"
end
end

View File

@@ -2,8 +2,8 @@ note
description : "Objects that handle error..."
legal: "See notice at end of class."
status: "See notice at end of class."
date: "$Date$"
revision: "$Revision$"
date: "$Date: 2015-10-10 00:55:41 +0200 (sam., 10 oct. 2015) $"
revision: "$Revision: 97980 $"
class
ERROR_HANDLER
@@ -216,7 +216,7 @@ feature -- Basic operation
on_error_added (a_error)
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
local
e: ERROR_CUSTOM