summaryrefslogtreecommitdiff
path: root/compiler/cresstr.pas
diff options
context:
space:
mode:
authornickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2>2013-08-18 21:18:22 +0000
committernickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2>2013-08-18 21:18:22 +0000
commit5af6eef907118e5560de99174a7ca19843735827 (patch)
treeb76fa5b33f4b8c1e4affd6ea2bd088530e5bd0f6 /compiler/cresstr.pas
parentcb50ca3c1f8a68d185769f4e90bf7ca8bb924326 (diff)
downloadfpc-5af6eef907118e5560de99174a7ca19843735827.tar.gz
* i8086 medium model fixes in Tresourcestrings.CreateResourceStringData
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@25292 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/cresstr.pas')
-rw-r--r--compiler/cresstr.pas4
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/cresstr.pas b/compiler/cresstr.pas
index a0a08172e0..3daa04a2ea 100644
--- a/compiler/cresstr.pas
+++ b/compiler/cresstr.pas
@@ -152,8 +152,8 @@ uses
{ Write unitname entry }
namelab:=emit_ansistring_const(current_asmdata.asmlists[al_const],@current_module.localsymtable.name^[1],length(current_module.localsymtable.name^),getansistringcodepage,False);
current_asmdata.asmlists[al_resourcestrings].concat(tai_const.Create_sym_offset(namelab.lab,namelab.ofs));
- current_asmdata.asmlists[al_resourcestrings].concat(tai_const.create_sym(nil));
- current_asmdata.asmlists[al_resourcestrings].concat(tai_const.create_sym(nil));
+ current_asmdata.asmlists[al_resourcestrings].concat(tai_const.create_nil_dataptr);
+ current_asmdata.asmlists[al_resourcestrings].concat(tai_const.create_nil_dataptr);
current_asmdata.asmlists[al_resourcestrings].concat(tai_const.create_32bit(0));
{$ifdef cpu64bitaddr}
current_asmdata.asmlists[al_resourcestrings].concat(tai_const.create_32bit(0));