diff options
author | Jeffrey Armstrong <jeff@approximatrix.com> | 2021-06-25 09:17:01 -0400 |
---|---|---|
committer | Jeffrey Armstrong <jeff@approximatrix.com> | 2021-06-25 09:17:01 -0400 |
commit | d282a7e283a1704cdde2649c7caf130fb923051a (patch) | |
tree | 3dfbeb78cd75017731d817d3a3a15919842a35dd | |
parent | e9460ea44fe7c11dc6d7d668ca9cd1b36418f097 (diff) | |
download | levitating-d282a7e283a1704cdde2649c7caf130fb923051a.tar.gz levitating-d282a7e283a1704cdde2649c7caf130fb923051a.zip |
Removed spurious printing when looking up instruction ids
-rw-r--r-- | captain/db.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/captain/db.f90 b/captain/db.f90 index 315bd10..1f9bc01 100644 --- a/captain/db.f90 +++ b/captain/db.f90 @@ -398,7 +398,7 @@ contains type(sqlite3_stmt)::stmt str = " " - Print *, id + if(stmt%prepare(db, "SELECT name FROM instructions WHERE id=?") == SQLITE_OK) then if(stmt%bind_int(1, id) == SQLITE_OK) then if(stmt%step() == SQLITE_ROW) then |