1- <<<<<<< HEAD
21# Licensed to the Apache Software Foundation (ASF) under one
32# or more contributor license agreements. See the NOTICE file
43# distributed with this work for additional information
1615# specific language governing permissions and limitations
1716# under the License.
1817
19- =======
20- >>>>>>> Initial work for type metadata , with tests.
2118# ' @include enums.R
2219# ' @importFrom R6 R6Class
2320# ' @importFrom glue glue
2421# ' @importFrom purrr map map_int map2
2522# ' @importFrom rlang dots_n
2623# ' @importFrom assertthat assert_that
27- <<<<<<< HEAD
28- =======
2924
30- >>>>>>> Initial work for type metadata , with tests.
3125`arrow::Object` <- R6Class(" arrow::Object" ,
3226 public = list (
3327 `.:xp:.` = NULL ,
297291 )
298292)
299293
300- <<<<<<< HEAD
301294# ' Apache Arrow data types
302295# '
303296# ' Apache Arrow data types
@@ -369,7 +362,7 @@ date32 <- function() `arrow::Date32`$new()
369362date64 <- function () `arrow::Date64` $ new()
370363
371364# ' @rdname DataType
372- =======
365+
373366# ' @export
374367int8 <- function () `arrow::Int8` $ new()
375368
@@ -415,13 +408,11 @@ date32 <- function() `arrow::Date32`$new()
415408# ' @export
416409date64 <- function () `arrow::Date64` $ new()
417410
418- >>>>>>> Initial work for type metadata , with tests.
419411# ' @export
420412time32 <- function (unit ) {
421413 `arrow::Time32` $ new(unit )
422414}
423415
424- <<<<<<< HEAD
425416# ' @rdname DataType
426417# ' @export
427418time64 <- function (unit ) `arrow::Time64` $ new(unit )
@@ -435,7 +426,7 @@ null <- function() `arrow::Null`$new()
435426timestamp <- function (... ) `arrow::Timestamp` $ new(... )
436427
437428# ' @rdname DataType
438- =======
429+
439430# ' @export
440431time64 <- function (unit ) `arrow::Time64` $ new(unit )
441432
@@ -445,7 +436,6 @@ null <- function() `arrow::Null`$new()
445436# ' @export
446437timestamp <- function (... ) `arrow::Timestamp` $ new(... )
447438
448- >>>>>>> Initial work for type metadata , with tests.
449439# ' @export
450440decimal <- function (precision , scale ) `arrow::Decimal128Type` $ new(precision , scale )
451441
@@ -532,17 +522,11 @@ field <- function(name, type) `arrow::Field`$new(name, type)
532522 )
533523)
534524
535- <<<<<<< HEAD
536525# ' @rdname DataType
537526# ' @export
538527struct <- function (... ) `arrow::StructType` $ new(... )
539528
540529# ' @rdname DataType
541- =======
542- # ' @export
543- struct <- function (... ) `arrow::StructType` $ new(... )
544-
545- >>>>>>> Initial work for type metadata , with tests.
546530# ' @export
547531schema <- function (... ) `arrow::Schema` $ new(... )
548532
@@ -564,12 +548,6 @@ schema <- function(...) `arrow::Schema`$new(...)
564548 )
565549)
566550
567- <<<<<<< HEAD
568551# ' @rdname DataType
569552# ' @export
570553list_of <- function (type ) `arrow::ListType` $ new(type )
571- =======
572- # ' @export
573- list_of <- function (x ) `arrow::ListType` $ new(x )
574- >>>>>>> Initial work for type metadata , with tests.
575-
0 commit comments