| 48 | } |
| 49 | |
| 50 | int |
| 51 | getNumElements(ClientData clientData, Tcl_Interp *interp, int argc, |
| 52 | TCL_Char ** const argv) |
| 53 | { |
| 54 | assert(clientData != nullptr); |
| 55 | |
| 56 | Tcl_SetObjResult(interp, Tcl_NewIntObj(((Domain*)clientData)->getNumElements())); |
| 57 | |
| 58 | return TCL_OK; |
| 59 | } |
| 60 | |
| 61 | |
| 62 | int |
nothing calls this directly
no test coverage detected