Tcl_FreeProc + volatile/static/dynamic constants of correct type

This commit is contained in:
Joachim Schoeberl 2022-05-07 19:45:38 +02:00
parent 03332c1146
commit 1a634c1957

View File

@ -22,10 +22,15 @@ typedef void (Tcl_FreeProc) (char *blockPtr);
namespace netgen {
/*
inline constexpr int NG_TCL_VOLATILE = 1;
inline constexpr int NG_TCL_STATIC = 0;
inline constexpr int NG_TCL_DYNAMIC = 3;
*/
#define TCL_VOLATILE ((Tcl_FreeProc *) 1)
#define TCL_STATIC ((Tcl_FreeProc *) 0)
#define TCL_DYNAMIC ((Tcl_FreeProc *) 3)
inline constexpr int NG_TCL_OK = 0;
inline constexpr int NG_TCL_ERROR = 1;
inline constexpr int NG_TCL_RETURN = 2;