From b96eb1a18442360038d6d928033b3356d1afe65e Mon Sep 17 00:00:00 2001 From: michael Date: Tue, 27 Apr 2010 15:22:03 +0000 Subject: * Removed some statements git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@15194 3ad0048d-3df7-0310-abae-a5850022a9f2 --- packages/sqlite/src/sqlite3db.pas | 3 --- packages/sqlite/src/sqlitedb.pas | 1 - 2 files changed, 4 deletions(-) (limited to 'packages/sqlite') diff --git a/packages/sqlite/src/sqlite3db.pas b/packages/sqlite/src/sqlite3db.pas index a7625b00db..f9dd6d2799 100644 --- a/packages/sqlite/src/sqlite3db.pas +++ b/packages/sqlite/src/sqlite3db.pas @@ -338,11 +338,8 @@ begin name:=StrAlloc (length(DBFileName)+1); strpcopy(name,DBFileName); OnData:=@SQLOnData; - writeln('Try to open'); sqlite3_open(name,@fSQLite); - writeln('Open success'); sqlite3_free(fPMsg); - writeln('Free memory'); if fSQLite <> nil then begin //fVersion := String(SQLite_Version); diff --git a/packages/sqlite/src/sqlitedb.pas b/packages/sqlite/src/sqlitedb.pas index b07ae23950..939d84caf9 100644 --- a/packages/sqlite/src/sqlitedb.pas +++ b/packages/sqlite/src/sqlitedb.pas @@ -393,7 +393,6 @@ var Psql : pchar; begin Psql:=StrAlloc (length(Sql)+1); strpcopy(Psql,Sql); - Writeln('Testing: ',psql); Result := SQLite_Complete(Psql)<>0; strdispose(Psql); end; -- cgit v1.2.1