Newsgroups: comp.sys.acorn
Path: mindvox!netsys!agate!doc.ic.ac.uk!pipex!sunic!uts!imada!jho
From: jho@imada.ou.dk (Jens H. Ovesen)
Subject: Bug in Pinboard+, fix.
Message-ID: <1993Aug15.214016.27406@imada.ou.dk>
Sender: news@imada.ou.dk (USENET News System)
Nntp-Posting-Host: wagner
Organization: Dept. of Math. & Computer Science, Odense University, Denmark
Distribution: comp
Date: Sun, 15 Aug 1993 21:40:16 GMT
Lines: 37

  A bug has emerged in Pinboard+. It's easily fixed and doesn't show itself
very often, so Thomas and I agreed on not posting a new version. Instead the
fix is presented here in the form of a (short) BASIC program.

Set dir to ...!Pinboard
Make sure you've run !MakePin+.
Run the following program. If you make any mistake, you may have to run 
!MakePin+ again.

The BASIC program:

-------------cut cut cut-------------------

size%=18804
DIM code% size%+8
OSCLI"Load Pinboard+ "+STR$~code%
FOR i%=1 TO 3
  READ a%:P%=code%+a%:[opt 2:bvs code%+size%:]
NEXT
DATA &296c,&2980,&2994
P%=code%+size%
[opt 2:add r13,r13,#4:ldmfd r13!,{r1-7,pc}:]
OSCLI"Save Pinboard+ "+STR$~code%+" +"+STR$~(size%+8)
*settype pinboard+ module

---------------cut cut cut------------------

Rgds.
---
Jens H. Ovesen / jho@imada.ou.dk
Tolderlundsvej 27, 4.tv.
DK-5000 Odense C, Denmark
Phone: +45 65 91 75 11