define
lazarus / 61-Beginners

----------------------------------------------------------------------
peter2005 · 2018-07-07 10:15

I'm trying to convert some code from FPC to delphi and having trouble
to understand this line.

Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i {$define
setoverflow:= status :=status or OVERFLOW} 
setoverflow is defined but those multiple assigments confuse me.

Is this conditional compilation or not?

----------------------------------------------------------------------
taazz · 2018-07-07 10:31

I might be wrong but everything after overflow should be considered
comments they have no real contribution to the final definition.
Propably some kind of mnemonic on when or for what the setoverflow is
used.

----------------------------------------------------------------------
Thaddy · 2018-07-07 10:34

Quote from: peter2005 on July 07, 2018, 12:15:54 pmI'm trying to
convert some code from FPC to delphi and having trouble to understand
this line.

Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i {$define
setoverflow:= status :=status or OVERFLOW} 
setoverflow is defined but those multiple assigments confuse me.

Is this conditional compilation or not?

Delphi doesn't support macro's. You have to do it by hand.

----------------------------------------------------------------------
peter2005 · 2018-07-07 10:43

Quote from: taazz on July 07, 2018, 12:31:41 pmI might be wrong but
everything after overflow should be considered comments they have no
real contribution to the final definition. Propably some kind of
mnemonic on when or for what the setoverflow is used.

so what's the purpose of the line? just to define  setoverflow ? and
of what type?

----------------------------------------------------------------------
Thaddy · 2018-07-07 10:45

It just means that when the compiler encounters "setoverflow" it will
be replaced with "status :=status or OVERFLOW"
I suspect that OVERFLOW is also a macro...

----------------------------------------------------------------------
peter2005 · 2018-07-07 10:54

Quote from: Thaddy on July 07, 2018, 12:45:56 pmIt just means that
when the compiler encounters "setoverflow" it will be replaced with
"status :=status or OVERFLOW"

thank you

----------------------------------------------------------------------
Thaddy · 2018-07-07 11:02

Quote from: peter2005 on July 07, 2018, 12:54:50 pmQuote from: Thaddy
on July 07, 2018, 12:45:56 pmIt just means that when the compiler
encounters "setoverflow" it will be replaced with "status :=status or
OVERFLOW"

thank you 
Note that converting to Delphi may give you more head-aches than
converting Delphi to Lazarus.....