From 480d604d83e1ae690af2330aa7afb4088fc616a8 Mon Sep 17 00:00:00 2001 From: "Roger D. Peng [audrey]" Date: Fri, 12 Dec 2008 16:34:13 -0500 Subject: [PATCH] Update test output --- tests/reg-tests.Rout.save | 18 +++++++++++++++--- 1 file changed, 15 insertions(+), 3 deletions(-) diff --git a/tests/reg-tests.Rout.save b/tests/reg-tests.Rout.save index 375f253..9bfca3f 100644 --- a/tests/reg-tests.Rout.save +++ b/tests/reg-tests.Rout.save @@ -1,5 +1,5 @@ -R version 2.7.1 (2008-06-23) +R version 2.8.0 (2008-10-20) Copyright (C) 2008 The R Foundation for Statistical Computing ISBN 3-900051-07-0 @@ -164,7 +164,6 @@ Error in dbFetch(db, "c"): unable to obtain value for key 'c' [1] 5 4 3 2 1 6 7 8 9 10 > > dbDelete(db, "c") -NULL > > tryCatch(print(env$c), error = function(e) cat(as.character(e))) Error in readSingleKey(con, map, key): unable to obtain value for key 'c' @@ -282,7 +281,6 @@ Finished; reload database with 'dbInit' > > dbInsert(db, "b", 123) > dbDelete(db, "a") -NULL > dbList(db) [1] "b" > dbExists(db, "a") @@ -291,3 +289,17 @@ NULL > file.remove("mydb") [1] TRUE > +> ################################################################################ +> ## Check queue +> +> db <- createQ("testq") +> push(db, 1) +> push(db, 2) +> top(db) +[1] 1 +> +> pop(db) +[1] 1 +> top(db) +[1] 2 +> -- 2.11.4.GIT