===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/builtin/print.c,v
retrieving revision 1.24
retrieving revision 1.26
diff -u -p -r1.24 -r1.26
--- OpenXM_contrib2/asir2000/builtin/print.c	2007/11/22 05:14:48	1.24
+++ OpenXM_contrib2/asir2000/builtin/print.c	2015/03/15 19:31:30	1.26
@@ -45,11 +45,13 @@
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
  *
- * $OpenXM: OpenXM_contrib2/asir2000/builtin/print.c,v 1.23 2007/11/07 19:26:17 ohara Exp $ 
+ * $OpenXM: OpenXM_contrib2/asir2000/builtin/print.c,v 1.25 2011/06/16 08:17:15 noro Exp $ 
 */
 #include "ca.h"
 #include "parse.h"
 
+void Psprintf(NODE,STRING *);
+
 void Pprintf();
 void Pprint();
 void Pquotetolist();
@@ -165,7 +167,7 @@ void fnodetotree(FNODE f,LIST *rp)
 
 	if ( !f ) {
 		MKSTR(head,"internal");
-		n = mknode(2,head,0);
+		n = mknode(2,head,NULLP);
 		MKLIST(*rp,n);
 		return;
 	}