scanf modules (currently not working)

git-svn-id: svn://svn.cc65.org/cc65/trunk@624 b7a2c559-68d2-44c3-8de9-860c34a00d81

libsrc/common/sscanf.c

@@ -0,0 +1,44 @@
+/*
+ * sscanf.c
+ *
+ * (C) Copyright 2001 Ullrich von Bassewitz (uz@cc65.org)
+ *
+ */
+
+
+
+#include <stdio.h>
+#include <string.h>
+#include "_scanf.h"
+
+
+
+/*****************************************************************************/
+/*     	    	  		     Code				     */
+/*****************************************************************************/
+
+
+
+int sscanf (const char* str, const char* format, ...)
+/* Standard C function */
+{
+    struct indesc id;
+    va_list ap;
+
+    /* Initialize the indesc struct. We leave all fields uninitialized that we
+     * don't need
+     */
+    id.buf  = (char*) str;	
+    id.fill = strlen (str);
+
+    /* Setup for variable arguments */
+    va_start (ap, format);
+
+    /* Call the internal function. Since we know that va_end won't do anything,
+     * we will save the call and return the value directly.
+     */
+    return _scanf (&id, (const char*) va_fix (ap, 2), ap);
+}
+
+
+