Re: [fpc-pascal] looking for binary of 2.2.0

. Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman

Re: [fpc-pascal] looking for binary of 2.2.0

Done Carsten On 16 Feb 2012, at 11:28, Carsten Bager wrote: If you use this link you can get the fpc-2.2.0.i386-linux.tar file http://freepascal.dk/files/fpc-2.2.0.i386-linux.tar That file should be taken offline, for the reason explained in my other mail. Jonas

Re: [fpc-pascal] mobile application

HI I use this unit together with Lazarus/FPC. I write and test my programs on a normal PC, and then recompile to WinCE. http://www.cilico.us/product/handheld-pda.html Carsten Hi All, I need to identify a reliable portable device that I can program in FPC-Pascal. This device could

Re: [fpc-pascal] mobile application

On my Nokia phone I use http://sourceforge.net/projects/midletpascal/ Carsten Hi, If your devices are Embedded Linux/ARM or WinCE, you can use fpGUI Toolkit. If you use Nokia, Android, Win7, then you need to look at other solutions. Regards, - Graeme - -- fpGUI Toolkit - a

Re: [fpc-pascal] mobile application

HI I use this unit together with Lazarus/FPC. I write and test my programs on a normal PC, and then recompile to WinCE. http://www.cilico.us/product/handheld-pda.html Carsten Hi All, I need to identify a reliable portable device that I can program in FPC-Pascal. This device could

Re: [fpc-pascal] mobile application

HI I use this unit together with Lazarus/FPC. I write and test my programs on a normal PC, and then recompile to WinCE. http://www.cilico.us/product/handheld-pda.html Carsten Hi All, I need to identify a reliable portable device that I can program in FPC-Pascal. This device could

Re: [fpc-pascal] mobile application

HI I use this unit together with Lazarus/FPC. I write and test my programs on a normal PC, and then recompile to WinCE. www.cilico.us/product/handheld-pda.html Carsten Hi All, I need to identify a reliable portable device that I can program in FPC-Pascal. This device could be a

Re: [fpc-pascal] ARM crosscompiler again

\i386-win32;c:\pp\bin\Arm make clean all OS_TARGET=linux CPU_TARGET=arm BINUTILSPREFIX=arm-linux- This works fine with the 222 and 223 version Regards Carsten Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk

[fpc-pascal] Command prompt

In the old days you could write exec(C:\DOS\COMMAND.COM',' COM1'); and then get access to the command prompt via a serial interface Could someone give me a hint how to do this in a Linux environment? Carsten ___ fpc-pascal maillist -

[fpc-pascal] Sockets

If I create a TCP socket with fpSocket(AF_INET,SOCK_STREAM,PF_UNSPEC); fpBind(lSock, @sAddr, sizeof(sAddr))0 then fpListen(lSock, cMaxConn)0 thenand And waits for connections with fpAccept(lSock, @nSockAddr, @nLen); and when a connection comes in I wait for a new one (in a new thread) with

Re: [fpc-pascal] fpc and serial port

,Sio_bufSize); End; Procedure SioListen_typ.SendCh(c:char); Begin serial.SerWrite(sio,c,1); End; Begin Writeln('Unit (',{$I %FILE%}:21,') Unit Version:',cUnitVersion,' compiled at ',{$I %TIME%},' US date:',{$I %DATE%},' By ',{$I %USER%},' Fpc: ',{$I %FPCVERSION%}); End. Med venlig hilsen Carsten

[fpc-pascal] Setlength

I have 2 lines of code 1 I allocate memory 2 I read from the screen (Nano-X) and save it in the BitMapArray. Can I do this or can I not be sure that the memory is in one block. setlength(BitMapArray,Width*Height); GrReadArea(TNxWindow(window).w,Left,Top,Width,Height,@BitMapArray[0]); Carsten

[fpc-pascal] Compiler 240

I have a problem with the new 240 compiler. I get errors when calling functions in the sysutils unit. I have tested the 251 compiler, and it was exactly the same. I am normally using the 224 compiler, and it works fine. Anybody have a hint. Carsten Example: program hw1; uses sysutils;

Re: [fpc-pascal] CGI application

How do i get command line vars? i tried GetENV() but it didn't understand GetEnv() (which unit is it in?) Here is a small cgi program. Comments are in Danish but I hope you can get the meaning. Carsten {Program version 1.00} program listdir2html; {LONGSTRINGS OFF} {$INFO

[fpc-pascal] Lo

Hi Is there a reason why the lo function returns the lo word from a longint in FPC and not the lo byte as in Delphi. Regards Carsten -- Delphi 5 Doc -- function Lo(X): Byte; Description Lo returns the low-order Byte of the argument X as an unsigned value.

Re: [fpc-pascal] Re: Lo

Well, you should probably mention that this replacement solution is not portable to big endian platforms / targets. Tomas If one want to write portable code, what would be best, or would both work on a big endian platform. Carsten var b:byte; i:LongInt; b := i and 255; b:= i mod

[fpc-pascal] DateTimeToFileDate

If I do this on a Linux machine (Free Pascal Compiler version 2.4.2 [2010/11/08] for i386) WriteLn(DateTimeToFileDate(Now)); WriteLn(trunc((now-EncodeDate(1970,1,1))*86400)); I get this 1305786833 1305794033 There is a difference of 7200= 2 hours. Is this correct? I would not expect a

[fpc-pascal] Record size

I have a data record (sVar_typ) compiled with the 2.2.5 arm compiler. It has the size of 32728 byte. Now I try to compile with the 2.4.5 arm compiler it has the size of 32736 byte. I write the addresses of the variables in the record, they have not changed. It looks like the compiler just adds

[fpc-pascal] Windows test program

Hi I have this test program. It compiles and runs (shows) under Delphi (5.0). I can compile (and run it) it under FPC (2.4.4) but it does not show anything. I can see it in the Windows Job list - Processes but not under Programmes. Anybody have a hint. Regards Carsten

RE : [fpc-pascal] Windows test program

); and the window will display; Ludo -Message d'origine- De : fpc-pascal-boun...@lists.freepascal.org [mailto:fpc-pascal-boun...@lists.freepascal.org] De la part de Carsten Bager Envoyé : jeudi 23 juin 2011 17:36 À : FPC-Pascal users discussions Objet : [fpc-pascal] Windows

RE : [fpc-pascal] Windows test program

-pascal-boun...@lists.freepascal.org [mailto:fpc-pascal-boun...@lists.freepascal.org] De la part de Carsten Bager Envoyé : vendredi 24 juin 2011 08:53 À : FPC-Pascal users discussions Objet : RE : [fpc-pascal] Windows test program Thanks for the help. I tried the winhello.pp. It works

[fpc-pascal] Threads

I have written a small program that uses threads. It works on a 386 Linux, but I have some problems on the Arm Linux platform. The program routes a TCP connection to a serial port and if the TCP is not in use it can route UDP packets to the serial port return answers. The sockets.Recv returns

Re: [fpc-pascal] Re: Threads

- [EMAIL PROTECTED] mailto:fpc-pascal- [EMAIL PROTECTED] Op Tue, 12 Dec 2006, schreef Carsten Bager: The fpc program looks after the c lib loader. a command like this takes care of that ln -sf /lib/ld-uClibc-0.9.27.so /lib/ld-linux.so.2 Now the program uses the ulibc loader

[fpc-pascal] 2.1 version

Where can I read what's new in the coming 2.1 version. Carsten Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk ___ fpc-pascal maillist - fpc-pascal

[fpc-pascal] 2.X version

for the ELF platform. Do you think that this would conflict with using the compiler for embedded programming? (Arm 7). Carsten Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk

[fpc-pascal] Popen

I am trying to use the Popen function in Read mode. I first tried the example (---Write---) from the manual (see beneath). The POpen gives an error 25 (Not a typewriter) but it looks like it works. I try to do almost the same (---Read---)to read the output, but I cannot get this to read

Re: [fpc-pascal] Popen

not indicate this, (The code is a direct copy from the manual). I have corrected it, but it did not change anything. Carsten Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk

[fpc-pascal] FPU on ARM

200308251 led.pas(115,6) Fatal: Compilation aborted Is there a way around this problem? Regards Carsten Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk ___ fpc-pascal

[fpc-pascal] LongWord

word32test Assembling with smartlinking word32test /Fpc/ArmBin/ar: creating libpword32test.a Linking word32test 19 Lines compiled, 0.5 sec Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk

Re: [fpc-pascal] LongWord

- ./word32testFpc/Pas/Linux/Test/Word32 # a=10 b=5 Resultat : 5 Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk ___ fpc-pascal maillist - fpc

[fpc-pascal] Re:LongWord

10 - 5 = 5 This is a different issue; 10-5 should not overflow regardless of the type that is used for the calculation. Daniël I tried to compile and run with the 2.1.3 compiler (arm and i386) Both executables did run without runtime errors but the compilers gave a warning. The same program

[fpc-pascal] Threads and runtime errors

In the small threads program below I force a runtime error in a thread. How do I get access to the output from the thread when it stops? This program does not write anything to the terminal when the thread stops. Carsten --- program

[fpc-pascal] Stack overflow error

; c := Sptr - (stack_size + STACK_MARGIN); if (c = StackBottom) then begin StackError:=true; HandleErrorFrame(202,get_frame); end; end; Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk

[fpc-pascal] Warning: gc-sections option ignored

I get this warning when compiling a project. It compiles fine with the 213 compiler Could this be a problem with the new compiler? Carsten Free Pascal Compiler version 2.1.4 [2007/06/08] for arm Copyright (c) 1993-2007 by Florian Klaempfl Target OS: Linux for ARM /Fpc/ArmBin/ld: Warning:

Re: [fpc-pascal] Warning: gc-sections option ignored

On 31 Jul 2007, at 14:13, Carsten Bager wrote: I get this warning when compiling a project. It compiles fine with the 213 compiler Could this be a problem with the new compiler? You probably simply need a newer version of ld. I am using the one that came with the 214 arm compiler

[fpc-pascal] cprt0

In the cprt0.as file (used when linking with libc in Arm/Linux) line 74 says /* load argv mov a3, sp I think it should be /* load argv */ mov a3, sp Now the mov a3, sp instruction is included. Maybe this parameter is only used when starting C programs, but

[fpc-pascal] Compiler 2.20 for Arm

I have tested the 2.20 compiler for Arm. It looks good, a problem I had with threads has disappeared, but (there is always a but) now I have another problem. The bindery file is huge (Normally 160KB now 950KB. I presume that smart linking dos not work). I also get this warning form the linker

Re: [fpc-pascal] Compiler 2.20 for Arm

Install a newer version of ld which does support the --gc-sections flag. Do you know where to find a newer version of the linker (binutils for arm linux) Regards Carsten Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434

Re: [fpc-pascal] Compiler 2.20 for Arm

Install a newer version of ld which does support the --gc-sections flag. I found a Debian tool chain (http://www.emdebian.org/ -- binutils-arm-linux-gnu_2.18- 1_i386.deb). It works ok, but the linker gives some warnings /Fpc/ArmBin/ld: skipping incompatible /usr/lib/libgcc_s.so when

Re: [fpc-pascal] Compiler 2.20 for Arm

Try to build with -s and examine/post the ppas.sh and link.res file. This is how the ppas.sh and the link.res file looks like. To me it looks ok. Do you think it is an error in the linker. Carsten ppas.sh #!/bin/sh DoExitAsm () { echo An error occurred while assembling $1; exit 1; } DoExitLink

[fpc-pascal] Platform

platform). Regards Carsten Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org

Re: [fpc-pascal] ppcrossarm 220

I guess it is linker script related. Unfortunatly FPC comes with an integrated linker script however it seems there is no generic one. Try to compare the various linker scripts to narrow it down. From ld you get it with ld --verbose From FPC you get it when compiling with -s: it's the

[fpc-pascal] Local Time

)+':'+ intToStr0(dt.MilliSecond,2); End; Begin GetLocalTime(SystemTime); WriteLn('LTC:',SystemTimeToStr(SystemTime)); GetUtcTime(SystemTime); WriteLn('UTC:',SystemTimeToStr(SystemTime)); End. Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45

Re: [fpc-pascal] Local Time

Can you post straces? I can not run strace on my Arm9 platform. Is there another way. CarstenMed venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk ___ fpc-pascal maillist

Re: [fpc-pascal] Local Time

On 21 Feb 2008, at 09:15, Carsten Bager wrote: My problem is that I get UTC time with the 220 compiler on the Arm platform, when using gettime, now ---. If i compile my program lt (local time) with the 220 compiler on Linux 386 it works as I expects. If I compile it to an Arm

Re: [fpc-pascal] Local Time

:21/02-2008 13:53:17:944 UTC:21/02-2008 12:53:17:00 221 compiler on Arm 9 LTC:21/02-2008 13:54:41:925 UTC:21/02-2008 12:56:15:00 Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk

Re: [fpc-pascal] Local Time

:21/02-2008 13:53:17:944 UTC:21/02-2008 12:53:17:00 221 compiler on Arm 9 LTC:21/02-2008 13:54:41:925 UTC:21/02-2008 12:56:15:00 Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk

Re: [fpc-pascal] ARM and graphic libraries

Does anyone here have any experience with using FreePascal using ARM microprocessor and drawing graphics? I have being using nano-x and uLibc on an Arm-9 bord. You can get some test code here. http://www.freepascal.dk/files/fpcarm9.tgz The code is not meant to bee released in public yet (not

Re: [fpc-pascal] MySQL50 unit in freepascal

Does anyone have a simple (very simple) and basic way of connecting to a mysql database, reading a record and writing a record into a table? That's all I need to get started; or if there is some documentation somewhere on how to use the unit id be grateful. Here is an example I found

Re: [fpc-pascal] Sharing memory between applications

I need to share memory between applications and wanted to know if FPC has this implemented. Today I use the windows CreateFileMapping function, but this is windows specific. Here is a parcel of a program where I use sheared memory on Linux Regards Carsten -

[fpc-pascal] Crt and remote terminal

Hi I would like to have the possibility to log in to my program via TCP and use the crt unit. (I monitor a connection attempt on a specific port number, and opens a line when it is necessary) I can easily create some code where input output is redirected to the remote terminal but the crt

[fpc-pascal] Sock2Text

Hi Sock2Text is marked as deprecated what should I use as replacement (I can not find a equivalent). Regards Carsten Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk

[fpc-pascal] SocketError

I have a simple TCP program and I want to see when the client breaks the line. With the 205 compiler this is not a problem SocketError tells me, but with the 220 compiler nothing happens. Do I have to do something else? When compiled to 386 SocketError always returns 0, but when compiled to

Re: [fpc-pascal] SocketError

); SocketError_:=SocketError; Writeln('-',SocketError_,FpRecv_:10); until (c=chr(27)) or ((SocketError_0) and ((SocketError_11))) or (FpRecv_=0); FpShutdown(uSock, 2); Say('Connection closed.'); until False; end. Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK

[fpc-pascal] Delphi mode

Is there another way writing this without activating Delphi mode. Carsten type tKeypressed=function:boolean; Var pKeypressed:tKeypressed; Function Keypressed:boolean; Implementation Function Keypressed:boolean; Begin if pointer(pKeypressed)nil then Keypressed:=pKeypressed else

[fpc-pascal] gnugettext

Hi I am using the gnugettext unit on Linux (Arm9), but when using Russian as translated language I have a problem. All Russian chars are returned as ? I believe the problem is in the system unit, everything looks fine (debug output from gnugettext) but it looks like when translated in gettext

Re: [fpc-pascal] gnugettext

Did you add cwstring to the uses clause of your program ? Without it, you won't have access to the recoding routines. I do not have to do that the compiler it self calles fpc_widestr_to_ansistr witch then calles Wide2AnsiMoveProc in this proces I lose the the russian translation. Carsten

[fpc-pascal] TObject

A have a unit (uSafeVar) with an object. The object has a property data of the type SafeVar_typ If I do this it works (wSafeVar is called) var p:SafeVar_typ; begin p.d:=111; SafeVar.data:=p; end If I do this it dos not work but it compiles (wSafeVar is not called) begin

[fpc-pascal] DateTimeToFileDate

When I do this Free Pascal Compiler version 2.2.2 [2008/07/29] for i386 - Program tt; uses dos, sysutils; function strPackTime(t:longWord):shortstring; var dt:Datetime; begin UnpackTime(t,dt); strPackTime:=intToStr(dt.day)+'/'+ intToStr(dt.month)+'-'+

Re: [fpc-pascal] DateTimeToFileDate

Zitat von Carsten Bager [EMAIL PROTECTED]: When I do this Free Pascal Compiler version 2.2.2 [2008/07/29] for i386 Which OS? Linux - Program tt; uses dos, sysutils; function strPackTime(t:longWord):shortstring; var dt:Datetime; begin

Re: [fpc-pascal] DateTimeToFileDate

(DateTimeToFileDate(now ; End. Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk ___ fpc-pascal maillist - fpc-pascal

Re: [fpc-pascal] DateTimeToFileDate

The FileDate format differ on unix and windows. UnpackTime uses the windows format. You need another function for unix. Is the file date on Unix the number of seconds since 00:00:00 January 1, 1970. Carsten ___ fpc-pascal maillist -

Re: [fpc-pascal] Cross compiling on Windows

I doubt it really is a samba problem, more some problem that certain heuristics that cause the libctype detection are somehow different (do you happen to use -Xd on the samba drive?) Yes and on the local drive. Every thing is the same (I copy everything to the local drive). Anyway, a

[fpc-pascal] Cross compiling on Windows

When moving from the 205 compiler to the 222 compiler I have got a strange problem with the cross compiler for Windows --- (Free Pascal Compiler version 2.2.2 [2008/08/26] for arm) --- When I compile a project on a Samba drive it works ok. But when I copy everything (compiler,

Re: [fpc-pascal] TObject

Change to Function rSafeVar: SafeVar_typ; Joao Morais Sorry about that. I pasted the wrong code in the email. I have already changed that. It does still not compile after the change. Carsten Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788

Re: [fpc-pascal] TObject

):SafeVar_typ; Begin WriteLn('Read'); End; Begin SafeVar:=TSafeVar.create; SafeVar.data.week:=1; SafeVar.free; End. Med venlig hilsen Carsten Bager BEAS A/S Brørupvænget 10 DK-7650 Bøvlingbjerg Tlf. : +45 9788 5222 Fax : +45 9788 5434 www.beas.dk

[fpc-pascal]Corss compiling to ARM

Hi I am trying to build a cross compiler for the arm-linux platform. I seem to be missing the cross assembler and the cross linker. Where can I download them (arm-linux-as and arm-linux-ld). Regards Carsten-- Carsten Bager Bøvlingbjerg El-automatik Brørupvænget 10 7650 Bøvlingbjerg Tlf

[fpc-pascal] Absolute

. --- bb.pas(4.23) Error: absolute can only be associated with a var or const -- Carsten Bager Bøvlingbjerg El-automatik Brørupvænget 10 7650 Bøvlingbjerg Tlf. +4597885222 Fax +4597885434 http://www.beas.dk ___ fpc-pascal maillist - fpc-pascal

[fpc-pascal] ppcrossarm

TestEmbedded.pas Assembling testembedded Linking TestEmbedded 5 Lines compiled, 0.0 sec [EMAIL PROTECTED]:/Pas/Embedded -- Carsten Bager Bøvlingbjerg El-automatik Brørupvænget 10 7650 Bøvlingbjerg Tlf. +4597885222 Fax +4597885434 http://www.beas.dk ___ fpc-pascal

[fpc-pascal] ppcrossarm

Switching from version 1.9.5 to version 1.9.9 gives me the following problem; the compiler cannot find the assembler. The assembler (as) and linker (ld) are in the same folder. I am using the same fpc.cfg (in the same folder). What are I doing wrong. see below Regards Carsten [EMAIL

[fpc-pascal] ppcrossarm

TestEmbedded.pas Assembling testembedded Linking TestEmbedded 5 Lines compiled, 0.0 sec [EMAIL PROTECTED]:/Pas/Embedded -- Carsten Bager Bøvlingbjerg El-automatik Brørupvænget 10 7650 Bøvlingbjerg Tlf. +4597885222 Fax +4597885434 http://www.beas.dk ___ fpc-pascal

[fpc-pascal] Writeln in embedded systems

Line 33 is the line where I have written WriteLn('TEST'); Dos anyone have a hint about what I should do next. Regards Carsten -- Carsten Bager Bøvlingbjerg El-automatik Brørupvænget 10 7650 Bøvlingbjerg Tlf. +4597885222 Fax +4597885434 http://www.beas.dk

[fpc-pascal] Array of Char

thing, with the old compiler we can write Type A_typ=array[0..3] of integer; Var A1,A2:A_typ; Begin If A1=A2 then End; I have never could understand when this is allowed A1:=A2; Why this is not allowed If A1=A2 then in most Pascal compilers. Regards Carsten -- Carsten Bager Bøvlingbjerg El

[fpc-pascal] Embedded ARM system unit

sysnr.inc(193,3) Hint: Local const syscall_nr_getresgid is not used sysnr.inc(194,3) Hint: Local const syscall_nr_prctl is not used sysnr.inc(195,3) Hint: Local const syscall_nr_rt_sigreturn is not used -- Carsten Bager Bøvlingbjerg El-automatik Brørupvænget 10 7650 Bøvlingbjerg Tlf. +4597885222 Fax

Re: [fpc-pascal] Embedded ARM system unit

; {$endif} begin end; Procedure do_exit;[Public,Alias:'FPC_DO_EXIT']; begin end; begin end. EOF -- Carsten Bager Bøvlingbjerg El-automatik Brørupvænget 10 7650 Bøvlingbjerg Tlf. +4597885222 Fax +4597885434 http://www.beas.dk ___ fpc-pascal maillist

[fpc-pascal] Array of Char

thing, with the old compiler we can write Type A_typ=array[0..3] of integer; Var A1,A2:A_typ; Begin If A1=A2 then End; I have never could understand when this is allowed A1:=A2; Why this is not allowed If A1=A2 then in most Pascal compilers. Regards Carsten -- Carsten Bager

[fpc-pascal] Embedded ARM system unit

with smartlinking system -- Carsten Bager Bøvlingbjerg El-automatik Brørupvænget 10 7650 Bøvlingbjerg Tlf. +4597885222 Fax +4597885434 http://www.beas.dk ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo

[fpc-pascal] $B or $BOOLEVAL : Complete boolean evaluation

It says in the manual that: $B or $BOOLEVAL : Complete boolean evaluation This switch is understood by the Free Pascal compiler, but is ignored. The compiler always uses shortcut evaluation. Is there any change that there would be added Complete boolean evaluation in the further? It is a

[fpc-pascal] Runetime errors

running the FPC code on an embedded ARM platform without any operating system. -- Carsten Bager Bøvlingbjerg El-automatik Brørupvænget 10 7650 Bøvlingbjerg Tlf. +4597885222 Fax +4597885434 http://www.beas.dk ___ fpc-pascal maillist - fpc-pascal

[fpc-pascal] Packed record

by Florian Klaempfl Target OS: Linux for ARM -- Carsten Bager Bøvlingbjerg El-automatik Brørupvænget 10 7650 Bøvlingbjerg Tlf. +4597885222 Fax +4597885434 http://www.beas.dk ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http

Re: [fpc-pascal] Packed record

should be LSB has moved. I have solved the problem with move as suggested by Florian Klaempfl. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal -- Carsten Bager Bøvlingbjerg El

Re: [fpc-pascal] Records

Adriaan van Os wrote: Carsten Bager wrote: We are moving a lot of code from an old platform where it is allowed to compare 2 records like this. Type A_typ=array[0..3] of integer; Var A1,A2:A_typ; Begin If A1=A2 then End; I know that I can typecast to an array

[fpc-pascal] Absolute ($FFFFF034)

Hi W are using the compiler on an embedded Arm7 platform (no operating system). Now we have run into this problem. We want to define an absolute address, to a specific register. It seems that, if the absolut address exceeding $F000 then we get the error. OK Compiling goes OK.

[fpc-pascal] Asm

The below Pascal code cannot compile with ARM Pascal compiler. If I use $E034 as constant it compiles. I am trying to write some assembler in the Pascal source code (to get around this error), could someone give me a hint how to write the line: VICDefVectAddr := @UartInterrupt; in

[fpc-pascal] Constants

Hi I am compiling for an embedded ARM processor and I am running out of data space. Is there a way to keep string constants in the code (they are automatically copied to the data segment). Another problem is, I can not read anything below the data start address -- data_c:array[0..4] of char

[fpc-pascal] Constants

Hi I am compiling for an embedded ARM processor and I am running out of data space. Is there a way to keep string constants in the code (they are automatically copied to the data segment). Another problem is, I can not read anything below the data start address -- data_c:array[0..4] of char

[fpc-pascal] CPSR

I would like to do the following in assembler (ARM), so I can write out the Pascal variable pas_cpsr containing the CPSR register. Is it possible? asm mrs R0, CPSR ldr r1,pas_cpsr str r0,[r1] end; Regards Carsten ___

Re: [fpc-pascal] Constants

Hi Would there be a chance to implement Static or something that did the same trick, in the compiler. Now I write my constants in an assembler file. That´s acceptable, but it is not a very elegant way to do it. Regards Carsten Carsten Bager wrote: Hi I am programming to an embedded

Re: [fpc-pascal] Constants

It's not the keyword that is the problem. The whole logic for this would have to be implemented. Think switches, commands to the linker, a way to configure the name for the segment etc. Part of this is specific for your device setup. If writable const is off, also variables declared with

[fpc-pascal] Smartlinking

I have built a Windows cross compiler for ARM It is working fine without smartlinking. When I activate smartlinking I get this error: Free Pascal Compiler version 2.0.2 [2005/12/16] for arm Assembling arm2138reg Assembling with smartlinking arm2138reg /cygdrive/l/ARMBIN/AR:

Re: [fpc-pascal] Smartlinking

I have built a Windows cross compiler for ARM It is working fine without smartlinking. When I activate smartlinking I get this error: Free Pascal Compiler version 2.0.2 [2005/12/16] for arm Assembling arm2138reg Assembling with smartlinking arm2138reg /cygdrive/l/ARMBIN/AR:

Re: [fpc-pascal] Smartlinking

Thank you Regards Carsten -- Carsten Bager Bvlingbjerg El-automatik Brrupvnget 10 7650 Bvlingbjerg Tlf. +4597885222 Fax +4597885434 www.beas.dk The following section of this message contains a file attachment prepared for transmission using the Internet MIME message format. If you

[fpc-pascal] Delphi mode

Why do I have to use the {$MODE Delphi} directive to compile this, It compiles in TP 6 - Type tFun=function:boolean; Procedure g(f:tFun); Begin if f then exit; End; -- I ask because when I am in Delphi mode this can not compile Var tekster:Tekster_typ; external

[fpc-pascal] Compiler allocates 40 bytes on the stack

I have written a procedure TestVar Procedure TestVar; Begin End; If I look at the assembler code, it looks like the compiler allocates 40 bytes on the stack. Is there anybody who knows the reason for this? Regards Carsten Free Pascal Compiler version 2.0.2 [2006/02/28] for arm Copyright (c)

[fpc-pascal] nano-x

I am trying to convert nano-X.h to a pas file but I get some errors. This is 2 of them. I cannot se what the problem is, can anyone give me a hint. Carsten at line 698 error : syntax error at line 964 error : syntax error Unexpected wrap of line 964 { GR_WM_PROPERTIES

[fpc-pascal] ExitProc

If I compile and run my example program and then press Crtl+C the program terminates. I would expect that it terminate by calling CloseServer procedure, but it dos not. If the program terminates normally (time runs out) the CloseServer procedure is called as expected. Have I misunderstood

[fpc-pascal] Linux device driver

Can I program a Linux device driver with FPC? This question was asked 3 years ago. The answer was In theory it is possible, you would have to write a 'kernel-rtl' (Michael Van Canneyt). Has there been any development in this area? Carsten ___

[fpc-pascal] Nano-x

I am trying to write a small program using the nano-x library. - Unit NanoX; interface {$mode objfpc} Const LibNanoX='nano-X'; function GrOpen:longint;cdecl;external LibNanoX; implementation end. -- program Nanoxdemo; uses NanoX,linux,sysutils; begin if

Re: [fpc-pascal] Nano-x

You need to link to the C library as well. When I use initc I get thise errors Linking nanoxdemo L:\Lib\fpc202\arm-linux\cprt0.o: In function `_start': : undefined reference to `__libc_start_main' L:\Lib\fpc202\arm-linux\cprt0.o: In function `_haltproc' : undefined reference to `_fini'

Re: [fpc-pascal] Nano-x

On Thu, 20 Jul 2006, Carsten Bager wrote: You need to link to the C library as well. When I use initc I get thise errors Linking nanoxdemo L:\Lib\fpc202\arm-linux\cprt0.o: In function `_start': : undefined reference to `__libc_start_main' L:\Lib\fpc202\arm-linux\cprt0.o

  1   2   >