X-Git-Url: https://pd.if.org/git/?p=pdclib;a=blobdiff_plain;f=functions%2Fstdlib%2Fmblen.c;h=3b783f46588aed037997b5d7cde8e9c59301bb5d;hp=b9136e439efe5c805ee45f16a5a97de25a96c514;hb=1d9d92ba957a0b8307c9a65c35867fde68e6533b;hpb=34893ecc2200dc7017c36a54cb6c5f4c2378b5ec

diff --git a/functions/stdlib/mblen.c b/functions/stdlib/mblen.c
index b9136e4..3b783f4 100644
--- a/functions/stdlib/mblen.c
+++ b/functions/stdlib/mblen.c
@@ -1,8 +1,25 @@
-// ----------------------------------------------------------------------------
-// $Id$
-// ----------------------------------------------------------------------------
-// Public Domain C Library - http://pdclib.sourceforge.net
-// This code is Public Domain. Use, modify, and redistribute at will.
-// ----------------------------------------------------------------------------
+/* ----------------------------------------------------------------------------
+ * $Id$
+ * ----------------------------------------------------------------------------
+ * Public Domain C Library - http://pdclib.sourceforge.net
+ * This code is Public Domain. Use, modify, and redistribute at will.
+ * --------------------------------------------------------------------------*/
 
 int mblen( const char * s, size_t n ) { /* TODO */ };
+
+/* PDPC code - unreviewed
+{   
+    if (s == NULL)
+    {
+        return (0);
+    }
+    if (n == 1)
+    {
+        return (1);
+    }
+    else
+    {
+        return (-1);
+    }
+}
+*/