primer proyecto con Mikro pascal no compila

[gaston260]

tengo un problema ahora ! mikropascal me dice 1:1 E-0 Linker error: 13: bad bit number el error se produce si saco

while true  do
  Begin *** End;

donde antes era

while true  do
Begin
  while TestBit(PORTA,3) = 1 Do  // pregunto si la pata 2 esta en nivel alto
                                 // si lo esta entonces
  Begin *** End;

la verdad me quede sin preguntas ni respuestas !! no entiendo nada de nada !