Hi,
I need some testers for all the different available platforms. Because, unfortunately, I do not have every available hardware/OS myself :(

I added a package called "macroscript" (in the components folder), there also is a modified (bug fixes) version of pascalscript (the original will not work).
Only SVN trunk / 1.1 snapshot revision 39418 and up

There is no need to install the package (but if the IDE does not find it, or if you used another pascalscript), then you *must* at least use "open package" and open it from the IDE.

The package has a folder "test" with a testcase. When running the interactive part, take care, of pressing the right button (2 dlg want "cancel"). And edit the text (set to "123" for 2 out of 3 dlg)

Please report your OS and CPU (including 32/64 bit) and fpc version along with test results.

Sofar I tested:
- Win Vista / Intel 32 bit / fpc 2.6.0
- Win Vista / Intel 32 bit / fpc trunk (recent, last 7 days)
- Win XP / Intel 64 bit / fpc 2.6.0
- Linux, fedora 13 / Intel 32 bit / fpc 2.6.0
- Mac OS / Intel 32 bit / fpc 2.6.0

Martin wrote

Hi, I need some testers for all the different available platforms. Because, unfortunately, I do not have every available hardware/OS myself :(

I'll try to take a look at some of my odder systems over the weekend. I probably won't be able to test on arm-linux since my current emulation system is likely to make that infeasibly slow.

Martin wrote

Hi, I need some testers for all the different available platforms. Because, unfortunately, I do not have every available hardware/OS myself :(

<?xml version="1.0" encoding="utf-8"?>
<TestResults>
<!-- Generated using FPCUnit on 2012-11-30 10:59:13--> <TestListing>
<TestSuite Name="" ElapsedTime="00:00:51.230" NumberOfErrors="0" NumberOfFailures="0" NumberOfRunTests="3" NumberOfIgnoredTests="0"> <TestSuite Name="TTestCase1" ElapsedTime="00:00:51.230" NumberOfErrors="0" NumberOfFailures="0" NumberOfRunTests="3" NumberOfIgnoredTests="0">
<Test Name="TestBasics" Result="OK" ElapsedTime="00:00:00.124"/> <Test Name="TestSynProcs" Result="OK" ElapsedTime="00:00:00.281"/> <Test Name="TestInteractiv" Result="OK"
ElapsedTime="00:00:50.825"/>
</TestSuite>
</TestSuite>
</TestListing>
<NumberOfRunTests>3</NumberOfRunTests>
<NumberOfErrors>0</NumberOfErrors>
<NumberOfFailures>0</NumberOfFailures>
<NumberOfIgnoredTests>0</NumberOfIgnoredTests>
<TotalElapsedTime>00:00:51.246</TotalElapsedTime>
<DateTimeRan>2012-11-30 11:00:04</DateTimeRan>
</TestResults>

This is on a Win 7 (Home Premium) 64 bit dual core processor running 32-bit Lazarus, FPC 2.6.1

... 0 errors

This is on a Win 7 (Home Premium) 64 bit dual core processor running 32-bit Lazarus, FPC 2.6.1

Thanks

Hi, I need some testers for all the different available platforms.

Trying to run TestScriptProcs I get the following compilation error (along with a bunch of warnings):

/lazarus/components/PascalScript/Source/x64.inc(144,3) Error: Asm: [push mem32] invalid combination of opcode and operands

Ubuntu 12.10 / AMD 64 / fpc 2.7.1 rev 23082

R.

@fpc list, can someone tell what the right syntax is?

@Reimar: from a similar case, I would guess (line 144) push [rcx]
must be
push qword ptr [rcx]

Could you try please?

Just checked. It looks like PascalScript uses a lot of 32 bit int, to store pointers (maybe longint and cardinal do adapt in Delphi, but they do not in fpc.)

So I was just lucky my 64 bit test worked.

I will update you, once this is fixed

ARM Debian Sid, fpc 2.6.0
Compiles OK. Running all tests just hangs at the 3rd test, no CPU usage.

Running individual tests:
<TestResults>
<!-- Generated using FPCUnit on 2012-12-01 12:14:41--> <TestListing>
<Test Name="TestBasics" Result="Failed" ElapsedTime="00:00:00.234"> <Message>TTestCase1.TestBasics: SizeOf(TPoint) contains: Y IN </Message>
<ExceptionClass>EAssertionFailedError</ExceptionClass> <ExceptionMessage>SizeOf(TPoint) contains: Y IN </ExceptionMessage> </Test>
</TestListing>
<NumberOfRunTests>1</NumberOfRunTests>
<NumberOfErrors>0</NumberOfErrors>
<NumberOfFailures>1</NumberOfFailures>
<NumberOfIgnoredTests>0</NumberOfIgnoredTests>
<TotalElapsedTime>00:00:00.716</TotalElapsedTime>
<DateTimeRan>2012-12-01 12:14:42</DateTimeRan>
</TestResults>

<TestResults>
<!-- Generated using FPCUnit on 2012-12-01 12:17:35--> <TestListing>
<Test Name="TestSynProcs" Result="Failed" ElapsedTime="00:00:00.299"> <Message>TTestCase1.TestSynProcs: InsertTextAtCaret contains: Foo IN </Message>
<ExceptionClass>EAssertionFailedError</ExceptionClass> <ExceptionMessage>InsertTextAtCaret contains: Foo IN </ExceptionMessage>
</Test>
</TestListing>
<NumberOfRunTests>1</NumberOfRunTests>
<NumberOfErrors>0</NumberOfErrors>
<NumberOfFailures>1</NumberOfFailures>
<NumberOfIgnoredTests>0</NumberOfIgnoredTests>
<TotalElapsedTime>00:00:01.395</TotalElapsedTime>
<DateTimeRan>2012-12-01 12:17:36</DateTimeRan>
</TestResults>

Running TestInteractive alone results in a pop-up window "I am at 10,10". Clicking OK hangs the test.

Running in gdb gives an identical sigsegv in all tree tests: (gdb) bt
#0 0x00029988 in fpc_ansistr_incr_ref ()
#1 0x0036724c in TEMSSYNWRAPPER__EMS_INSERTTEXTATCARET (ATEXT=0x2 <Address 0x2 out of bounds>,
ACARETMODE=SCAMADJUST, this=<error reading variable>) at emscriptclasses.pas:282
#2 0x003c54a8 in _$UPSRUNTIME$_Lj22888 () at arm.inc:105 #3 0x003c54a8 in _$UPSRUNTIME$_Lj22888 () at arm.inc:105 Backtrace stopped: previous frame identical to this frame (corrupt stack?)

Continue in TestInteractive gices a second sigsegv: (gdb) bt
#0 0x4093b72c in strchr () from /lib/arm-linux-gnueabi/libc.so.6 #1 0x4060bf18 in g_param_spec_pool_lookup () from /usr/lib/arm-linux-gnueabi/libgobject-2.0.so.0
#2 0x40605884 in g_object_new_valist () from
/usr/lib/arm-linux-gnueabi/libgobject-2.0.so.0
#3 0x40605bb0 in g_object_new () from
/usr/lib/arm-linux-gnueabi/libgobject-2.0.so.0
#4 0x40202c38 in gtk_adjustment_new () from
/usr/lib/arm-linux-gnueabi/libgtk-x11-2.0.so.0
#5 0x402bddb8 in ?? () from /usr/lib/arm-linux-gnueabi/libgtk-x11-2.0.so.0 #6 0x402bddb8 in ?? () from /usr/lib/arm-linux-gnueabi/libgtk-x11-2.0.so.0 Backtrace stopped: previous frame identical to this frame (corrupt stack?)

Continue prints "Parameter type not implemented!" on the console and then nothing more. Breaking the program gives the following : (gdb) thr a a bt

Thread 1 (Thread 0x40f37320 (LWP 12840)):
#0 0x4004497c in __lll_lock_wait () from
/lib/arm-linux-gnueabi/libpthread.so.0
#1 0x4003e6bc in pthread_mutex_lock () from
/lib/arm-linux-gnueabi/libpthread.so.0
#2 0x4060be80 in g_param_spec_pool_lookup () from /usr/lib/arm-linux-gnueabi/libgobject-2.0.so.0
#3 0x4060685c in g_object_get_valist () from
/usr/lib/arm-linux-gnueabi/libgobject-2.0.so.0
#4 0x40606c58 in g_object_get () from
/usr/lib/arm-linux-gnueabi/libgobject-2.0.so.0
#5 0x403a938c in ?? () from /usr/lib/arm-linux-gnueabi/libgtk-x11-2.0.so.0 #6 0x403a938c in ?? () from /usr/lib/arm-linux-gnueabi/libgtk-x11-2.0.so.0 Backtrace stopped: previous frame identical to this frame (corrupt stack?)

Ludo

Doesn't build on PPC Linux (32-bit):

   {$fatal This code is Darwin specific at the moment!}

Work continues on SPARC.

Then the availability of ppc linux, will depend on, if PascalScript ever adds that. :(

Ok, ARM is off the table too....

looking at the PascalScript inc, it seems set "set of()" param are not implemented. But given the errors you get before, there seem ta be more issues.

I don't know the arm calling conventions, nor PascalScript well enough.

- intel/amd : Looks like they should work now.
- ARM is known NOT to work
- PPC is known only to compile for Mac (but not tested)

So I need someone to test on a PPC Mac, please.

And other tested
- Win 7 64 bit, fpc 2.6.1 (running 32 bit IDE)
- Ubuntu 12.10 / AMD 64 / fpc 2.7.1

Hosted on what OS? I can do Linux but wasn't aware of an alternative.

The code only worked for darwin, unless someone added support for linux procedure call. There isn't much difference between the two (iirc).

Henry

I thought it was something like that from when I tried it a week ago, but wanted to make sure it wasn't something I could usefully do.

[Slightly later] Still appears to be Darwin-only, unless I'm doing something wrong.

I don't have Darwin and don't even know whether I could run it on my G3 PPC Mac.

I thought apple ships them with IOS or whatever they call it? Basically it needs to be compiled for the carbon widgetset.

I do not know if previous OS by apple had different calling ABI. PascalScript currently only supports (or claims to) darwin 32 bit

But it needs to be tested, if that indeed works.

e.g. there is some arm in pascalscipt. And that did not work.

Lets see if it works for darwin.

Do you have a list (not a huge doc, just a few lines) where the ABI differ?

register usage. Stack align, ....

Well I have no idea even what the diff is between darwin, IOS, and all the other stuff apple did....

I also can't promise that I will be able to fix any of this.

I was able to find my way through the intel 64 bit stuff in pascal script. And I would give it a try. (but I do need stuff like ABI info (and I have no indent to read dozens of pages.) It is not my idea to maintain pascal script. But I would like it to work, where I can archive it with little effort, as it is used by the EditorMacro script.

The consequence si that only people with cectain CPU/OS will be able to use pascalScript macros in the IDE.

No, you will have to compare the documents yourself. I believe linux follows the sysv abi as specified by IBM, but there may be some deviations.

When I implemented the ARM version, I only had oabi operating systems (with softfloat) and fpc didn't even have working eabi support. That has changed now, and the code will have to be modified for armhf (with vfp3) using eabi to support most of the latest arm devices. This will be a more invasive change, though

Also note that I never used classes with pascalscript, so that probably never worked. I still find this exercise a bit crazy, though, since all this knowledge is already in the compiler, which could harness it to implement an "invoke" function, which would mean that pascalscript won't need any platform specific code.

Henry

I can check if you point me. I've still my mini (PPC OSX4), till last year is was able to run lazarus

Marc

Ok, currently unlikely, that I will go that far

Also note that I never used classes with pascalscript, so that probably never worked.

Yes self is ignored. I just queried info in another mail.

Would be nice.

And once that is provided by a released fpc....
But until then, I can either fix it this way. Or scrap the EditorMacroScript stuff.

My Mac's only got the proprietary Mac OS on it- in fact it might be OS 8 rather than OS 9- which doesn't have Darwin's unix-based architecture. My understanding is that this never has and never will be targeted by FPC.

I'm asking around to see if anybody's got a CD that will get me onto Darwin (AKA I believe OS X), or a reliable download source.

2012/12/7 Mark Morgan Lloyd :

My Mac's only got the proprietary Mac OS on it- in fact it might be OS 8 rather than OS 9- which doesn't have Darwin's unix-based architecture. My understanding is that this never has and never will be targeted by FPC.

Mac OS is irrelevant for Lazarus, but the compiler claims to support it: michael-ep3:~ fpcfan$ ppcppc -i
Free Pascal Compiler version 2.6.0

Compiler Date : 2012/01/23
Compiler CPU Target: powerpc

Supported targets:
Linux for PowerPC
Mac OS for PowerPC
Darwin for PowerPC
NetBSD for PowerPC (under development)
MorphOS
AmigaOS for PowerPC
Wii (under development)

Vincent

Please, Vincent: I've got enough problems at this end without getting sidetracked into another operating system :-)

Martin: you /really/ don't want me to follow that up. OK?

NO.

And I think there was a misunderstanding somewhere.

My goal was to get a subset (preferable a big subset) of EXISTING targets (targets that fpc already has) to run (run pascalscript on them).

I never intended to add new targets or something like that.

Also strictly I am only interested in targets, on which the Lazarus IDE will work.
( I have an extension to he IDE, than uses pascalscript. )

---
About Mac: I am not a MAc user, so I said, I did not know the naming of whatever runs on different MACs.

But the one I am interested, is the one, on which the IDE currently works.

I can assure you I wasn't dreaming of it :-)

Looks like I've got Mac OS 9.2.2. I'll check FPC on it at some point, but that's as far as I'm going.