I've installed ubuntu 9.04 in a VM to test it out, and have installed fpc 2.2.4. It is always good to look before you leap, right?<br><br>Anyhow, I am trying to compile an existing project that works fine under Ubuntu 8.04. I can get all of the unit to compile, but when it comes time to link them together into a shared library, I get the following:<br>
<br><span style="font-family: courier new,monospace;">Linking libproj.so</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">Error: Can't call the linker, switching to external linking</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">Fatal: There were 1 errors compiling module, stopping</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">Fatal: Compilation aborted</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">Error: /usr/local/bin/ppc386 returned an error exitcode (normal if you did not specify a source file to be compiled)</span><br style="font-family: courier new,monospace;">
<br>Here is the source code for the sample project:<br><br><span style="font-family: courier new,monospace;">library project1;</span><br style="font-family: courier new,monospace;"><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">uses</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;"> Classes;</span><br style="font-family: courier new,monospace;">
<br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">function dRound(iDec: integer; dRate: double): double;</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">const</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;"> TenToPower: Array[0..9] of integer = (1, 10, 100, 1000, 10000, 100000,</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">                                       1000000, 10000000, 100000000, 1000000000);</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">var</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;"> dInc : double;</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">begin</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;"> if iDec > 0 then begin</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">    dInc := 0.5000001;</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">    result := trunc (dRate * (TenToPower [iDec]) + dInc) /</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">       TenToPower [iDec];</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;"> end else begin</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">    result := dRate;</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;"> end ;</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">end;</span><br style="font-family: courier new,monospace;"><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">function one : double; cdecl;</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">begin</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;"> Result := dRound( 2, 0.529 ) ;</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">end;</span><br style="font-family: courier new,monospace;"><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">begin</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">end.</span><br><br>And the command I use to compile it is:<br><span style="font-family: courier new,monospace;">fpc -Sd -Cg -O3 proj.pas</span><br><br>Anyone else having similar issues?<br>
<br>Alan<br>