Skip to content
This repository was archived by the owner on Aug 31, 2021. It is now read-only.

Commit 15d87f8

Browse files
committed
LCB: Use "CDouble" instead of "double".
1 parent c766540 commit 15d87f8

4 files changed

Lines changed: 41 additions & 41 deletions

File tree

engine/src/widget.mlc

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -349,7 +349,7 @@ use com.livecode.engine
349349
// ---------- Widget commands ---------- //
350350

351351
public foreign handler MCWidgetExecRedrawAll() as undefined binds to "<builtin>"
352-
public foreign handler MCWidgetExecScheduleTimerIn(in pTime as double) as undefined binds to "<builtin>"
352+
public foreign handler MCWidgetExecScheduleTimerIn(in pTime as CDouble) as undefined binds to "<builtin>"
353353
public foreign handler MCWidgetExecCancelTimer() as undefined binds to "<builtin>"
354354
public foreign handler MCWidgetEvalInEditMode(out rInEditMode as bool) as undefined binds to "<builtin>"
355355
public foreign handler MCWidgetExecDispatch(in pIsFunction as bool, in pMessage as string) as any binds to "<builtin>"

libscript/src/arithmetic.mlc

Lines changed: 18 additions & 18 deletions
Original file line numberDiff line numberDiff line change
@@ -25,63 +25,63 @@ use com.livecode.foreign
2525
--
2626

2727
public foreign handler MCArithmeticExecAddIntegerToInteger(in Value as LCInteger, inout Target as LCInteger) as undefined binds to "<builtin>"
28-
public foreign handler MCArithmeticExecAddRealToReal(in Value as double, inout Target as double) as undefined binds to "<builtin>"
28+
public foreign handler MCArithmeticExecAddRealToReal(in Value as CDouble, inout Target as CDouble) as undefined binds to "<builtin>"
2929
public foreign handler MCArithmeticExecAddNumberToNumber(in Value as number, inout Target as number) as undefined binds to "<builtin>"
3030
public foreign handler MCArithmeticExecSubtractIntegerFromInteger(in Value as LCInteger, inout Target as LCInteger) as undefined binds to "<builtin>"
31-
public foreign handler MCArithmeticExecSubtractRealFromReal(in Value as double, inout Target as double) as undefined binds to "<builtin>"
31+
public foreign handler MCArithmeticExecSubtractRealFromReal(in Value as CDouble, inout Target as CDouble) as undefined binds to "<builtin>"
3232
public foreign handler MCArithmeticExecSubtractNumberFromNumber(in Value as number, inout Target as number) as undefined binds to "<builtin>"
3333
public foreign handler MCArithmeticExecMultiplyIntegerByInteger(inout Target as LCInteger, in Value as LCInteger) as undefined binds to "<builtin>"
34-
public foreign handler MCArithmeticExecMultiplyRealByReal(inout Target as double, in Value as double) as undefined binds to "<builtin>"
34+
public foreign handler MCArithmeticExecMultiplyRealByReal(inout Target as CDouble, in Value as CDouble) as undefined binds to "<builtin>"
3535
public foreign handler MCArithmeticExecMultiplyNumberByNumber(inout Target as number, in Value as number) as undefined binds to "<builtin>"
3636
public foreign handler MCArithmeticExecDivideIntegerByInteger(inout Target as LCInteger, in Value as LCInteger) as undefined binds to "<builtin>"
37-
public foreign handler MCArithmeticExecDivideRealByReal(inout Target as double, in Value as double) as undefined binds to "<builtin>"
37+
public foreign handler MCArithmeticExecDivideRealByReal(inout Target as CDouble, in Value as CDouble) as undefined binds to "<builtin>"
3838
public foreign handler MCArithmeticExecDivideNumberByNumber(inout Target as number, in Value as number) as undefined binds to "<builtin>"
3939

4040
public foreign handler MCArithmeticEvalPlusInteger(in Operand as LCInteger, out Value as LCInteger) as undefined binds to "<builtin>"
41-
public foreign handler MCArithmeticEvalPlusReal(in Operand as double, out Value as double) as undefined binds to "<builtin>"
41+
public foreign handler MCArithmeticEvalPlusReal(in Operand as CDouble, out Value as CDouble) as undefined binds to "<builtin>"
4242
public foreign handler MCArithmeticEvalPlusNumber(in Operand as number, out Value as number) as undefined binds to "<builtin>"
4343
public foreign handler MCArithmeticEvalMinusInteger(in Operand as LCInteger, out Value as LCInteger) as undefined binds to "<builtin>"
44-
public foreign handler MCArithmeticEvalMinusReal(in Operand as double, out Value as double) as undefined binds to "<builtin>"
44+
public foreign handler MCArithmeticEvalMinusReal(in Operand as CDouble, out Value as CDouble) as undefined binds to "<builtin>"
4545
public foreign handler MCArithmeticEvalMinusNumber(in Operand as number, out Value as number) as undefined binds to "<builtin>"
4646

4747
public foreign handler MCArithmeticEvalIntegerPlusInteger(in Left as LCInteger, in Right as LCInteger, out Value as LCInteger) as undefined binds to "<builtin>"
48-
public foreign handler MCArithmeticEvalRealPlusReal(in Left as double, in Right as double, out Value as double) as undefined binds to "<builtin>"
48+
public foreign handler MCArithmeticEvalRealPlusReal(in Left as CDouble, in Right as CDouble, out Value as CDouble) as undefined binds to "<builtin>"
4949
public foreign handler MCArithmeticEvalNumberPlusNumber(in Left as number, in Right as number, out Value as number) as undefined binds to "<builtin>"
5050
public foreign handler MCArithmeticEvalIntegerMinusInteger(in Left as LCInteger, in Right as LCInteger, out Value as LCInteger) as undefined binds to "<builtin>"
51-
public foreign handler MCArithmeticEvalRealMinusReal(in Left as double, in Right as double, out Value as double) as undefined binds to "<builtin>"
51+
public foreign handler MCArithmeticEvalRealMinusReal(in Left as CDouble, in Right as CDouble, out Value as CDouble) as undefined binds to "<builtin>"
5252
public foreign handler MCArithmeticEvalNumberMinusNumber(in Left as number, in Right as number, out Value as number) as undefined binds to "<builtin>"
5353
public foreign handler MCArithmeticEvalIntegerTimesInteger(in Left as LCInteger, in Right as LCInteger, out Value as LCInteger) as undefined binds to "<builtin>"
54-
public foreign handler MCArithmeticEvalRealTimesReal(in Left as double, in Right as double, out Value as double) as undefined binds to "<builtin>"
54+
public foreign handler MCArithmeticEvalRealTimesReal(in Left as CDouble, in Right as CDouble, out Value as CDouble) as undefined binds to "<builtin>"
5555
public foreign handler MCArithmeticEvalNumberTimesNumber(in Left as number, in Right as number, out Value as number) as undefined binds to "<builtin>"
5656
public foreign handler MCArithmeticEvalIntegerOverInteger(in Left as LCInteger, in Right as LCInteger, out Value as LCInteger) as undefined binds to "<builtin>"
57-
public foreign handler MCArithmeticEvalRealOverReal(in Left as double, in Right as double, out Value as double) as undefined binds to "<builtin>"
57+
public foreign handler MCArithmeticEvalRealOverReal(in Left as CDouble, in Right as CDouble, out Value as CDouble) as undefined binds to "<builtin>"
5858
public foreign handler MCArithmeticEvalNumberOverNumber(in Left as number, in Right as number, out Value as number) as undefined binds to "<builtin>"
5959

6060
public foreign handler MCArithmeticEvalIntegerModInteger(in Left as LCInteger, in Right as LCInteger, out Value as LCInteger) as undefined binds to "<builtin>"
61-
public foreign handler MCArithmeticEvalRealModReal(in Left as double, in Right as double, out Value as double) as undefined binds to "<builtin>"
61+
public foreign handler MCArithmeticEvalRealModReal(in Left as CDouble, in Right as CDouble, out Value as CDouble) as undefined binds to "<builtin>"
6262
public foreign handler MCArithmeticEvalNumberModNumber(in Left as number, in Right as number, out Value as number) as undefined binds to "<builtin>"
6363
public foreign handler MCArithmeticEvalIntegerWrapInteger(in Left as LCInteger, in Right as LCInteger, out Value as LCInteger) as undefined binds to "<builtin>"
64-
public foreign handler MCArithmeticEvalRealWrapReal(in Left as double, in Right as double, out Value as double) as undefined binds to "<builtin>"
64+
public foreign handler MCArithmeticEvalRealWrapReal(in Left as CDouble, in Right as CDouble, out Value as CDouble) as undefined binds to "<builtin>"
6565
public foreign handler MCArithmeticEvalNumberWrapNumber(in Left as number, in Right as number, out Value as number) as undefined binds to "<builtin>"
6666

6767
public foreign handler MCArithmeticEvalIntegerIsGreaterThanInteger(in Left as LCInteger, in Right as LCInteger, out Value as bool) as undefined binds to "<builtin>"
68-
public foreign handler MCArithmeticEvalRealIsGreaterThanReal(in Left as double, in Right as double, out Value as bool) as undefined binds to "<builtin>"
68+
public foreign handler MCArithmeticEvalRealIsGreaterThanReal(in Left as CDouble, in Right as CDouble, out Value as bool) as undefined binds to "<builtin>"
6969
public foreign handler MCArithmeticEvalNumberIsGreaterThanNumber(in Left as number, in Right as number, out Value as bool) as undefined binds to "<builtin>"
7070
public foreign handler MCArithmeticEvalIntegerIsGreaterThanOrEqualToInteger(in Left as LCInteger, in Right as LCInteger, out Value as bool) as undefined binds to "<builtin>"
71-
public foreign handler MCArithmeticEvalRealIsGreaterThanOrEqualToReal(in Left as double, in Right as double, out Value as bool) as undefined binds to "<builtin>"
71+
public foreign handler MCArithmeticEvalRealIsGreaterThanOrEqualToReal(in Left as CDouble, in Right as CDouble, out Value as bool) as undefined binds to "<builtin>"
7272
public foreign handler MCArithmeticEvalNumberIsGreaterThanOrEqualToNumber(in Left as number, in Right as number, out Value as bool) as undefined binds to "<builtin>"
7373
public foreign handler MCArithmeticEvalIntegerIsLessThanInteger(in Left as LCInteger, in Right as LCInteger, out Value as bool) as undefined binds to "<builtin>"
74-
public foreign handler MCArithmeticEvalRealIsLessThanReal(in Left as double, in Right as double, out Value as bool) as undefined binds to "<builtin>"
74+
public foreign handler MCArithmeticEvalRealIsLessThanReal(in Left as CDouble, in Right as CDouble, out Value as bool) as undefined binds to "<builtin>"
7575
public foreign handler MCArithmeticEvalNumberIsLessThanNumber(in Left as number, in Right as number, out Value as bool) as undefined binds to "<builtin>"
7676
public foreign handler MCArithmeticEvalIntegerIsLessThanOrEqualToInteger(in Left as LCInteger, in Right as LCInteger, out Value as bool) as undefined binds to "<builtin>"
77-
public foreign handler MCArithmeticEvalRealIsLessThanOrEqualToReal(in Left as double, in Right as double, out Value as bool) as undefined binds to "<builtin>"
77+
public foreign handler MCArithmeticEvalRealIsLessThanOrEqualToReal(in Left as CDouble, in Right as CDouble, out Value as bool) as undefined binds to "<builtin>"
7878
public foreign handler MCArithmeticEvalNumberIsLessThanOrEqualToNumber(in Left as number, in Right as number, out Value as bool) as undefined binds to "<builtin>"
7979

8080
public foreign handler MCArithmeticEvalEqualToInteger(in Left as LCInteger, in Right as LCInteger, out Value as bool) as undefined binds to "<builtin>"
81-
public foreign handler MCArithmeticEvalEqualToReal(in Left as double, in Right as double, out Value as bool) as undefined binds to "<builtin>"
81+
public foreign handler MCArithmeticEvalEqualToReal(in Left as CDouble, in Right as CDouble, out Value as bool) as undefined binds to "<builtin>"
8282
public foreign handler MCArithmeticEvalEqualToNumber(in Left as number, in Right as number, out Value as bool) as undefined binds to "<builtin>"
8383
public foreign handler MCArithmeticEvalNotEqualToInteger(in Left as LCInteger, in Right as LCInteger, out Value as bool) as undefined binds to "<builtin>"
84-
public foreign handler MCArithmeticEvalNotEqualToReal(in Left as double, in Right as double, out Value as bool) as undefined binds to "<builtin>"
84+
public foreign handler MCArithmeticEvalNotEqualToReal(in Left as CDouble, in Right as CDouble, out Value as bool) as undefined binds to "<builtin>"
8585
public foreign handler MCArithmeticEvalNotEqualToNumber(in Left as number, in Right as number, out Value as bool) as undefined binds to "<builtin>"
8686

8787
public foreign handler MCArithmeticEvalNumberFormattedAsString(in Target as number, out Value as string) as undefined binds to "<builtin>"

libscript/src/math-foundation.mlc

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -22,18 +22,18 @@ module com.livecode.mathfoundation
2222

2323
use com.livecode.foreign
2424

25-
public foreign handler MCMathFoundationExecRoundRealToNearest(inout Target as double) as undefined binds to "<builtin>"
25+
public foreign handler MCMathFoundationExecRoundRealToNearest(inout Target as CDouble) as undefined binds to "<builtin>"
2626
public foreign handler MCMathFoundationExecRoundNumberToNearest(inout Target as number) as undefined binds to "<builtin>"
2727

28-
public foreign handler MCMathFoundationEvalRoundedRealToNearest(in Target as double, out Value as double) as undefined binds to "<builtin>"
28+
public foreign handler MCMathFoundationEvalRoundedRealToNearest(in Target as CDouble, out Value as CDouble) as undefined binds to "<builtin>"
2929
public foreign handler MCMathFoundationEvalRoundedNumberToNearest(in Target as number, out Value as number) as undefined binds to "<builtin>"
3030

31-
public foreign handler MCMathFoundationEvalFloorReal(in Target as double, out Value as double) as undefined binds to "<builtin>"
31+
public foreign handler MCMathFoundationEvalFloorReal(in Target as CDouble, out Value as CDouble) as undefined binds to "<builtin>"
3232
public foreign handler MCMathFoundationEvalFloorNumber(in Target as number, out Value as number) as undefined binds to "<builtin>"
33-
public foreign handler MCMathFoundationEvalCeilingReal(in Target as double, out Value as double) as undefined binds to "<builtin>"
33+
public foreign handler MCMathFoundationEvalCeilingReal(in Target as CDouble, out Value as CDouble) as undefined binds to "<builtin>"
3434
public foreign handler MCMathFoundationEvalCeilingNumber(in Target as number, out Value as number) as undefined binds to "<builtin>"
3535

36-
public foreign handler MCMathFoundationEvalPi(out Value as double) as undefined binds to "<builtin>"
36+
public foreign handler MCMathFoundationEvalPi(out Value as CDouble) as undefined binds to "<builtin>"
3737
--
3838

3939
//public constant pi = 3.14159265358979323846
@@ -156,4 +156,4 @@ begin
156156
MCMathFoundationEvalCeilingNumber(Target, output)
157157
end syntax
158158

159-
end module
159+
end module

0 commit comments

Comments
 (0)