809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
|
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
|
+
-
-
+
+
|
if( zCnt==0 ){
nContext = 6;
}else{
nContext = atoi(zCnt);
if( nContext<0 ) nContext = 0xfffffff;
}
blob_zero(&script);
blob_appendf(&script, "set ncontext %d\n", nContext);
blob_appendf(&script, "set fossilcmd {| \"%/\" %s -tcl -c %d",
g.nameOfExe, zSubCmd, nContext);
blob_appendf(&script, "set fossilcmd {| \"%/\" %s -tcl",
g.nameOfExe, zSubCmd);
find_option("tcl",0,0);
find_option("debug",0,0);
zTclsh = find_option("tclsh",0,1);
if( zTclsh==0 ){
zTclsh = db_get("tclsh",0);
}
/* The undocumented --script FILENAME option causes the Tk script to
|