X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fstdlib%2Fmblen.c;h=ae90a98353abce68d33e21e5c8ff40c589880b2b;hb=e5456e3c2697c4e17fc9aa3439f2e305517b4d96;hp=b9136e439efe5c805ee45f16a5a97de25a96c514;hpb=dcc8a8e99f69e090a03b7b868443addbc0817820;p=pdclib.old

diff --git a/functions/stdlib/mblen.c b/functions/stdlib/mblen.c
index b9136e4..ae90a98 100644
--- a/functions/stdlib/mblen.c
+++ b/functions/stdlib/mblen.c
@@ -6,3 +6,20 @@
 // ----------------------------------------------------------------------------
 
 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);
+    }
+}
+*/