[fpc-pascal] Test
Test, please ignore . regards, -- Dimitrios Chr. Ioannidis ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Test Free Pascal program not compiling
On 2022-09-12 21:12, Terry A. Haimann via fpc-pascal wrote: Hello Terry, I personally think it can't find the assembler. I did test this on my desktop and it compiled w/o error. No, but the installed assembler doesn't know the "softvfp" FPU type apparently specified in the compilation options: --- [0.430] Executing "/usr/bin/as" with command line "-mfpu=softvfp -o Sqrt.o Sqrt.s" Assembler messages: Error: unrecognized option -mfpu=softvfp === Below you will see the output of the compile as you suggested. Sorry it is so long. As a reminder - you can always zip the file and add it to attachment, or place it on some server and include just a link (or reduce the size by removing the beginning of the file if it's so long and there's a message close to the end starting with "Error:"). Tomas (one of the FPC mailing lists moderators) ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Test Free Pascal program not compiling
I personally think it can't find the assembler. I did test this on my desktop and it compiled w/o error. Below you will see the output of the compile as you suggested. Sorry it is so long. Terry H. terry@libre-computer:~/Documents/fpc/Silly$ fpc -va Sqrt.pas [0.000] Macro defined: LINUX [0.000] Macro defined: UNIX [0.000] Macro defined: HASUNIX [0.000] Macro defined: CPUARMEL [0.000] Macro defined: FPC_REQUIRES_PROPER_ALIGNMENT [0.000] Macro defined: FPC_HAS_WINLIKERESOURCES [0.000] Macro defined: CONSOLE [0.000] Macro defined: LINUX [0.000] Macro defined: FPC [0.000] Macro defined: VER3 [0.000] Macro defined: VER3_0 [0.000] Macro defined: VER3_0_2 [0.000] Macro defined: RESSTRSECTIONS [0.000] Macro defined: FPC_HASFIXED64BITVARIANT [0.000] Macro defined: FPC_HASINTERNALOLEVARIANT2VARIANTCAST [0.000] Macro defined: FPC_HAS_VARSETS [0.000] Macro defined: FPC_HAS_VALGRINDBOOL [0.000] Macro defined: FPC_HAS_STR_CURRENCY [0.000] Macro defined: FPC_REAL2REAL_FIXED [0.000] Macro defined: FPC_STRTOCHARARRAYPROC [0.000] Macro defined: FPC_STRTOSHORTSTRINGPROC [0.000] Macro defined: FPC_OBJFPC_EXTENDED_IF [0.000] Macro defined: FPC_HAS_OPERATOR_ENUMERATOR [0.000] Macro defined: FPC_HAS_CONSTREF [0.000] Macro defined: FPC_STATICRIPFIXED [0.000] Macro defined: FPC_VARIANTCOPY_FIXED [0.000] Macro defined: FPC_DYNARRAYCOPY_FIXED [0.000] Macro defined: FPC_HAS_INTERNAL_ABS_LONG [0.000] Macro defined: FPC_HAS_UNICODESTRING [0.000] Macro defined: FPC_RTTI_PACKSET1 [0.000] Macro defined: FPC_HAS_CPSTRING [0.000] Macro defined: FPC_HAS_CEXTENDED [0.000] Macro defined: FPC_HAS_RESSTRINITS [0.000] Macro defined: FPC_HAS_INTERNAL_ROX [0.000] Macro defined: FPC_HAS_INTERNAL_SAR [0.000] Macro defined: FPC_HAS_MEMBAR [0.000] Macro defined: FPC_SETBASE_USED [0.000] Macro defined: INTERNAL_BACKTRACE [0.000] Macro defined: STR_CONCAT_PROCS [0.000] Macro defined: FPC_HAS_FEATURE_SUPPORT [0.000] Macro defined: CPUARM [0.000] Macro defined: CPU32 [0.000] Macro defined: FPC_CURRENCY_IS_INT64 [0.000] Macro defined: FPC_COMP_IS_INT64 [0.000] Configfile search: /home/terry/.fpc.cfg [0.000] Configfile search: /usr/lib/fpc/etc/fpc.cfg [0.000] Configfile search: /etc/fpc.cfg [0.000] Handling option "-va" [0.000] interpreting option "-va" [0.000] Handling option "Sqrt.pas" [0.000] found source file name "Sqrt.pas" [0.000] Macro defined: ENDIAN_LITTLE [0.000] Macro defined: FPC_LITTLE_ENDIAN [0.000] Macro defined: FPC_ABI_EABI [0.102] Macro defined: CPUARMV3 [0.102] Macro defined: FPUSOFT [0.102] Macro defined: FPC_HAS_TYPE_SINGLE [0.102] Macro defined: FPC_HAS_TYPE_DOUBLE [0.102] Macro defined: FPC_INCLUDE_SOFTWARE_INT64_TO_DOUBLE [0.102] Macro defined: FPC_LINK_STATIC [0.102] Macro FPC_VERSION set to 3 [0.102] Macro FPC_RELEASE set to 0 [0.102] Macro FPC_PATCH set to 2 [0.102] Macro FPC_FULLVERSION set to 30002 [0.102] Macro defined: FPC_WIDESTRING_EQUAL_UNICODESTRING [0.102] Macro defined: FPC_HAS_FEATURE_HEAP [0.102] Macro defined: FPC_HAS_FEATURE_INITFINAL [0.102] Macro defined: FPC_HAS_FEATURE_RTTI [0.102] Macro defined: FPC_HAS_FEATURE_CLASSES [0.102] Macro defined: FPC_HAS_FEATURE_EXCEPTIONS [0.102] Macro defined: FPC_HAS_FEATURE_EXITCODE [0.102] Macro defined: FPC_HAS_FEATURE_ANSISTRINGS [0.102] Macro defined: FPC_HAS_FEATURE_WIDESTRINGS [0.102] Macro defined: FPC_HAS_FEATURE_TEXTIO [0.102] Macro defined: FPC_HAS_FEATURE_CONSOLEIO [0.102] Macro defined: FPC_HAS_FEATURE_FILEIO [0.102] Macro defined: FPC_HAS_FEATURE_RANDOM [0.102] Macro defined: FPC_HAS_FEATURE_VARIANTS [0.102] Macro defined: FPC_HAS_FEATURE_OBJECTS [0.102] Macro defined: FPC_HAS_FEATURE_DYNARRAYS [0.102] Macro defined: FPC_HAS_FEATURE_THREADING [0.102] Macro defined: FPC_HAS_FEATURE_COMMANDARGS [0.102] Macro defined: FPC_HAS_FEATURE_PROCESSES [0.102] Macro defined: FPC_HAS_FEATURE_STACKCHECK [0.102] Macro defined: FPC_HAS_FEATURE_DYNLIBS [0.102] Macro defined: FPC_HAS_FEATURE_SOFTFPU [0.102] Macro defined: FPC_HAS_FEATURE_OBJECTIVEC1 [0.102] Macro defined: FPC_HAS_FEATURE_RESOURCES [0.102] Macro defined: FPC_HAS_FEATURE_UNICODESTRINGS [0.102] Searching file /lib/ld-linux.so.3... not found [0.102] Searching file /lib/ld-uClibc.so.0... not found [0.102] Path "/usr/X11R6/lib/" not found [0.164] Path "/usr/lib/arm-linux-gnueabi/" not found [0.164] Compiler: /usr/lib/fpc/3.0.2/ppcarm [0.164] Compiler OS: Linux for ARMEL [0.164] Target OS: Linux for ARMEL [0.164] Using executable path: /usr/lib/fpc/3.0.2/ [0.164] Using unit path: /usr/lib/fpc/3.0.2/units/arm-linux/rtl/ [0.164] Using unit path: /usr/lib/fpc/3.0.2/ [0.164] Using library path: /lib/ [0.164] Using library path: /usr/lib/ [0.164] Using library path: /usr/lib/fpc/3.0.2/units/arm-linux/rtl/ [0.164] Using library path: /usr/lib/fpc/3.0.2/ [0.164] Using object path: /usr/lib/fpc/3.0.2/units/arm-linux/rtl/ [0.164] Using object path: /usr/lib/fpc/3.0.2/ [0.164] Compiling Sqrt.pas [0.164] Searching file Sqrt.pas... found 2 104/1.024 Kb Used [0.164] (SQRT) Registering new unit SYSTEM [0.164] (SQRT) Load from
Re: [fpc-pascal] Test Free Pascal program not compiling
On Mon, 12 Sep 2022, 02:59 Terry A. Haimann via fpc-pascal, < fpc-pascal@lists.freepascal.org> wrote: > Trying to compile a small test pascal program on a arm cpu. I beleive > it is an a53. Libre Le Potato > > I am getting the following error: > > Error: Error while assembling exitcode 1 > > Thanks in advance, > > Terry H. > Enable the compiler's verbose mode (-va). The real error is sometimes printed much earlier in the compiler output. > ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
[fpc-pascal] Test Free Pascal program not compiling
Trying to compile a small test pascal program on a arm cpu. I beleive it is an a53. Libre Le Potato I am getting the following error: Error: Error while assembling exitcode 1 Thanks in advance, Terry H. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
[fpc-pascal] test plz ignore
test plz ignore ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Test file mode question
On 10/25/16, Rolf Grunskywrote: > If (SFile.Mode = fmClosed) Then Rewrite(SFile); Maybe cast SFile to TextRec(SFile)? Bart ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
[fpc-pascal] Test file mode question
I am trying to put together a short program to build a script file. I declare the file as: Uses sysutils; {$H+I-} Var SFile : Text; I then assign a name to the file : Assign(SFile, SName); Now, I only want to create the file if some conditions are met. Since this is in a loop I thought I could do this: If (SFile.Mode = fmClosed) Then Rewrite(SFile); But this line gives the error Error: Illegal qualifier and the location in the line is at the 'o' in Mode. I vaguely remember doing things like this in Turbo/Borland Pascal many years ago. It should be possible to do this with Free Pascal? I'm using Free Pascal Compiler version 2.6.4 [2014/03/03] for x86_64 on Linux. What am I doing wrong? thanks Rolf Grunsky -- TRUTH in her dress finds facts too tight. In fiction she moves with ease. Stray Birds by Rabindranath Tagore ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
[fpc-pascal] test plz ignore
plz ignore -- Dimitrios Chr Ioannidis ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Test for valid ip address
Op 28-07-16 om 10:38 schreef Christo: The in_addr IP address type is a packed record of byte, so if an IP address part larger than 255 is encountered in a string it will be truncated when copied to the byte record using StrToHostAddr. This probably means you have to use some other means of detecting an invalid address, or add a check for (tmpAddress <> IPAddressStr) to cater for your situation. Thanks, I used the check : (tmpAddress <> IPAddressStr) in stead of (tmpAddress='0.0.0.0') Koenraad ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Test for valid ip address
Am Donnerstag, 28. Juli 2016, 10:26:32 schrieb Jonas Maebe: > On 28/07/16 10:14, Koenraad Lelong wrote: > > I need a way to test if an string containing an ipv4-address is really > > an ipv4-address. > > I tried > > tmpAddress:=HostAddrToStr(StrToHostAddr(IPAddressStr)); > > writeln(tmpAddress); > > > > if (tmpAddress='0.0.0.0') then > > > > begin > > > >writeln('Error in IP-address'); > >IPAddressStr:=tmpAddress; > > > > end; > > > > When I enter 192.168.185.297 (i.e. not a valid ipv4 address) in > > IPAddressStr I get > > 192.168.185.41 > > not the expected error-message. > > You can add a multiple of 256 to any octet of an IPv4 address in most > programs. Try it in your browser, it will probably also work. In Firefox 45.2.0 on Linux it does not work. It is confusing anyway. > > Jonas > ___ > fpc-pascal maillist - fpc-pascal@lists.freepascal.org > http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Test for valid ip address
On Thu, 2016-07-28 at 10:14 +0200, Koenraad Lelong wrote: > When I enter 192.168.185.297 (i.e. not a valid ipv4 address) in > IPAddressStr I get > 192.168.185.41 > not the expected error-message. > > According to the rtl-manual : > > function StrToHostAddr(IP: AnsiString) : in_addr > Description: StrToHostAddr converts the string representation in IP to a > host address and returns the host > address. > Errors: On error, the host address is filled with zeroes. > > I would think that converting those zeroes to a host-address would yield > 0.0.0.0. > > Am I missing something ? > Is there a better way, without using some other network-library ? The in_addr IP address type is a packed record of byte, so if an IP address part larger than 255 is encountered in a string it will be truncated when copied to the byte record using StrToHostAddr. This probably means you have to use some other means of detecting an invalid address, or add a check for (tmpAddress <> IPAddressStr) to cater for your situation. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Test for valid ip address
On Thu, 28 Jul 2016 10:26:32 +0200 Jonas Maebewrote: > On 28/07/16 10:14, Koenraad Lelong wrote: > > I need a way to test if an string containing an ipv4-address is really > > an ipv4-address. > > I tried > > tmpAddress:=HostAddrToStr(StrToHostAddr(IPAddressStr)); > > writeln(tmpAddress); > > if (tmpAddress='0.0.0.0') then > > begin > >writeln('Error in IP-address'); > >IPAddressStr:=tmpAddress; > > end; > > When I enter 192.168.185.297 (i.e. not a valid ipv4 address) in > > IPAddressStr I get > > 192.168.185.41 > > not the expected error-message. > > You can add a multiple of 256 to any octet of an IPv4 address in most > programs. Try it in your browser, it will probably also work. What browser supports that? Mattias ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Test for valid ip address
The IP-Adress is a dword, but you can change, that it fits for you. function str_getval( str : shortstring ) : longint; var cod : longint; begin val( str , result , cod ); end; function ip_from_string( ipstr : shortstring ; out error : boolean ) : dword; var c : char; ipn , pointanz : longint; x : longint; pstr : shortstring; ip : dword; procedure add_ip; begin ipn := str_getval( pstr ); if ( ipn > 255 ) or ( pstr = '' ) then error := true; ip := ip shl 8; ip := ip or ipn; pstr := ''; end; begin ip := 0; pstr := ''; error := false; pointanz := 0; for x := 1 to length( ipstr ) do begin c := ipstr[ x ]; case c of '0'..'9' : pstr := pstr + c; '.' : begin inc( pointanz ); add_ip; end; else error := true; end; end; add_ip; if pointanz <> 3 then error := true; if error then result := 0 else result := ip; end; Am Donnerstag, 28. Juli 2016, 10:14:10 schrieb Koenraad Lelong: > Hi, > > I need a way to test if an string containing an ipv4-address is really > an ipv4-address. > I tried > tmpAddress:=HostAddrToStr(StrToHostAddr(IPAddressStr)); > writeln(tmpAddress); > if (tmpAddress='0.0.0.0') then >begin > writeln('Error in IP-address'); > IPAddressStr:=tmpAddress; >end; > When I enter 192.168.185.297 (i.e. not a valid ipv4 address) in > IPAddressStr I get > 192.168.185.41 > not the expected error-message. > > According to the rtl-manual : > > function StrToHostAddr(IP: AnsiString) : in_addr > Description: StrToHostAddr converts the string representation in IP to a > host address and returns the host > address. > Errors: On error, the host address is filled with zeroes. > > I would think that converting those zeroes to a host-address would yield > 0.0.0.0. > > Am I missing something ? > Is there a better way, without using some other network-library ? > > Koenraad. > ___ > fpc-pascal maillist - fpc-pascal@lists.freepascal.org > http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Test for valid ip address
On 28/07/16 10:14, Koenraad Lelong wrote: I need a way to test if an string containing an ipv4-address is really an ipv4-address. I tried tmpAddress:=HostAddrToStr(StrToHostAddr(IPAddressStr)); writeln(tmpAddress); if (tmpAddress='0.0.0.0') then begin writeln('Error in IP-address'); IPAddressStr:=tmpAddress; end; When I enter 192.168.185.297 (i.e. not a valid ipv4 address) in IPAddressStr I get 192.168.185.41 not the expected error-message. You can add a multiple of 256 to any octet of an IPv4 address in most programs. Try it in your browser, it will probably also work. Jonas ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
[fpc-pascal] Test for valid ip address
Hi, I need a way to test if an string containing an ipv4-address is really an ipv4-address. I tried tmpAddress:=HostAddrToStr(StrToHostAddr(IPAddressStr)); writeln(tmpAddress); if (tmpAddress='0.0.0.0') then begin writeln('Error in IP-address'); IPAddressStr:=tmpAddress; end; When I enter 192.168.185.297 (i.e. not a valid ipv4 address) in IPAddressStr I get 192.168.185.41 not the expected error-message. According to the rtl-manual : function StrToHostAddr(IP: AnsiString) : in_addr Description: StrToHostAddr converts the string representation in IP to a host address and returns the host address. Errors: On error, the host address is filled with zeroes. I would think that converting those zeroes to a host-address would yield 0.0.0.0. Am I missing something ? Is there a better way, without using some other network-library ? Koenraad. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
[fpc-pascal] test - ignore
test - ignore ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
[fpc-pascal] Test, please ignore
___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
[fpc-pascal] test
pls ignore ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] Test
Please, ignore. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] Test, please ignore
___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] test
___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] test
just test, ignore it ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] test suite, TEST_REMOTEOPT
Hello, I could not pass the test suite option TEST_REMOTEOPT to the makefile. I tried TEST_REMOTEOPT=xxx and TEST_REMOTEOPT=xxx both did not work on Win32. I changed the makefile a bit and it works now for me. Don't know, if this is a proper patch: Index: tests/Makefile === --- tests/Makefile (Revision 12568) +++ tests/Makefile (Arbeitskopie) @@ -1528,7 +1528,7 @@ qec...@echo $(1) endif ifdef TEST_REMOTEOPT -override DOTESTOPT+=-U$(TEST_REMOTEOPT) +override DOTESTOPT+=-U$(TEST_REMOTEOPT) endif ifdef TEST_PUTTY override DOTESTOPT+=-R$(TEST_PUTTY) -W Regards, Bernd. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] Test, please ignore
___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] Test
___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] Test, please ignore
___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Test, please ignore
___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] Test please ignore
___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] test please ignore
test ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal]Test Mac OS X installer
On 3 mei 2004, at 13:43, Olle Raab wrote: But this means you need to have the MacOS X development tools installed to install fpc ? Yes, otherwise make and the gnu assembler are not available. Can you use fpc from within any of Apples development tools, e g from ProjectBuilder If someone writes a plug-in. I have no idea how to even start that, however. Jonas ___ fpc-pascal maillist - [EMAIL PROTECTED] http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal]Test Mac OS X installer
04-05-03 13.48, skrev Jonas Maebe följande: On 3 mei 2004, at 13:43, Olle Raab wrote: But this means you need to have the MacOS X development tools installed to install fpc ? Yes, otherwise make and the gnu assembler are not available. Can you use fpc from within any of Apples development tools, e g from ProjectBuilder If someone writes a plug-in. I have no idea how to even start that, however. OK, the webpage is updated. ___ fpc-pascal maillist - [EMAIL PROTECTED] http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal]Test Mac OS X installer
Hello, I've created an install package for the Mac OS X version of FPC (of basically a snapshot of today, but it includes the docs). You can find it on the ftp site in the directory /fpc/beta/macosx-powerpc-1.9.3 (and tomorrow on the mirrors as well). I would like to ask people using Mac OS X to test it, especially those using older versions. It should work on 10.1 and higher. Please report and problems you have, so we can hopefully have a smooth 1.9.4 release in a couple of weeks. Thanks, Jonas ___ fpc-pascal maillist - [EMAIL PROTECTED] http://lists.freepascal.org/mailman/listinfo/fpc-pascal