From c79b6f484536a14d3bc79702387306c293a6692c Mon Sep 17 00:00:00 2001
From: Iago Mosqueira <iagomosqueira@users.noreply.github.com>
Date: Mon, 2 Dec 2024 08:26:21 +0100
Subject: [PATCH] Moved methods drom Rinternals to Rf_

---
 R/constructors.R |  2 --
 tests/brp.R      | 17 +++++++++++++++++
 2 files changed, 17 insertions(+), 2 deletions(-)
 create mode 100644 tests/brp.R

diff --git a/R/constructors.R b/R/constructors.R
index 688d393..fd059a0 100644
--- a/R/constructors.R
+++ b/R/constructors.R
@@ -8,8 +8,6 @@
 #
 # Distributed under the terms of the GNU Public License v 3.0
 
-# TODO: FLBRP(FLStockR)
-
 # FLBRP(object='missing', sr='missing') {{{
 #' @rdname FLBRP
 #' @aliases FLBRP-missing,missing-method
diff --git a/tests/brp.R b/tests/brp.R
new file mode 100644
index 0000000..a60b552
--- /dev/null
+++ b/tests/brp.R
@@ -0,0 +1,17 @@
+# brp.R - DESC
+# tests/brp.R
+
+# Copyright (c) WUR, 2024.
+# Author: Iago MOSQUEIRA (WMR) <iago.mosqueira@wur.nl>
+#
+# Distributed under the terms of the EUPL-1.2
+
+# XX {{{
+# }}}
+
+data(ple4)
+
+a<-brp(FLBRP(ple4))
+b<-brp(FLBRP(ple4))
+
+all.equal(a, b)