From 24062a03ae684c7290cb85adf7532132feeed3db Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2>
Date: Sun, 24 Jan 2021 02:18:20 +0000
Subject: * return nil in get_caller_addr, get_caller_frame an sptr

git-svn-id: https://svn.freepascal.org/svn/fpc/branches/wasm@48374 3ad0048d-3df7-0310-abae-a5850022a9f2
---
 rtl/wasm32/wasm32.inc | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'rtl/wasm32')

diff --git a/rtl/wasm32/wasm32.inc b/rtl/wasm32/wasm32.inc
index cbf382c242..0fe7785113 100644
--- a/rtl/wasm32/wasm32.inc
+++ b/rtl/wasm32/wasm32.inc
@@ -23,18 +23,21 @@ procedure fpc_cpuinit;
 {$define FPC_SYSTEM_HAS_GET_CALLER_ADDR}
 function get_caller_addr(framebp:pointer;addr:pointer=nil):pointer;
   begin
+    result:=nil;
   end;
 
 
 {$define FPC_SYSTEM_HAS_GET_CALLER_FRAME}
 function get_caller_frame(framebp:pointer;addr:pointer=nil):pointer;
   begin
+    result:=nil;
   end;
 
 
 {$define FPC_SYSTEM_HAS_SPTR}
 function Sptr : pointer;
   begin
+    result:=nil;
   end;
 
 
-- 
cgit v1.2.1