Commit 978b112

Lev ZeninLev Zenin

Lev Zenin

authored and

Lev Zenin

committed

Some small fixes

One more step #7 to remove assembler

1 parent a5a7b69 commit 978b112Copy full SHA for 978b112

File tree

-6

lines changed

-6

lines changed

Lines changed: 1 addition & 1 deletion

Original file line number	Diff line number	Diff line change
`@@ -42,7 +42,7 @@ var`
`42`	`42`	`begin`
`43`	`43`	`if zend_parse_method_parameters(1, TSRMLS_DC, this_ptr, 'z', @p) = 0 then`
`44`	`44`	`begin`
`45`		`- ZVAL_STRING(z,'🐆🐆🐆 .-=WPD=-. 🐆🐆🐆',true);`
	`45`	`+ ZVAL_STRINGW(p,'🐆🐆🐆 .-=WPD=-. 🐆🐆🐆',true);`
`46`	`46`	`end;`
`47`	`47`	`end;`
`48`	`48`	`begin`

Lines changed: 0 additions & 1 deletion

Original file line number	Diff line number	Diff line change
`@@ -1530,7 +1530,6 @@ procedure VariantToZend(const Value:Variant;z:pzval;`
`1530`	`1530`	`cobj: TObjectAConvertMethod=nil);`
`1531`	`1531`	`var`
`1532`	`1532`	`W : WideString;`
`1533`		`- S: String;`
`1534`	`1533`	`begin`
`1535`	`1534`	`if VarIsEmpty(value) or VarIsNull(Value) then`
`1536`	`1535`	`begin`

Lines changed: 1 addition & 4 deletions

Original file line number	Diff line number	Diff line change
`@@ -1616,10 +1616,7 @@ procedure TPHPEngine.PrepareIniEntry;`
`1616`	`1616`
`1617`	`1617`	`if FHandleErrors then`
`1618`	`1618`	`begin`
`1619`		`- // p := integer(GetProcAddress(PHPLib, 'zend_do_print'));`
`1620`		`- p := GetProcAddress(PHPLib, 'zend_error_cb');`
`1621`		`- p2 := @delphi_error_cb;`
`1622`		`- Move(p, p2, 1);`
	`1619`	`+ ppointer(GetProcAddress(PHPLib, 'zend_error_cb'))^ := @delphi_error_cb;`
`1623`	`1620`	`end;`
`1624`	`1621`	`{$IFNDEF PHP540}`
`1625`	`1622`	`if FSafeMode then`

Comments

(0)