cmdassert.c
上传用户:kellyonhid
上传日期:2013-10-12
资源大小:932k
文件大小:0k
- /*
- // cmdassert.c
- // magi@cs.stanford.edu
- // 2/3/2000
- //
- // non-fatal equivalent of assert for use in Tcl command-processing
- // functions, say when something doesn't like its arguments -- instead
- // of calling abort(), we'll just return TCL_ERROR.
- // The mechanics here are basically just stolen from assert.h.
- */
- #include <stdio.h>
- void __cmdassert(const char * expr, const char * file, int line)
- {
- fprintf (stderr, "Benign assertion failed: %s, file %s, line %dn",
- expr, file, line);
- }