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

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);
+    }
+}
+*/