diff options
| author | drh <drh@noemail.net> | 2018-09-19 15:08:21 +0000 |
|---|---|---|
| committer | drh <drh@noemail.net> | 2018-09-19 15:08:21 +0000 |
| commit | c6727c8342f753403303be237658acbafcd20b74 (patch) | |
| tree | ca3b9f36a14ece1bc9e5fa4c08b30ab2e8979266 /src | |
| parent | 16f39b6e5d8010d3da305a02fc0ba85102f1c858 (diff) | |
| download | sqlite-c6727c8342f753403303be237658acbafcd20b74.tar.gz sqlite-c6727c8342f753403303be237658acbafcd20b74.zip | |
Fix the "sqlite3" command in the TCL interface so that it correctly returns
an error if invoked with no arguments.
FossilOrigin-Name: 2034fa8089676132b5e2f71bdebf1af9ca141da2e173920c6e84fb974ab0f022
Diffstat (limited to 'src')
| -rw-r--r-- | src/tclsqlite.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index d0b4634d4..3982ead7b 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -3497,6 +3497,7 @@ static int SQLITE_TCLAPI DbMain( flags = SQLITE_OPEN_READWRITE | SQLITE_OPEN_CREATE | SQLITE_OPEN_NOMUTEX; #endif + if( objc==1 ) return sqliteCmdUsage(interp, objv); if( objc==2 ){ zArg = Tcl_GetStringFromObj(objv[1], 0); if( strcmp(zArg,"-version")==0 ){ |