paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-03 06:18:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

* two comment spelling fixes. Mantis #34092 & #34097

Browse Source 
git-svn-id: trunk@39593 -
This commit is contained in:
marco 2018-08-08 08:39:20 +00:00
parent 6603bf149a
commit dd52e79089
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/pmodules.pas
View File

@ -665,8 +665,7 @@ implementation
inc(ps.refs);
st.insert(ps);
pd:=tprocdef(cnodeutils.create_main_procdef(target_info.cprefix+name,potype,ps));
{ We don't need is a local symtable. Change it into the static
symtable }
{ We don't need a local symtable, change it into the static symtable }
if not (potype in [potype_mainstub,potype_pkgstub]) then
begin
pd.localst.free;
@ -2441,7 +2440,7 @@ type
{ add all directly used packages as libraries }
add_package_libs(linker);
{ finally we can create a executable }
{ finally we can create an executable }
if current_module.islibrary then
linker.MakeSharedLibrary
else