no message

ase/awk/sa.c

@@ -1,5 +1,5 @@
 /*
- * $Id: sa.c,v 1.6 2006-01-20 16:52:25 bacon Exp $
+ * $Id: sa.c,v 1.7 2006-01-20 17:00:36 bacon Exp $
  */
 
 #include <xp/awk/sa.h>
@@ -37,9 +37,9 @@ int xp_vprintf (const xp_char_t* fmt, xp_va_list ap)
 	if (nf == XP_NULL) return -1;
 
 #ifdef XP_CHAR_IS_MCHAR
-	n = vprintf (stream, nf, ap);
+	n = vprintf (nf, ap);
 #else
-	n =  vwprintf (stream, nf, ap);
+	n =  vwprintf (nf, ap);
 #endif
 
 	xp_free (nf);
@@ -105,7 +105,6 @@ void xp_str_close (xp_str_t* str)
 
 void xp_str_forfeit (xp_str_t* str)
 {
-	xp_free (str->buf);
 	if (str->__dynamic) xp_free (str);
 }
 

ase/awk/sa.h

@@ -1,5 +1,5 @@
 /*
- * $Id: sa.h,v 1.5 2006-01-20 16:31:58 bacon Exp $
+ * $Id: sa.h,v 1.6 2006-01-20 17:00:36 bacon Exp $
  */
 
 #ifndef _XP_AWK_SA_H_
@@ -24,6 +24,8 @@
 #define xp_isalpha iswalpha
 #define xp_isalnum iswalnum
 #define xp_isspace iswspace
+#define xp_toupper toupper
+#define xp_tolower tolower
 
 #define xp_strcpy wcscpy
 #define xp_strcmp wcscmp

ase/awk/vmsmake.com

@@ -1,16 +1,14 @@
-
 $ write sys$output "cc/define=__STAND_ALONE awk.c"
 $ cc/define=__STAND_ALONE awk.c
-
+$
 $ write sys$output "cc/define=__STAND_ALONE parse.c"
 $ cc/define=__STAND_ALONE parse.c
-
+$
 $ write sys$output "cc/define=__STAND_ALONE tree.c"
 $ cc/define=__STAND_ALONE tree.c
-
+$
 $ write sys$output "cc/define=__STAND_ALONE sa.c"
 $ cc/define=__STAND_ALONE sa.c
-
-
+$
 $ write sys$output "lib/create xpawk awk,parse,tree,sa"
 $ lib/create xpawk awk,parse,tree,sa

ase/test/awk/vmsmake.com

@@ -1,6 +1,6 @@
 
 $ write sys$output "cc/define=__STAND_ALONE awk.c"
 $ cc/define=__STAND_ALONE awk.c
-
+$
 $ write sys$output "link awk.obj,[-.-.awk]xpawk/library"
 $ link awk.obj,[-.-.awk]xpawk/library