2614
2615
2616
2617
2618
2619
2620
2621
2622
2623
2624
|
Tcl_ObjSetVar2(interp, Tcl_NewStringObj("::tuapi::const::HOST_NAME_MAX", -1), NULL, Tcl_NewWideIntObj(HOST_NAME_MAX), TCL_GLOBAL_ONLY);
/* Create high-level user functions */
Tcl_Eval(interp,
#include "tuapi.tcl.h"
);
Tcl_PkgProvide(interp, "tuapi", "0.1");
return(TCL_OK);
}
|
|
|
2614
2615
2616
2617
2618
2619
2620
2621
2622
2623
2624
|
Tcl_ObjSetVar2(interp, Tcl_NewStringObj("::tuapi::const::HOST_NAME_MAX", -1), NULL, Tcl_NewWideIntObj(HOST_NAME_MAX), TCL_GLOBAL_ONLY);
/* Create high-level user functions */
Tcl_Eval(interp,
#include "tuapi.tcl.h"
);
Tcl_PkgProvide(interp, "tuapi", "0.2");
return(TCL_OK);
}
|