From fa3822dda9fdaae4b6e7fb82aca9ed0e4212cfb5 Mon Sep 17 00:00:00 2001
From: Martin Stjernholm <mast@lysator.liu.se>
Date: Fri, 28 Mar 2008 23:08:45 +0100
Subject: [PATCH] Fixed an invalid integer subtype.

Rev: src/module_support.c:1.69
---
 src/module_support.c | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/module_support.c b/src/module_support.c
index 1d6ad222dd..1347413e97 100644
--- a/src/module_support.c
+++ b/src/module_support.c
@@ -2,7 +2,7 @@
 || This file is part of Pike. For copyright information see COPYRIGHT.
 || Pike is distributed under GPL, LGPL and MPL. See the file COPYING
 || for more information.
-|| $Id: module_support.c,v 1.68 2007/12/24 15:43:10 grubba Exp $
+|| $Id: module_support.c,v 1.69 2008/03/28 22:08:45 mast Exp $
 */
 
 #include "global.h"
@@ -555,7 +555,7 @@ PMOD_EXPORT void pike_module_export_symbol(const char *name,
   if(!exported_symbols) exported_symbols=allocate_mapping(10);
   s.u.ptr=ptr;
   s.type=T_INT;
-  s.subtype=4711;
+  s.subtype=NUMBER_NUMBER;
   mapping_string_insert(exported_symbols, str, &s);
   free_string(str);
 }
@@ -573,7 +573,7 @@ PMOD_EXPORT void *pike_module_import_symbol(const char *name,
     if(s)
     {
 #ifdef PIKE_DEBUG
-      if (s->type != T_INT || s->subtype != 4711)
+      if (s->type != T_INT || s->subtype != NUMBER_NUMBER)
 	Pike_fatal("Unexpected value in exported_symbols.\n");
 #endif
       free_string(str);
@@ -593,7 +593,7 @@ PMOD_EXPORT void *pike_module_import_symbol(const char *name,
     if(s)
     {
 #ifdef PIKE_DEBUG
-      if (s->type != T_INT || s->subtype != 4711)
+      if (s->type != T_INT || s->subtype != NUMBER_NUMBER)
 	Pike_fatal("Unexpected value in exported_symbols.\n");
 #endif
       free_string(str);
-- 
GitLab