From 2ee7a0f95d1d37122767d8b48689e4b72bf9aca7 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Fri, 17 Dec 2010 09:55:55 +0000
Subject: [PATCH]   * corrected expected line numbers after r16573

git-svn-id: trunk@16576 -
---
 tests/test/tlib1b.pp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/test/tlib1b.pp b/tests/test/tlib1b.pp
index 9f96add442..00734b6ff4 100644
--- a/tests/test/tlib1b.pp
+++ b/tests/test/tlib1b.pp
@@ -29,7 +29,7 @@ w:
   s2:=ExtractFilename(s2);
   writeln({ 'Func: ',s1,'} 'Source: ',s2,' Line: ',l);
   { GetLineInfo of dwarf doesn't return the function name }
-  if { (s1<>'P') or } (s2<>'tlib1a.pp') or (l<>9) then
+  if { (s1<>'P') or } (s2<>'tlib1a.pp') or (l<>10) then
     halt(1);
 
   { main program }
@@ -37,7 +37,7 @@ w:
   s2:=ExtractFilename(s2);
   writeln({ 'Func: ',s1,'} 'Source: ',s2,' Line: ',l);
   { GetLineInfo of dwarf doesn't return the function name }
-  if { (s1<>'P') or } (s2<>'tlib1b.pp') or (l<>23) then
+  if { (s1<>'P') or } (s2<>'tlib1b.pp') or (l<>24) then
     halt(1);
 
   writeln('ok');