commit-gnuradio
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Commit-gnuradio] r4373 - gnuradio/branches/developers/eb/mb/pmt/src/lib


From: eb
Subject: [Commit-gnuradio] r4373 - gnuradio/branches/developers/eb/mb/pmt/src/lib
Date: Sun, 4 Feb 2007 19:39:44 -0700 (MST)

Author: eb
Date: 2007-02-04 19:39:43 -0700 (Sun, 04 Feb 2007)
New Revision: 4373

Modified:
   gnuradio/branches/developers/eb/mb/pmt/src/lib/pmt.cc
   gnuradio/branches/developers/eb/mb/pmt/src/lib/pmt.h
Log:
added pmt_list* routines

Modified: gnuradio/branches/developers/eb/mb/pmt/src/lib/pmt.cc
===================================================================
--- gnuradio/branches/developers/eb/mb/pmt/src/lib/pmt.cc       2007-02-04 
23:10:23 UTC (rev 4372)
+++ gnuradio/branches/developers/eb/mb/pmt/src/lib/pmt.cc       2007-02-05 
02:39:43 UTC (rev 4373)
@@ -841,3 +841,27 @@
   }
   return true;
 }
+
+pmt_t
+pmt_list1(pmt_t x1)
+{
+  return pmt_cons(x1, PMT_NIL);
+}
+
+pmt_t
+pmt_list2(pmt_t x1, pmt_t x2)
+{
+  return pmt_cons(x1, pmt_cons(x2, PMT_NIL));
+}
+
+pmt_t
+pmt_list3(pmt_t x1, pmt_t x2, pmt_t x3)
+{
+  return pmt_cons(x1, pmt_cons(x2, pmt_cons(x3, PMT_NIL)));
+}
+
+pmt_t
+pmt_list4(pmt_t x1, pmt_t x2, pmt_t x3, pmt_t x4)
+{
+  return pmt_cons(x1, pmt_cons(x2, pmt_cons(x3, pmt_cons(x4, PMT_NIL))));
+}

Modified: gnuradio/branches/developers/eb/mb/pmt/src/lib/pmt.h
===================================================================
--- gnuradio/branches/developers/eb/mb/pmt/src/lib/pmt.h        2007-02-04 
23:10:23 UTC (rev 4372)
+++ gnuradio/branches/developers/eb/mb/pmt/src/lib/pmt.h        2007-02-05 
02:39:43 UTC (rev 4373)
@@ -548,6 +548,26 @@
  */
 bool pmt_subsetp(pmt_t list1, pmt_t list2);
 
+/*!
+ * \brief Return a list of length 1 containing \p x1
+ */
+pmt_t pmt_list1(pmt_t x1);
+
+/*!
+ * \brief Return a list of length 2 containing \p x1, \p x2
+ */
+pmt_t pmt_list2(pmt_t x1, pmt_t x2);
+
+/*!
+ * \brief Return a list of length 3 containing \p x1, \p x2, \p x3
+ */
+pmt_t pmt_list3(pmt_t x1, pmt_t x2, pmt_t x3);
+
+/*!
+ * \brief Return a list of length 4 containing \p x1, \p x2, \p x3, \p x4
+ */
+pmt_t pmt_list4(pmt_t x1, pmt_t x2, pmt_t x3, pmt_t x4);
+
 /*
  * ------------------------------------------------------------------------
  *                          read / write





reply via email to

[Prev in Thread] Current Thread [Next in Thread]