diff options
Diffstat (limited to 'packages/ptc/src/c_api/errord.inc')
| -rw-r--r-- | packages/ptc/src/c_api/errord.inc | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/packages/ptc/src/c_api/errord.inc b/packages/ptc/src/c_api/errord.inc new file mode 100644 index 0000000000..0eff904d73 --- /dev/null +++ b/packages/ptc/src/c_api/errord.inc @@ -0,0 +1,15 @@ +Type + TPTC_ERROR_HANDLER = Procedure(error : TPTC_ERROR); + +Function ptc_error_create(message : String) : TPTC_ERROR; +Function ptc_error_create_composite(message : String; error : TPTC_ERROR) : TPTC_ERROR; +Procedure ptc_error_destroy(obj : TPTC_ERROR); + +Procedure ptc_error_report(obj : TPTC_ERROR); + +Function ptc_error_message(obj : TPTC_ERROR) : String; + +Procedure ptc_error_assign(obj, error : TPTC_ERROR); +Function ptc_error_equals(obj, error : TPTC_ERROR) : Boolean; + +Procedure ptc_error_handler(handler : TPTC_ERROR_HANDLER); |