+ needs library

git-svn-id: trunk@11011 -

tests/test/tlib1.pp

@@ -1,4 +1,5 @@
 { %opt=-gl }
+{ %needlibrary }
 {$goto on}
 
 { test lineinfo in libraries }
@@ -30,7 +31,7 @@ w:
   GetLineInfo(PtrUInt(@w),s1,s2,l);
   writeln({ 'Func: ',s1,'} 'Source: ',s2,' Line: ',l);
   { GetLineInfo of dwarf doesn't return the function name }
-  if { (s1<>'P') or } (s2<>'tlib1.pp') or (l<>19) then
+  if { (s1<>'P') or } (s2<>'tlib1.pp') or (l<>20) then
     halt(1);
   
   writeln('ok');