diff --git a/harbour/tests/working/transfrm.prg b/harbour/tests/working/transfrm.prg
index d08fd27c71..d56ae3f474 100644
--- a/harbour/tests/working/transfrm.prg
+++ b/harbour/tests/working/transfrm.prg
@@ -92,7 +92,8 @@ function Main()
    QOut( "1234       ", "@BD 9999    ", transform( 1234      , "@BD 9999" ), "  (BUG Fix)" )
    QOut( "0          ", "@Z 9999     ", transform( 0         , "@Z 9999"  ) )
    QOut( "0          ", "@BZ 9999    ", transform( 0         , "@BZ 9999" ) )
-   QOut( "NIL        ", "9           ", transform( NIL       , "9"        ) )
+//   QOut( "NIL        ", "9           ", transform( NIL       , "9"        ) )
+//   ^ Generates error ^
    Pause()
    QOut( "12/12/1990 ", "99/99/9999  ", transform( ctod("12/12/1990") , "99/99/9999"  ) )
    QOut( "02/12/1990 ", "99.99.9999  ", transform( ctod("02/12/1990") , "99.99.9999"  ) )