Path: utzoo!censor!geac!torsqnt!news-server.csri.toronto.edu!cs.utexas.edu!gideon
From: gideon@cs.utexas.edu (Timothy Tin-Wai Chan)
Newsgroups: comp.lang.pascal
Subject: Re: PASCAL TIC TAC TOE program
Summary: Bug (or typo?)
Message-ID: <68@ocelot.cs.utexas.edu>
Date: 22 Nov 90 17:31:02 GMT
References: <1990Nov17.211307.11246@grape.ecs.clarkson.edu> <6490010@hplsla.HP.COM>
Organization: University of Texas at Austin, Computer Science Dept.
Lines: 10

I have spotted a bug (or was it a typo?) in the Tic Tac Toe program.
In the unit "TicTacMv", in the procedure BlockFound, the line

     l := 1;

should be changed to:

     l := count;

-- Tim