[fpc-devel] Adding a new assembler to Free Pascal Compiler
Skybuck Flying
skybuck2000 at hotmail.com
Tue Apr 5 07:21:45 CEST 2011
Answering my own question ;)
I guess the answer to my question is more or less the same as the following
question:
"How to add a new target to free pascal compiler".
And I found this webpage which explains it a bit:
http://wiki.freepascal.org/Porting_Free_Pascal#Adding_a_new_target
I'll quote webpage here in case it ever goes lost ;)
"
Bellow is a example of how a new target is added. This Patch was responsible
for adding SymbianOS target to the compiler. Be careful that this adds a
i386-symbian target. If your target is for another architecture of course
you should change the files on the directories for your particular
architecture.
Index: compiler/compiler.pas
===================================================================
--- compiler/compiler.pas (revision 6039)
+++ compiler/compiler.pas (working copy)
@@ -107,6 +107,9 @@
{$ifdef win32}
,i_win
{$endif win32}
+{$ifdef symbian}
+ ,i_symbian
+{$endif symbian}
;
function Compile(const cmd:string):longint;
Index: compiler/i386/cputarg.pas
===================================================================
--- compiler/i386/cputarg.pas (revision 6039)
+++ compiler/i386/cputarg.pas (working copy)
@@ -71,6 +71,9 @@
{$ifndef NOTARGETWATCOM}
,t_watcom
{$endif}
+ {$ifndef NOTARGETSYMBIAN}
+ ,t_symbian
+ {$endif}
{**************************************
Assemblers
Index: compiler/systems.pas
===================================================================
--- compiler/systems.pas (revision 6039)
+++ compiler/systems.pas (working copy)
@@ -136,7 +136,9 @@
system_x86_64_embedded, { 55 }
system_mips_embedded, { 56 }
system_arm_embedded, { 57 }
- system_powerpc64_embedded { 58 }
+ system_powerpc64_embedded, { 58 }
+ system_i386_symbian, { 59 }
+ system_arm_symbian { 60 }
);
tasm = (as_none
Index: rtl/Makefile.fpc
===================================================================
--- rtl/Makefile.fpc (revision 6038)
+++ rtl/Makefile.fpc (working copy)
@@ -28,6 +28,7 @@
dirs_solaris=solaris
dirs_gba=gba
dirs_nds=nds
+dirs_symbian=symbian
[install]
fpcpackage=y
Index: utils/fpcm/fpcmake.ini
===================================================================
--- utils/fpcm/fpcmake.ini (revision 6038)
+++ utils/fpcm/fpcmake.ini (working copy)
@@ -908,6 +908,12 @@
SHORTSUFFIX=gba
endif
+# Symbian OS
+ifeq ($(OS_TARGET),symbian)
+SHAREDLIBEXT=.dll
+SHORTSUFFIX=symbian
+endif
+
else
# long version for 1.0.x - target specific extensions
Index: utils/fpcm/fpcmmain.pp
===================================================================
--- utils/fpcm/fpcmmain.pp (revision 6038)
+++ utils/fpcm/fpcmmain.pp (working copy)
@@ -70,7 +70,7 @@
o_linux,o_go32v2,o_win32,o_os2,o_freebsd,o_beos,o_netbsd,
o_amiga,o_atari, o_solaris, o_qnx, o_netware, o_openbsd,o_wdosx,
o_palmos,o_macos,o_darwin,o_emx,o_watcom,o_morphos,o_netwlibc,
- o_win64,o_wince,o_gba,o_nds,o_embedded
+ o_win64,o_wince,o_gba,o_nds,o_embedded,o_symbian
);
TTargetSet=array[tcpu,tos] of boolean;
@@ -88,14 +88,14 @@
'linux','go32v2','win32','os2','freebsd','beos','netbsd',
'amiga','atari','solaris', 'qnx', 'netware','openbsd','wdosx',
'palmos','macos','darwin','emx','watcom','morphos','netwlibc',
- 'win64','wince','gba','nds','embedded'
+ 'win64','wince','gba','nds','embedded','symbian'
);
OSSuffix : array[TOS] of string=(
'_linux','_go32v2','_win32','_os2','_freebsd','_beos','_netbsd',
'_amiga','_atari','_solaris', '_qnx',
'_netware','_openbsd','_wdosx',
'_palmos','_macos','_darwin','_emx','_watcom','_morphos','_netwlibc',
- '_win64','_wince','_gba','_nds','_embedded'
+ '_win64','_wince','_gba','_nds','_embedded','_symbian'
);
{ This table is kept OS,Cpu because it is easier to maintain (PFV) }
@@ -126,7 +126,8 @@
{ wince }( true, false, false, false, false, true, false),
{ gba } ( false, false, false, false, false, true, false),
{ nds } ( false, false, false, false, false, true, false),
- { embedded }( true, true, true, true, true, true, true)
+ { embedded }( true, true, true, true, true, true, true),
+ { symbian } ( true, false, false, false, false, true, false)
);
type
You will also need to add a i_target.pas and t_target.pas files to the
compiler directory. Just copy an existing file for a similar platform and
start working from there.
If you want your target to use an internal linker (ELF, COFF, etc.) you need
to add your target to that one, too. For the target i386-nativent the
following change was done in the COFF output generator:
Index: compiler/ogcoff.pas
===================================================================
--- compiler/ogcoff.pas (Revision 14564)
+++ compiler/ogcoff.pas (Revision 14565)
@@ -2906,7 +2918,7 @@
idtxt : 'PECOFF';
asmbin : '';
asmcmd : '';
- supported_targets : [system_i386_win32];
+ supported_targets : [system_i386_win32,system_i386_nativent];
flags : [af_outputbinary,af_smartlink_sections];
labelprefix : '.L';
comment : '';
You might also need to add your target to one of the assemblers for the
target platform. E. g. if you're targeting an i386 system you might add your
target like the following (the line breaks annotated with {cr} were added to
keep the layout of the article intact):
Index: compiler/x86/agx86att.pas
===================================================================
--- compiler/x86/agx86att.pas (Revision 15151)
+++ compiler/x86/agx86att.pas (Arbeitskopie)
@@ -380,7 +380,8 @@
asmcmd : '--32 -o $OBJ $ASM';
supported_targets :
[system_i386_GO32V2,system_i386_linux,system_i386_Win32,{cr}
system_i386_freebsd,system_i386_solaris,system_i386_beos,
system_i386_netbsd,system_i386_Netware,system_i386_qnx,
system_i386_wdosx,system_i386_openbsd,{cr}
-
system_i386_netwlibc,system_i386_wince,system_i386_embedded,{cr}
system_i386_symbian,system_i386_haiku,system_x86_6432_linux];
+
system_i386_netwlibc,system_i386_wince,system_i386_embedded,{cr}
system_i386_symbian,system_i386_haiku,system_x86_6432_linux,
+ system_i386_nativent];
flags :
[af_allowdirect,af_needar,af_smartlink_sections,af_supports_dwarf];
labelprefix : '.L';
comment : '# ';
Note: In this case the change is only needed to get the "-al" option of the
compiler, which needs the GNU assembler on Windows, working for
i386-nativent.
[edit] Compiling your target
Now that you have a target you will want to see if it works and spot
compilation problems by compiling the compiler. To do this, open a console,
navigate to your fpc subversion source code directory and build the
compiler:
PATH=C:\Path_latest_fpc_stable
cd compiler
make arm
And to build your RTL:
cd rtl\my_new_os
make FPC=c:\fpc_subversion\compiler\ppcarm -XP$FPCTARGET-
While trying to fix (or implement) RTL for your new target, information
found in System unit structure may be useful.
[edit] Porting to a new Architecture
[edit] Step 1 - The Binutils
The first step in porting to a new architecture is getting and understanding
how the binutils of the platform work.
[edit] Step 2 - Code Skeleton
You can start porting Free Pascal to a new Architecture by creating a new
Lazarus project and a new skeleton for it. You can get the Lazarus project
for ARM for example, rename it, lets say to ppcmipsel.lpi, modify it in a
text editor to refer to mips directory instead of arm and then modify it in
Lazarus in the Compiler Options Dialog in the Others tab and set the
compiler directive to -dmipsel instead of -darm.
"
This is probably enough information for me for now to go on ;)
Bye,
Skybuck.
More information about the fpc-devel
mailing list