"strcoll" may not exist in ond ansi machines

1 files changed, 6 insertions, 1 deletions

diff --git a/lvm.c b/lvm.c
index 3140b4e4..0119bd12 100644
--- a/lvm.c
+++ b/lvm.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lvm.c,v 1.21 1997/12/30 19:08:23 roberto Exp roberto $
+** $Id: lvm.c,v 1.22 1998/01/12 13:35:37 roberto Exp roberto $
 ** Lua virtual machine
 ** See Copyright Notice in lua.h
 */
@@ -22,6 +22,11 @@
 #include "lvm.h"
 
 
+#ifdef OLD_ANSI
+#define strcoll(a,b)    strcmp(a,b)
+#endif
+
+
 #define skip_word(pc)   (pc+=2)
 #define get_word(pc)    (*(pc)+(*((pc)+1)<<8))
 #define next_word(pc)   (pc+=2, get_word(pc-2))