paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-14 17:12:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

codetools: use unit uuchar in modeswitch unicodesctrings

Browse Source 
git-svn-id: trunk@44826 -
This commit is contained in:
mattias 2014-04-27 18:15:55 +00:00
parent a2081192d0
commit 06baacaedd
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
components/codetools/linkscanner.pas
View File

@ -2842,9 +2842,10 @@ begin
// ToDo: fpintres // ToDo: fpintres
FHiddenUsedUnits:=FHiddenUsedUnits+',fpextres'; FHiddenUsedUnits:=FHiddenUsedUnits+',fpextres';
end; end;
if (cmsObjpas in CompilerModeSwitches) if (cmsObjpas in CompilerModeSwitches) then
and (PascalCompiler=pcFPC) then
FHiddenUsedUnits:=FHiddenUsedUnits+',ObjPas'; FHiddenUsedUnits:=FHiddenUsedUnits+',ObjPas';
if (cmsDefault_unicodestring in CompilerModeSwitches) then
FHiddenUsedUnits:=FHiddenUsedUnits+',UUChar';
if CompilerMode=cmISO then if CompilerMode=cmISO then
FHiddenUsedUnits:=FHiddenUsedUnits+',iso7185'; FHiddenUsedUnits:=FHiddenUsedUnits+',iso7185';
if cmsObjectiveC1 in CompilerModeSwitches then if cmsObjectiveC1 in CompilerModeSwitches then