From 3ce357b7234d22a638dd1519bfe15dc2e281beed Mon Sep 17 00:00:00 2001
From: kristerw <kristerw@pkgsrc.org>
Date: Thu, 8 Apr 2004 15:47:49 +0000
Subject: Fix LP64 issues with a patch from Richard Rauch in PR 24757.

Bump PKGREVISION.
---
 lang/tinyscheme/Makefile         |  3 ++-
 lang/tinyscheme/distinfo         |  4 ++--
 lang/tinyscheme/patches/patch-ab | 42 +++++++++++++++++++++++++++++++++++++---
 3 files changed, 43 insertions(+), 6 deletions(-)

diff --git a/lang/tinyscheme/Makefile b/lang/tinyscheme/Makefile
index 3e03aace6c4..e157df758e8 100644
--- a/lang/tinyscheme/Makefile
+++ b/lang/tinyscheme/Makefile
@@ -1,6 +1,7 @@
-# $NetBSD: Makefile,v 1.4 2003/07/17 21:45:32 grant Exp $
+# $NetBSD: Makefile,v 1.5 2004/04/08 15:47:49 kristerw Exp $
 
 DISTNAME=	tinyscheme-1.33
+PKGREVISION=	1
 CATEGORIES=	lang
 MASTER_SITES=	http://tinyscheme.sourceforge.net/
 
diff --git a/lang/tinyscheme/distinfo b/lang/tinyscheme/distinfo
index daa0b053547..3c1c824ca76 100644
--- a/lang/tinyscheme/distinfo
+++ b/lang/tinyscheme/distinfo
@@ -1,6 +1,6 @@
-$NetBSD: distinfo,v 1.3 2003/06/29 23:55:01 jtb Exp $
+$NetBSD: distinfo,v 1.4 2004/04/08 15:47:49 kristerw Exp $
 
 SHA1 (tinyscheme-1.33.tar.gz) = c596b428487c001d31f812137673a2683b352fae
 Size (tinyscheme-1.33.tar.gz) = 52733 bytes
 SHA1 (patch-aa) = d5e9006396c3d894f78a56a49b0d67bf18a1b6f2
-SHA1 (patch-ab) = b8577bc0659b88561bd8fe488e531ba7c69656b4
+SHA1 (patch-ab) = 4c0a07947323410c26760128ba86cac99a662549
diff --git a/lang/tinyscheme/patches/patch-ab b/lang/tinyscheme/patches/patch-ab
index 5cbcf119a30..e729a174471 100644
--- a/lang/tinyscheme/patches/patch-ab
+++ b/lang/tinyscheme/patches/patch-ab
@@ -1,7 +1,7 @@
-$NetBSD: patch-ab,v 1.1.1.1 2002/10/28 09:04:02 agc Exp $
+$NetBSD: patch-ab,v 1.2 2004/04/08 15:47:49 kristerw Exp $
 
---- scheme.c	2002/10/24 11:01:22	1.1
-+++ scheme.c	2002/10/24 11:03:17
+--- scheme.c.orig	2003-01-07 20:40:51.000000000 +0100
++++ scheme.c	2004-04-08 17:40:03.000000000 +0200
 @@ -91,8 +91,16 @@
  # define prompt "> "
  #endif
@@ -20,3 +20,39 @@ $NetBSD: patch-ab,v 1.1.1.1 2002/10/28 09:04:02 agc Exp $
  #endif
  
  #ifndef FIRST_CELLSEGS
+@@ -569,7 +577,7 @@
+ 	  i = ++sc->last_cell_seg ;
+ 	  sc->alloc_seg[i] = cp;
+ 	  /* adjust in TYPE_BITS-bit boundary */
+-	  if(((int)cp)%adj!=0) {
++	  if(((long)cp)%adj!=0) {
+ 	    cp=(char*)(adj*((long)cp/adj+1));
+ 	  }
+         /* insert new segment in address order */
+@@ -2055,7 +2063,7 @@
+ 
+ static void s_save(scheme *sc, enum scheme_opcodes op, pointer args, pointer code) 
+ { 
+-  int nframes = (int)sc->dump; 
++  long nframes = (long)sc->dump; 
+   struct dump_stack_frame *next_frame; 
+ 
+   /* enough room for the next frame? */ 
+@@ -2075,7 +2083,7 @@
+ 
+ static pointer _s_return(scheme *sc, pointer a) 
+ { 
+-  int nframes = (int)sc->dump; 
++  long nframes = (long)sc->dump; 
+   struct dump_stack_frame *frame; 
+ 
+   sc->value = (a); 
+@@ -2115,7 +2123,7 @@
+ 
+ static INLINE void dump_stack_mark(scheme *sc) 
+ { 
+-  int nframes = (int)sc->dump;
++  long nframes = (long)sc->dump;
+   int i;
+   for(i=0; i<nframes; i++) {
+     struct dump_stack_frame *frame;
-- 
cgit v1.2.3