Fixed, context messages 'expt' -> 'expt_dgr'

Author: StuartWheater

tests/testthat/test-expt_dgr-ds.dataFrameSort.R

@@ -8,12 +8,12 @@
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 #-------------------------------------------------------------------------------
 
-context('ds.dataFrameSort::expt::setup')
+context('ds.dataFrameSort::expt_dgr::setup')
 
 source('connection_to_datasets/init_testing_datasets.R')
 source('definition_tests/def-ds.dataFrameSort.R')
 
-context("ds.dataFrameSort::expt::multiple::correct_parameter_class")
+context("ds.dataFrameSort::expt_dgr::multiple::correct_parameter_class")
 test_that('all datasets',
           {  
             connect.all.datasets()
@@ -31,7 +31,7 @@ test_that('all datasets',
             .test.function.parameters("D","D$NUMERIC_ONE_CHANGE",TRUE,"alphabetic","server.data")
             .test.function.parameters("D","D$INTEGER_ONE_CHANGE",TRUE,"numeric","server.data")
           })
-context("ds.dataFrameSort::expt::single::correct_parameter_class")
+context("ds.dataFrameSort::expt_dgr::single::correct_parameter_class")
 test_that('dataset 2',
           {  
             connect.dataset.2()
@@ -49,7 +49,7 @@ test_that('dataset 2',
             .test.function.parameters("D","D$NUMERIC_ONE_CHANGE",TRUE,"alphabetic","server.data")
             .test.function.parameters("D","D$INTEGER_ONE_CHANGE",TRUE,"numeric","server.data")
           })
-context("ds.dataFrameSort::expt::multiple::incorrect_parameter_class")
+context("ds.dataFrameSort::expt_dgr::multiple::incorrect_parameter_class")
 test_that('all datasets',
           {  
             connect.all.datasets()
@@ -65,7 +65,7 @@ test_that('all datasets',
             .test.function.parameters("D","D$NUMERIC_ONE_CHANGE",TRUE,"alphabetic",23)
             .test.function.parameters("dataframe","D$INTEGER_ONE_CHANGE",TRUE,"numeric","server.data")
           })
-context("ds.dataFrameSort::expt::single::incorrect_parameter_class")
+context("ds.dataFrameSort::expt_dgr::single::incorrect_parameter_class")
 test_that('dataset 2',
           {  
             connect.dataset.2()
@@ -82,7 +82,7 @@ test_that('dataset 2',
             .test.function.parameters("dataframe","D$INTEGER_ONE_CHANGE",TRUE,"numeric","server.data")
           })
 
-context("ds.dataFrameSort::expt::multiple::df::creation")
+context("ds.dataFrameSort::expt_dgr::multiple::df::creation")
 test_that('all datasets',
           {  
             connect.all.datasets()
@@ -98,7 +98,7 @@ test_that('all datasets',
             .test.data.frame.creation("D","NUMERIC_ONE_CHANGE",TRUE,"numeric","server.data")
             .test.data.frame.creation("D","INTEGER_ONE_CHANGE",TRUE,"numeric","server.data")
           })
-context("ds.dataFrameSort::expt::single::df::creation")
+context("ds.dataFrameSort::expt_dgr::single::df::creation")
 test_that('dataset 3',
           {  
             connect.dataset.3()
@@ -114,7 +114,7 @@ test_that('dataset 3',
             .test.data.frame.creation("D","NUMERIC_ONE_CHANGE",TRUE,"numeric","server.data")
             .test.data.frame.creation("D","INTEGER_ONE_CHANGE",FALSE,"alphabetic","server.data")
           })
-context("ds.dataFrameSort::expt::multiple::numeric::ascending")
+context("ds.dataFrameSort::expt_dgr::multiple::numeric::ascending")
 test_that('all datasets',
           {  
             connect.all.datasets()
@@ -124,7 +124,7 @@ test_that('all datasets',
               local.df.list[[i]][,"FACTOR_INTEGER"]<-as.factor(local.df.list[[i]][,"FACTOR_INTEGER"])
               colnames(local.df.list[[i]])<-ds.colnames("D",datasources = ds.test_env$connections[i][[1]])
             }
-            
+            print('------')
             .test.data.frame.sorting("D","LOGICAL",FALSE,"numeric","server.data",local.df.list)
             #.test.data.frame.sorting("D","INTEGER",FALSE,"numeric","server.data",local.df.list)
             .test.data.frame.sorting("D","POSITIVE_INTEGER",FALSE,"numeric","server.data",local.df.list)
@@ -142,7 +142,7 @@ test_that('all datasets',
 
 
           })
-context("ds.dataFrameSort::expt::single::numeric::ascending")
+context("ds.dataFrameSort::expt_dgr::single::numeric::ascending")
 test_that('dataset 1',
           {  
             connect.dataset.1()
@@ -172,7 +172,7 @@ test_that('dataset 1',
 
 
           })
-context("ds.dataFrameSort::expt::multiple::numeric::descending")
+context("ds.dataFrameSort::expt_dgr::multiple::numeric::descending")
 test_that('all datasets',
           {  
             connect.all.datasets()
@@ -199,7 +199,7 @@ test_that('all datasets',
 
 
           })
-context("ds.dataFrameSort::expt::single::numeric::descending")
+context("ds.dataFrameSort::expt_dgr::single::numeric::descending")
 test_that('dataset 1',
           {  
             connect.dataset.1()
@@ -228,7 +228,7 @@ test_that('dataset 1',
           })
 
 
-context("ds.dataFrameSort::expt::multiple::alphabetic::ascending")
+context("ds.dataFrameSort::expt_dgr::multiple::alphabetic::ascending")
 test_that('all datasets',
           {  
             connect.all.datasets()
@@ -255,7 +255,7 @@ test_that('all datasets',
             #.test.data.frame.sorting("D","FACTOR_CHARACTER",FALSE,"alphabetic","server.data",local.df.list) 
             .test.data.frame.sorting("D","CHARACTER",FALSE,"alphabetic","server.data",local.df.list)
           })
-context("ds.dataFrameSort::expt::single::alphabetic::ascending")
+context("ds.dataFrameSort::expt_dgr::single::alphabetic::ascending")
 test_that('dataset 2',
           {  
             connect.dataset.2()
@@ -282,7 +282,7 @@ test_that('dataset 2',
             #.test.data.frame.sorting("D","FACTOR_CHARACTER",FALSE,"alphabetic","server.data",local.df.list) 
             .test.data.frame.sorting("D","CHARACTER",FALSE,"alphabetic","server.data",local.df.list)
           })
-context("ds.dataFrameSort::expt::multiple::alphabetic::descending")
+context("ds.dataFrameSort::expt_dgr::multiple::alphabetic::descending")
 test_that('all datasets',
           {  
             connect.all.datasets()
@@ -307,7 +307,7 @@ test_that('all datasets',
             #.test.data.frame.sorting("D","FACTOR_CHARACTER",TRUE,"alphabetic","server.data",local.df.list)
             .test.data.frame.sorting("D","CHARACTER",TRUE,"alphabetic","server.data",local.df.list)
           })
-context("ds.dataFrameSort::expt::single::alphabetic::descending")
+context("ds.dataFrameSort::expt_dgr::single::alphabetic::descending")
 test_that('dataset 3',
           {  
             connect.dataset.3()
@@ -334,7 +334,7 @@ test_that('dataset 3',
           })
 
 
-context('ds.dataFrameSort::expt::shutdown')
+context('ds.dataFrameSort::expt_dgr::shutdown')
 
 
-context('ds.dataFrameSort::expt::done')
+context('ds.dataFrameSort::expt_dgr::done')