Hi, I'd like to ask whether is it possible to exit program in case of runtime error 202 for example more nicely than with message runtime error 202 at a1d456d5621blablabla
For example:
writeln('starting to divide:');
writeln(2/0);
and I don't want mi program to stop with runtime error but I 'd like to write to screen something like: writeln('program has atempted to divide by zero enter another expression.'); old tp had a special procedure exitproc which allowed to set which code should be executed before terminating in case of run-time error. I mean code which will close opened files or something like that or it could write to logfile the reason of error.
Thanx in advance
Pianoman----- Original Message ----- From: <[EMAIL PROTECTED]>
To: <fpc-pascal@lists.freepascal.org>
Sent: Friday, June 23, 2006 5:32 AM
Subject: fpc-pascal Digest, Vol 22, Issue 11


Send fpc-pascal mailing list submissions to
fpc-pascal@lists.freepascal.org

To subscribe or unsubscribe via the World Wide Web, visit
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
or, via email, send a message with subject or body 'help' to
[EMAIL PROTECTED]

You can reach the person managing the list at
[EMAIL PROTECTED]

When replying, please edit your Subject line so it is more specific
than "Re: Contents of fpc-pascal digest..."


Today's Topics:

  1. Re:  Internal error 200203271 (Steve Williams)
  2. Re:  Internal error 200203271 (Marco van de Voort)
  3. Re:  Internal error 200203271 (Steve Williams)
  4. Re:  Internal error 200203271 (Steve Williams)
  5. Re:  Internal error 200203271 (Peter Vreman)
  6. Re:  Internal error 200203271 (Marco van de Voort)
  7.  Modify XML Document (Felipe Monteiro de Carvalho)
  8. Re:  Modify XML Document (Tony Pelton)


----------------------------------------------------------------------

Message: 1
Date: Thu, 22 Jun 2006 20:30:33 +1000
From: Steve Williams <[EMAIL PROTECTED]>
Subject: Re: [fpc-pascal] Internal error 200203271
To: FPC-Pascal users discussions <fpc-pascal@lists.freepascal.org>
Message-ID: <[EMAIL PROTECTED]>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed

Steve Williams wrote:
Koenraad Lelong wrote:

Hi,
When I ty to compile fpc-svn for arm-linux it stops with Internal error
200203271 when buildgtk2.pp/gtkspinbutton.inc is compiled.



Was there a solution for this?  I've just come across this error now
while trying to build fpc-svn for arm-linux as well.  I'm using the
following command line on Win32 from the root of the fpc source tree.

make all OS_TARGET=linux CPU_TARGET=arm
CROSSBINDIR=c:\devkitpro\devkitgp2x\bin BINUTILSPREFIX=arm-linux-


I want to make sure I have this right.  I wish to build ppcarm.exe that
runs on Win32 and will create an arm-linux ELF.  Is OS_TARGET and
CPU_TARGET as used above correct?  Or do I use PPC_TARGET=arm?  Is there
any documentation on these parameters?  The Build FAQ gives an example
of building a compiler to run on another system.  I want to build a
compiler to run on my system that can build executables for another system.

--
Sly



This message and its attachments may contain legally privileged or confidential information. This message is intended for the use of the individual or entity to which it is addressed. If you are not the addressee indicated in this message, or the employee or agent responsible for delivering the message to the intended recipient, you may not copy or deliver this message or its attachments to anyone. Rather, you should permanently delete this message and its attachments and kindly notify the sender by reply e-mail. Any content of this message and its attachments, which does not relate to the official business of the sending company must be taken not to have been sent or endorsed by the sending company or any of its related entities. No warranty is made that the e-mail or attachment(s) are free from computer virus or other defect.


------------------------------

Message: 2
Date: Thu, 22 Jun 2006 13:28:31 +0200 (CEST)
From: [EMAIL PROTECTED] (Marco van de Voort)
Subject: Re: [fpc-pascal] Internal error 200203271
To: FPC-Pascal users discussions <fpc-pascal@lists.freepascal.org>
Message-ID: <[EMAIL PROTECTED]>
Content-Type: text/plain; charset="US-ASCII"

> Was there a solution for this?  I've just come across this error now
> while trying to build fpc-svn for arm-linux as well.  I'm using the
> following command line on Win32 from the root of the fpc source tree.
>
> make all OS_TARGET=linux CPU_TARGET=arm
> CROSSBINDIR=c:\devkitpro\devkitgp2x\bin BINUTILSPREFIX=arm-linux-
>

I want to make sure I have this right.  I wish to build ppcarm.exe that
runs on Win32 and will create an arm-linux ELF.  Is OS_TARGET and
CPU_TARGET as used above correct?  Or do I use PPC_TARGET=arm?  Is there
any documentation on these parameters?  The Build FAQ gives an example
of building a compiler to run on another system.  I want to build a
compiler to run on my system that can build executables for another system.

Try make cycle instead rest the same.

If you want to do it using make all that is all possible, but then you
probably also need a OPT='-darm'


------------------------------

Message: 3
Date: Thu, 22 Jun 2006 23:00:34 +1000
From: Steve Williams <[EMAIL PROTECTED]>
Subject: Re: [fpc-pascal] Internal error 200203271
To: FPC-Pascal users discussions <fpc-pascal@lists.freepascal.org>
Message-ID: <[EMAIL PROTECTED]>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed

Marco van de Voort wrote:
Was there a solution for this?  I've just come across this error now
while trying to build fpc-svn for arm-linux as well.  I'm using the
following command line on Win32 from the root of the fpc source tree.

make all OS_TARGET=linux CPU_TARGET=arm
CROSSBINDIR=c:\devkitpro\devkitgp2x\bin BINUTILSPREFIX=arm-linux-


I want to make sure I have this right.  I wish to build ppcarm.exe that
runs on Win32 and will create an arm-linux ELF.  Is OS_TARGET and
CPU_TARGET as used above correct?  Or do I use PPC_TARGET=arm?  Is there
any documentation on these parameters?  The Build FAQ gives an example
of building a compiler to run on another system.  I want to build a
compiler to run on my system that can build executables for another system.


Try make cycle instead rest the same.

If you want to do it using make all that is all possible, but then you
probably also need a OPT='-darm'


There is no 'make cycle' target at the root of the fpc source tree.
Tried the OPT='-darm' option, but now it stops with the error "ONLY one
of the switches for the CPU type must be defined" because make puts
-di386 in there.

This is the command line.
d:\fpc>make all OS_TARGET=linux CPU_TARGET=arm
CROSSBINDIR=c:\devkitpro\devkitgp2x\bin BINUTILSPREFIX=arm-linux-
OPT='-darm'

I can get a ppcarm.exe compiled by using PPC_TARGET=arm, but I still
need to get the arm-linux units compiled.

--
Sly



This message and its attachments may contain legally privileged or confidential information. This message is intended for the use of the individual or entity to which it is addressed. If you are not the addressee indicated in this message, or the employee or agent responsible for delivering the message to the intended recipient, you may not copy or deliver this message or its attachments to anyone. Rather, you should permanently delete this message and its attachments and kindly notify the sender by reply e-mail. Any content of this message and its attachments, which does not relate to the official business of the sending company must be taken not to have been sent or endorsed by the sending company or any of its related entities. No warranty is made that the e-mail or attachment(s) are free from computer virus or other defect.


------------------------------

Message: 4
Date: Fri, 23 Jun 2006 00:27:21 +1000
From: Steve Williams <[EMAIL PROTECTED]>
Subject: Re: [fpc-pascal] Internal error 200203271
To: FPC-Pascal users discussions <fpc-pascal@lists.freepascal.org>
Message-ID: <[EMAIL PROTECTED]>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed

Steve Williams wrote:
Marco van de Voort wrote:

Try make cycle instead rest the same.

If you want to do it using make all that is all possible, but then you
probably also need a OPT='-darm'



There is no 'make cycle' target at the root of the fpc source tree.
Tried the OPT='-darm' option, but now it stops with the error "ONLY one
of the switches for the CPU type must be defined" because make puts
-di386 in there.

This is the command line.
d:\fpc>make all OS_TARGET=linux CPU_TARGET=arm
CROSSBINDIR=c:\devkitpro\devkitgp2x\bin BINUTILSPREFIX=arm-linux-
OPT='-darm'

I can get a ppcarm.exe compiled by using PPC_TARGET=arm, but I still
need to get the arm-linux units compiled.


Without OPT='-darm', still get the internal error 200203271 on
gtkspinbutton.inc(267,4).  Trying again with
OPT='-dGTK_DISABLE_DEPRECATED', but it will be about an hour before make
gets to that point in the build again.

--
Sly



This message and its attachments may contain legally privileged or confidential information. This message is intended for the use of the individual or entity to which it is addressed. If you are not the addressee indicated in this message, or the employee or agent responsible for delivering the message to the intended recipient, you may not copy or deliver this message or its attachments to anyone. Rather, you should permanently delete this message and its attachments and kindly notify the sender by reply e-mail. Any content of this message and its attachments, which does not relate to the official business of the sending company must be taken not to have been sent or endorsed by the sending company or any of its related entities. No warranty is made that the e-mail or attachment(s) are free from computer virus or other defect.


------------------------------

Message: 5
Date: Thu, 22 Jun 2006 18:34:33 +0200
From: Peter Vreman <[EMAIL PROTECTED]>
Subject: Re: [fpc-pascal] Internal error 200203271
To: FPC-Pascal users discussions <fpc-pascal@lists.freepascal.org>
Message-ID: <[EMAIL PROTECTED]>
Content-Type: text/plain; charset="us-ascii"; format=flowed

At 12:30 22-6-2006, you wrote:
Steve Williams wrote:
Koenraad Lelong wrote:

Hi,
When I ty to compile fpc-svn for arm-linux it stops with Internal
error 200203271 when buildgtk2.pp/gtkspinbutton.inc is compiled.



Was there a solution for this?  I've just come across this error
now while trying to build fpc-svn for arm-linux as well.  I'm using
the following command line on Win32 from the root of the fpc source tree.

make all OS_TARGET=linux CPU_TARGET=arm
CROSSBINDIR=c:\devkitpro\devkitgp2x\bin BINUTILSPREFIX=arm-linux-


I want to make sure I have this right.  I wish to build ppcarm.exe
that runs on Win32 and will create an arm-linux ELF.  Is OS_TARGET
and CPU_TARGET as used above correct?  Or do I use
PPC_TARGET=arm?  Is there any documentation on these
parameters?  The Build FAQ gives an example of building a compiler
to run on another system.  I want to build a compiler to run on my
system that can build executables for another system.

The commandline is correct. It will give you both a cross compiler
called ppcrossarm and a native compiler called ppcarm.

The IE is a code generation bug. That needs to be debugged. You can
compile with OPT='-gl -dEXTDEBUG' to get a backtrace were the IE
happends in the compiler.


Peter



------------------------------

Message: 6
Date: Thu, 22 Jun 2006 22:37:18 +0200 (CEST)
From: [EMAIL PROTECTED] (Marco van de Voort)
Subject: Re: [fpc-pascal] Internal error 200203271
To: FPC-Pascal users discussions <fpc-pascal@lists.freepascal.org>
Message-ID: <[EMAIL PROTECTED]>
Content-Type: text/plain; charset="US-ASCII"

>PPC_TARGET=arm?  Is there any documentation on these
>parameters?  The Build FAQ gives an example of building a compiler
>to run on another system.  I want to build a compiler to run on my
>system that can build executables for another system.

The commandline is correct. It will give you both a cross compiler
called ppcrossarm and a native compiler called ppcarm.

The IE is a code generation bug. That needs to be debugged. You can
compile with OPT='-gl -dEXTDEBUG' to get a backtrace were the IE
happends in the compiler.

make[6]: Entering directory :/repo/fpcex/packages/extra/gtk/gtkgl'
D:/repo/fpcex/compiler/ppcrossarm.exe -Tlinux -Parm -XParm-linux- -Xc -Xr
-XX -C
X -Ur -Xs -O2 -n -FuD:/repo/fpcex/rtl/units/arm-linux
-FuD:/repo/fpcex/packages/
extra/x11/units/arm-linux
-FuD:/repo/fpcex/packages/extra/opengl/units/arm-linux
-FDd:\repo\cross\arm-linux -FE.
-FUD:/repo/fpcex/packages/extra/gtk/units/arm-l
inux -dEXTDEBUG -gl -darm -dRELEASE  gtkglarea.pp
D:\repo\fpcex\packages\extra\gtk\units\arm-linux\gtkglarea.sl
d:\repo\cross\arm-linux\arm-linux-ar.exe: creating
D:\repo\fpcex\packages\extra\
gtk\units\arm-linux\libpgtkglarea.a
D:\repo\fpcex\packages\extra\gtk\units\arm-linux\gtkglarea.sl
Max Memory used/heapsize: 13.791/14.592 Kb
make[6]: Leaving directory :/repo/fpcex/packages/extra/gtk/gtkgl'
make[5]: Leaving directory :/repo/fpcex/packages/extra/gtk'
make[4]: Leaving directory :/repo/fpcex/packages/extra/gtk'
make -C gtk2 smart
make[4]: Entering directory :/repo/fpcex/packages/extra/gtk2'
make all LINKSMART=1 CREATESMART=1
make[5]: Entering directory :/repo/fpcex/packages/extra/gtk2'
d:/pp11/bin/i386-win32/gmkdir.exe -p units/arm-linux
D:/repo/fpcex/compiler/ppcrossarm.exe -Tlinux -Parm -XParm-linux- -Xc -Xr
-XX -C
X -Ur -Xs -O2 -n -Fuglib -Fuatk -Fupango -Fugtk+/gdk-pixbuf -Fugtk+/gdk
-Fugtk+/
gtk -Fulibglade -Fugtkglext -FuD:/repo/fpcex/rtl/units/arm-linux
-FDd:\repo\cros
s\arm-linux -FE. -FUunits/arm-linux -dEXTDEBUG -gl -darm -dRELEASE
buildgtk2.pp

units\arm-linux\glib2.sl
d:\repo\cross\arm-linux\arm-linux-ar.exe: creating
units\arm-linux\libpglib2.a
units\arm-linux\glib2.sl
units\arm-linux\atk.sl
d:\repo\cross\arm-linux\arm-linux-ar.exe: creating units\arm-linux\libpatk.a
units\arm-linux\atk.sl
units\arm-linux\pango.sl
d:\repo\cross\arm-linux\arm-linux-ar.exe: creating
units\arm-linux\libppango.a
units\arm-linux\pango.sl
units\arm-linux\gdk2pixbuf.sl
d:\repo\cross\arm-linux\arm-linux-ar.exe: creating
units\arm-linux\libpgdk2pixbu
f.a
units\arm-linux\gdk2pixbuf.sl
units\arm-linux\gdk2.sl
d:\repo\cross\arm-linux\arm-linux-ar.exe: creating
units\arm-linux\libpgdk2.a
units\arm-linux\gdk2.sl
gtkspinbutton.inc(267,4) Fatal: Internal error 200203271
 $004DF30F  SECONDPASS,  line 175 of pass_2.pas
 $0049DA27  DO_GENERATE_CODE,  line 1274 of psub.pas
 $0049DFD9  READ_DECLARATIONS,  line 1584 of psub.pas
 $00447E2D  COMPILE,  line 422 of parser.pas
 $0049122A  TPPUMODULE__LOADPPU,  line 1411 of fppu.pas
 $00499C5F  LOADUNITS,  line 602 of pmodules.pas
 $0049A55A  PROC_UNIT,  line 918 of pmodules.pas
 $00447E2D  COMPILE,  line 422 of parser.pas
 $0041C985  COMPILE,  line 375 of compiler.pas
Fatal: Compilation aborted
Max Memory used/heapsize: 33.348/34.304 Kb
make[5]: *** [buildgtk2.ppu] Error 1
make[5]: Leaving directory :/repo/fpcex/packages/extra/gtk2'
make[4]: *** [fpc_smart] Error 2
make[4]: Leaving directory :/repo/fpcex/packages/extra/gtk2'
make[3]: *** [gtk2_smart] Error 2
make[3]: Leaving directory :/repo/fpcex/packages/extra'
make[2]: *** [extra_smart] Error 2
make[2]: Leaving directory :/repo/fpcex/packages'
make[1]: *** [packages_extra_smart] Error 2
make[1]: Leaving directory :/repo/fpcex'
make: *** [build-stamp.arm-linux] Error 2


------------------------------

Message: 7
Date: Thu, 22 Jun 2006 23:46:10 -0300
From: "Felipe Monteiro de Carvalho"
<[EMAIL PROTECTED]>
Subject: [fpc-pascal] Modify XML Document
To: "FPC-Pascal users discussions" <fpc-pascal@lists.freepascal.org>
Message-ID:
<[EMAIL PROTECTED]>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed

Hello,

I am trying to use the units XMLRead, XMLWrite, DOM to modify the
structure of a XML file.

Reading the XML file is very easy and works very well, but I am lost
about how to modify it´s structure. Specifically I want to add a new
"brother" to a node. I try to create a DomNode and then add it, but I
cannot change the NodeName property. So how can I change the name of a
newly created node??

Also, how can I add a new Attribute to a DomNode??

The following code will give an error because NodeName is read-only:

var
 NovoNo: TDomNode;
begin
   Posicao := TreeView1.Selected.Index;

   NovoNo := TDomNode.Create(XMLDoc);
   NovoNo.NodeName := 'categoria';
   XMLDoc.DocumentElement.InsertBefore(NovoNo,
    XMLDoc.DocumentElement.ChildNodes.Item[Posicao]);

I looked at the examples on fpcsrc, but there are only very basic ones
about xml.

Any help e very welcome.

thanks a lot,
--
Felipe Monteiro de Carvalho


------------------------------

Message: 8
Date: Thu, 22 Jun 2006 23:31:15 -0400
From: "Tony Pelton" <[EMAIL PROTECTED]>
Subject: Re: [fpc-pascal] Modify XML Document
To: "FPC-Pascal users discussions" <fpc-pascal@lists.freepascal.org>
Message-ID:
<[EMAIL PROTECTED]>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed

On 6/22/06, Felipe Monteiro de Carvalho
<[EMAIL PROTECTED]> wrote:

-- snip TDOCDocument interface source from FPC 2.0.2 --
TDOMDocument = class(TDOMNode_WithChildren)
 protected
   FDocType: TDOMDocumentType;
   FImplementation: TDOMImplementation;
   function GetDocumentElement: TDOMElement;
 public
   property DocType: TDOMDocumentType read FDocType;
   property Impl: TDOMImplementation read FImplementation;
   property DocumentElement: TDOMElement read GetDocumentElement;

   function CreateElement(const tagName: DOMString): TDOMElement; virtual;
   function CreateDocumentFragment: TDOMDocumentFragment;
   function CreateTextNode(const data: DOMString): TDOMText;
   function CreateComment(const data: DOMString): TDOMComment;
   function CreateCDATASection(const data: DOMString): TDOMCDATASection;
     virtual;
   function CreateProcessingInstruction(const target, data: DOMString):
     TDOMProcessingInstruction; virtual;
   function CreateAttribute(const name: DOMString): TDOMAttr; virtual;
function CreateEntityReference(const name: DOMString): TDOMEntityReference;
     virtual;
   // Free NodeList with TDOMNodeList.Release!
   function GetElementsByTagName(const tagname: DOMString): TDOMNodeList;

   // Extensions to DOM interface:
   constructor Create;
   function CreateEntity(const data: DOMString): TDOMEntity;
 end;
-- snip --

it's been a bit since i played with the FPC implementation of the XML
stuff, but i've done quite a bit of work with DOM in Java.

i've included the interface from dom.pp in the 2.0.2 source above for reference.

first thing, you need to understand is that TDOMDocument is the
"handle" to the DOM.

so you need to start with an instance of one of these, either by
creating one, or by "loading" an XML document.

from there, you ...

a) create "nodes" by calling methods on the TDOMDocument (the parent
of all nodes).

i included some of the specific and more common methods from
TDOMDocument below, such as the <CreateElement> function, and the
<CreateAttribute> function for instance.

-- snip --
   function CreateElement(const tagName: DOMString): TDOMElement; virtual;
   function CreateTextNode(const data: DOMString): TDOMText;
   function CreateCDATASection(const data: DOMString): TDOMCDATASection;
     virtual;
   function CreateAttribute(const name: DOMString): TDOMAttr; virtual;
-- snip --

again, you call these on a properly created instance of the
TDOMDocument ... because nodes must be "owned" by a document.

b) once you have a node, and you've mutated it (set its value etc ...)
to your liking, you can then parent it into the XMLDocument by walking
the DOM ( getChildren() etc ...) until you get to a node that you want
to attach your newly created node to, as a child or sibling or what
have you.

you create attributes in the same way, by calling methods on the
TDOMDocument, which return instances of the attribute class, and then
they can be attached to a node in the tree as required, becoming an
attribute of that node.

you never instantiate nodes and attributes directly, at least not ime.

Felipe Monteiro de Carvalho

Tony

--
X-SA user ? 0.5.1 is out !
XData 0.1 for X-SA is out !
http://x-plane.dsrts.com


------------------------------

_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

End of fpc-pascal Digest, Vol 22, Issue 11
******************************************


_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to