/* ---------------------------------------------------------------------- */

#define ns__alpha_x0 "::alpha-x"
static int
tcl__alpha_x0_actual(ClientData dummy, Tcl_Interp *ip, Tcl_Size objc, Tcl_Obj *CONST objv[])
{
static char script[4] = {
        98,101,116,97,
  };
  Tcl_SetByteArrayObj(Tcl_GetObjResult(ip), (unsigned char*) script, 4);
  return TCL_OK;
}

static int
tcl__alpha_x0(ClientData dummy, Tcl_Interp *ip, Tcl_Size objc, Tcl_Obj *CONST objv[])
{
  int _rv;
  critcl_trace_cmd_args (ns__alpha_x0, objc, objv);
  _rv = tcl__alpha_x0_actual (dummy, ip, objc, objv);
  return critcl_trace_cmd_result (_rv, ip);
}