X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=chiark-tcl.git;a=blobdiff_plain;f=base%2Fparse.c;h=b81511cc827e0c45d1cb53bfe318c74cb1a34cfe;hp=ddb5ac5e37ee9efca562f96d8fe91da1ca0994eb;hb=d23a32272b954579fe15c78d6ea605e087d0a512;hpb=d30ded35f199708808df64a9db9c83100e073c9f diff --git a/base/parse.c b/base/parse.c index ddb5ac5..b81511c 100644 --- a/base/parse.c +++ b/base/parse.c @@ -42,9 +42,7 @@ int pat_hbv(Tcl_Interp *ip, Tcl_Obj *var, HBytes_Var *agg) { rc= Tcl_ConvertToType(ip,val,&hbytes_type); if (rc) return rc; - agg->hb= OBJ_HBYTES(val); - return TCL_OK; -} + agg->hb= OBJ_HBYTES(val); return TCL_OK; } void fini_hbv(Tcl_Interp *ip, int rc, HBytes_Var *agg) { Tcl_Obj *ro;