소스 검색

Call rtl_do_close handler in sysfile.do_close, as reported by Kostas Michalopoulos

ccrause 2 년 전
부모
커밋
5930ffa135
2개의 변경된 파일4개의 추가작업 그리고 0개의 파일을 삭제
  1. 2 0
      rtl/embedded/sysfile.inc
  2. 2 0
      rtl/freertos/sysfile.inc

+ 2 - 0
rtl/embedded/sysfile.inc

@@ -24,6 +24,8 @@
 { close a file from the handle value }
 procedure do_close(handle : longint);
 begin
+  if assigned (@rtl_do_close) then
+    rtl_do_close(handle);
 end;
 
 

+ 2 - 0
rtl/freertos/sysfile.inc

@@ -24,6 +24,8 @@
 { close a file from the handle value }
 procedure do_close(handle : longint);
 begin
+  if assigned (@rtl_do_close) then
+    rtl_do_close(handle);
 end;