소스 검색

* DebugWrite and DebugWriteLn moved to the implementation part of the system
unit. No need to expose them anymore, as the regular Write/WriteLn have been
quite stable on i8086-msdos for a long time now.

git-svn-id: trunk@27143 -

nickysn 11 년 전
부모
커밋
2425eb243a
1개의 변경된 파일3개의 추가작업 그리고 3개의 파일을 삭제
  1. 3 3
      rtl/msdos/system.pp

+ 3 - 3
rtl/msdos/system.pp

@@ -74,11 +74,11 @@ const
   LFNSupport = false;
 {$endif RTLLITE}
 
-procedure DebugWrite(const S: string);
-procedure DebugWriteLn(const S: string);
-
 implementation
 
+procedure DebugWrite(const S: string); forward;
+procedure DebugWriteLn(const S: string); forward;
+
 const
   fCarry = 1;