diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2013-06-13 21:21:22 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2013-06-13 21:21:22 (GMT) |
| commit | 5318e02134708884c49c74419b36f34da125b85f (patch) | |
| tree | 99dc30d58971e098e40cd490fdf0978b4bb5871a /generic/tclCompile.h | |
| parent | da718e3de736c92c52588c80488ed817dcf74e0b (diff) | |
| download | tcl-5318e02134708884c49c74419b36f34da125b85f.zip tcl-5318e02134708884c49c74419b36f34da125b85f.tar.gz tcl-5318e02134708884c49c74419b36f34da125b85f.tar.bz2 | |
Improved rendering of some opcode arguments and auxdata.
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index f28403d..cf7b563 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -252,6 +252,16 @@ typedef struct AuxDataType { AuxDataPrintProc *printProc;/* Callback function to invoke when printing * the aux data as part of debugging. NULL * means that the data can't be printed. */ + AuxDataPrintProc *disassembleProc; + /* Callback function to invoke when doing a + * disassembly of the aux data (like the + * printProc, except that the output is + * intended to be script-readable). The + * appendObj argument should be filled in with + * a descriptive dictionary; it will start out + * with "name" mapped to the content of the + * name field. NULL means that the printProc + * should be used instead. */ } AuxDataType; /* |