mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-11 03:45:06 -05:00
Committing a new smart... it has some bug fixes, plus its open source. Experimenting with ps bugs too...
git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@449 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
BenLand100
parent
c0a68352af
commit
bbd9f73942
Binary file not shown.
Binary file not shown.
@ -10,7 +10,7 @@
|
||||
<TargetFileExt Value=""/>
|
||||
<Title Value="Simba"/>
|
||||
<UseXPManifest Value="True"/>
|
||||
<ActiveEditorIndexAtStart Value="1"/>
|
||||
<ActiveEditorIndexAtStart Value="5"/>
|
||||
</General>
|
||||
<VersionInfo>
|
||||
<ProjectVersion Value=""/>
|
||||
@ -26,7 +26,7 @@
|
||||
<RunParams>
|
||||
<local>
|
||||
<FormatVersion Value="1"/>
|
||||
<LaunchingApplication PathPlusParams="/usr/bin/gnome-terminal -t 'Lazarus Run Output' -e '$(LazarusDir)/tools/runwait.sh $(TargetCmdLine)'"/>
|
||||
<LaunchingApplication Use="True" PathPlusParams="/usr/bin/gnome-terminal -t 'Lazarus Run Output' -e '$(LazarusDir)/tools/runwait.sh $(TargetCmdLine)'"/>
|
||||
</local>
|
||||
</RunParams>
|
||||
<RequiredPackages Count="2">
|
||||
@ -38,16 +38,14 @@
|
||||
<PackageName Value="LCL"/>
|
||||
</Item2>
|
||||
</RequiredPackages>
|
||||
<Units Count="289">
|
||||
<Units Count="291">
|
||||
<Unit0>
|
||||
<Filename Value="project1.lpr"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<UnitName Value="project1"/>
|
||||
<CursorPos X="3" Y="36"/>
|
||||
<TopLine Value="15"/>
|
||||
<EditorIndex Value="9"/>
|
||||
<UsageCount Value="205"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit0>
|
||||
<Unit1>
|
||||
<Filename Value="unit1.pas"/>
|
||||
@ -141,9 +139,9 @@
|
||||
<HasResources Value="True"/>
|
||||
<ResourceBaseClass Value="Form"/>
|
||||
<UnitName Value="TestUnit"/>
|
||||
<CursorPos X="6" Y="549"/>
|
||||
<TopLine Value="731"/>
|
||||
<EditorIndex Value="14"/>
|
||||
<CursorPos X="3" Y="1550"/>
|
||||
<TopLine Value="1548"/>
|
||||
<EditorIndex Value="8"/>
|
||||
<UsageCount Value="202"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit13>
|
||||
@ -203,7 +201,7 @@
|
||||
<UnitName Value="MufasaTypes"/>
|
||||
<CursorPos X="20" Y="32"/>
|
||||
<TopLine Value="26"/>
|
||||
<EditorIndex Value="4"/>
|
||||
<EditorIndex Value="11"/>
|
||||
<UsageCount Value="201"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit21>
|
||||
@ -270,8 +268,8 @@
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<UnitName Value="mmlpsthread"/>
|
||||
<CursorPos X="76" Y="571"/>
|
||||
<TopLine Value="537"/>
|
||||
<CursorPos X="27" Y="344"/>
|
||||
<TopLine Value="318"/>
|
||||
<EditorIndex Value="1"/>
|
||||
<UsageCount Value="202"/>
|
||||
<Loaded Value="True"/>
|
||||
@ -279,9 +277,9 @@
|
||||
<Unit31>
|
||||
<Filename Value="../../Units/PascalScript/uPSComponent.pas"/>
|
||||
<UnitName Value="uPSComponent"/>
|
||||
<CursorPos X="12" Y="918"/>
|
||||
<TopLine Value="903"/>
|
||||
<UsageCount Value="20"/>
|
||||
<CursorPos X="2" Y="675"/>
|
||||
<TopLine Value="669"/>
|
||||
<UsageCount Value="21"/>
|
||||
</Unit31>
|
||||
<Unit32>
|
||||
<Filename Value="../../../FPC/FPCCheckout/rtl/objpas/classes/classesh.inc"/>
|
||||
@ -372,9 +370,11 @@
|
||||
<Unit45>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/bitmap.inc"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<CursorPos X="10" Y="170"/>
|
||||
<TopLine Value="170"/>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<TopLine Value="1"/>
|
||||
<EditorIndex Value="15"/>
|
||||
<UsageCount Value="201"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit45>
|
||||
<Unit46>
|
||||
<Filename Value="../../../FPC/FPCCheckout/packages/fcl-image/src/fpcanvas.inc"/>
|
||||
@ -491,11 +491,9 @@
|
||||
</Unit62>
|
||||
<Unit63>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/mouse.inc"/>
|
||||
<CursorPos X="11" Y="26"/>
|
||||
<TopLine Value="12"/>
|
||||
<EditorIndex Value="8"/>
|
||||
<UsageCount Value="20"/>
|
||||
<Loaded Value="True"/>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<TopLine Value="1"/>
|
||||
<UsageCount Value="21"/>
|
||||
</Unit63>
|
||||
<Unit64>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/other.inc"/>
|
||||
@ -533,7 +531,9 @@
|
||||
<UnitName Value="uPSRuntime"/>
|
||||
<CursorPos X="89" Y="10"/>
|
||||
<TopLine Value="1"/>
|
||||
<UsageCount Value="7"/>
|
||||
<EditorIndex Value="7"/>
|
||||
<UsageCount Value="10"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit69>
|
||||
<Unit70>
|
||||
<Filename Value="../../Units/MMLAddon/plugins.pas"/>
|
||||
@ -541,17 +541,13 @@
|
||||
<UnitName Value="plugins"/>
|
||||
<CursorPos X="34" Y="70"/>
|
||||
<TopLine Value="49"/>
|
||||
<EditorIndex Value="5"/>
|
||||
<UsageCount Value="200"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit70>
|
||||
<Unit71>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/psdefines.inc"/>
|
||||
<CursorPos X="1" Y="37"/>
|
||||
<TopLine Value="3"/>
|
||||
<EditorIndex Value="2"/>
|
||||
<UsageCount Value="11"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit71>
|
||||
<Unit72>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/math.inc"/>
|
||||
@ -590,8 +586,8 @@
|
||||
<Filename Value="../../Units/MMLCore/dtm.pas"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<UnitName Value="dtm"/>
|
||||
<CursorPos X="114" Y="245"/>
|
||||
<TopLine Value="226"/>
|
||||
<CursorPos X="84" Y="51"/>
|
||||
<TopLine Value="33"/>
|
||||
<UsageCount Value="200"/>
|
||||
</Unit77>
|
||||
<Unit78>
|
||||
@ -632,9 +628,7 @@
|
||||
<UnitName Value="windowselector"/>
|
||||
<CursorPos X="37" Y="34"/>
|
||||
<TopLine Value="12"/>
|
||||
<EditorIndex Value="12"/>
|
||||
<UsageCount Value="201"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit82>
|
||||
<Unit83>
|
||||
<Filename Value="../../../usr/lib64/fpc/2.2.4/source/rtl/objpas/classes/classesh.inc"/>
|
||||
@ -673,9 +667,11 @@
|
||||
</Unit87>
|
||||
<Unit88>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/dtm.inc"/>
|
||||
<CursorPos X="35" Y="42"/>
|
||||
<TopLine Value="64"/>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<TopLine Value="1"/>
|
||||
<EditorIndex Value="16"/>
|
||||
<UsageCount Value="53"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit88>
|
||||
<Unit89>
|
||||
<Filename Value="../../../cogat/compscript.pas"/>
|
||||
@ -773,9 +769,11 @@
|
||||
</Unit102>
|
||||
<Unit103>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/window.inc"/>
|
||||
<CursorPos X="52" Y="52"/>
|
||||
<TopLine Value="22"/>
|
||||
<UsageCount Value="9"/>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<TopLine Value="1"/>
|
||||
<EditorIndex Value="3"/>
|
||||
<UsageCount Value="11"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit103>
|
||||
<Unit104>
|
||||
<Filename Value="../../../FPC/FPCCheckout/rtl/objpas/classes/compon.inc"/>
|
||||
@ -819,8 +817,10 @@
|
||||
<Filename Value="../../Units/PascalScript/uPSDebugger.pas"/>
|
||||
<UnitName Value="uPSDebugger"/>
|
||||
<CursorPos X="13" Y="627"/>
|
||||
<TopLine Value="624"/>
|
||||
<UsageCount Value="9"/>
|
||||
<TopLine Value="323"/>
|
||||
<EditorIndex Value="6"/>
|
||||
<UsageCount Value="10"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit110>
|
||||
<Unit111>
|
||||
<Filename Value="../../Units/MMLCore/web.pas"/>
|
||||
@ -1202,9 +1202,9 @@
|
||||
<ComponentName Value="ColourHistoryForm"/>
|
||||
<ResourceBaseClass Value="Form"/>
|
||||
<UnitName Value="colourhistory"/>
|
||||
<CursorPos X="7" Y="73"/>
|
||||
<TopLine Value="55"/>
|
||||
<EditorIndex Value="11"/>
|
||||
<CursorPos X="59" Y="72"/>
|
||||
<TopLine Value="54"/>
|
||||
<EditorIndex Value="4"/>
|
||||
<UsageCount Value="200"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit166>
|
||||
@ -1373,10 +1373,10 @@
|
||||
</Unit190>
|
||||
<Unit191>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/keyboard.inc"/>
|
||||
<CursorPos X="26" Y="43"/>
|
||||
<TopLine Value="12"/>
|
||||
<EditorIndex Value="7"/>
|
||||
<UsageCount Value="20"/>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<TopLine Value="1"/>
|
||||
<EditorIndex Value="12"/>
|
||||
<UsageCount Value="21"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit191>
|
||||
<Unit192>
|
||||
@ -1491,9 +1491,7 @@
|
||||
<UnitName Value="debugimage"/>
|
||||
<CursorPos X="1" Y="1"/>
|
||||
<TopLine Value="1"/>
|
||||
<EditorIndex Value="13"/>
|
||||
<UsageCount Value="202"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit207>
|
||||
<Unit208>
|
||||
<Filename Value="debugimage.lrs"/>
|
||||
@ -1601,7 +1599,7 @@
|
||||
<UnitName Value="framefunctionlist"/>
|
||||
<CursorPos X="26" Y="295"/>
|
||||
<TopLine Value="7"/>
|
||||
<UsageCount Value="169"/>
|
||||
<UsageCount Value="173"/>
|
||||
</Unit223>
|
||||
<Unit224>
|
||||
<Filename Value="../../../usr/local/share/lazarus/lcl/comctrls.pp"/>
|
||||
@ -1656,7 +1654,7 @@
|
||||
<UnitName Value="simpleanalyzer"/>
|
||||
<CursorPos X="52" Y="104"/>
|
||||
<TopLine Value="193"/>
|
||||
<UsageCount Value="156"/>
|
||||
<UsageCount Value="160"/>
|
||||
</Unit231>
|
||||
<Unit232>
|
||||
<Filename Value="../../Units/Misc/mPasLex.pas"/>
|
||||
@ -1714,9 +1712,11 @@
|
||||
</Unit239>
|
||||
<Unit240>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/psexportedmethods.inc"/>
|
||||
<CursorPos X="25" Y="163"/>
|
||||
<TopLine Value="154"/>
|
||||
<UsageCount Value="23"/>
|
||||
<CursorPos X="8" Y="61"/>
|
||||
<TopLine Value="36"/>
|
||||
<EditorIndex Value="10"/>
|
||||
<UsageCount Value="24"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit240>
|
||||
<Unit241>
|
||||
<Filename Value="../../Units/Synapse/synautil.pas"/>
|
||||
@ -1731,7 +1731,7 @@
|
||||
<UnitName Value="updater"/>
|
||||
<CursorPos X="38" Y="211"/>
|
||||
<TopLine Value="65"/>
|
||||
<UsageCount Value="129"/>
|
||||
<UsageCount Value="133"/>
|
||||
</Unit242>
|
||||
<Unit243>
|
||||
<Filename Value="updateform.pas"/>
|
||||
@ -1742,7 +1742,7 @@
|
||||
<ComponentState Value="1"/>
|
||||
<CursorPos X="111" Y="102"/>
|
||||
<TopLine Value="207"/>
|
||||
<UsageCount Value="124"/>
|
||||
<UsageCount Value="128"/>
|
||||
</Unit243>
|
||||
<Unit244>
|
||||
<Filename Value="../../../Documents/lazarus/lcl/fileutil.pas"/>
|
||||
@ -1863,16 +1863,14 @@
|
||||
<UnitName Value="simbasettings"/>
|
||||
<CursorPos X="26" Y="9"/>
|
||||
<TopLine Value="11"/>
|
||||
<UsageCount Value="87"/>
|
||||
<UsageCount Value="91"/>
|
||||
</Unit261>
|
||||
<Unit262>
|
||||
<Filename Value="../../Units/MMLAddon/settings.pas"/>
|
||||
<UnitName Value="settings"/>
|
||||
<CursorPos X="29" Y="603"/>
|
||||
<TopLine Value="583"/>
|
||||
<EditorIndex Value="10"/>
|
||||
<UsageCount Value="20"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit262>
|
||||
<Unit263>
|
||||
<Filename Value="../../../fpc/packages/unixutil/src/unixutils.pp"/>
|
||||
@ -1903,7 +1901,7 @@
|
||||
<UnitName Value="reportbug"/>
|
||||
<CursorPos X="53" Y="23"/>
|
||||
<TopLine Value="21"/>
|
||||
<UsageCount Value="70"/>
|
||||
<UsageCount Value="74"/>
|
||||
</Unit266>
|
||||
<Unit267>
|
||||
<Filename Value="../../Units/Synapse/synsock.pas"/>
|
||||
@ -1960,9 +1958,7 @@
|
||||
<UnitName Value="newinternets"/>
|
||||
<CursorPos X="37" Y="171"/>
|
||||
<TopLine Value="153"/>
|
||||
<EditorIndex Value="15"/>
|
||||
<UsageCount Value="66"/>
|
||||
<Loaded Value="True"/>
|
||||
<UsageCount Value="70"/>
|
||||
</Unit274>
|
||||
<Unit275>
|
||||
<Filename Value="reportbug.lrs"/>
|
||||
@ -2010,8 +2006,8 @@
|
||||
<UnitName Value="IOManager"/>
|
||||
<CursorPos X="1" Y="543"/>
|
||||
<TopLine Value="526"/>
|
||||
<EditorIndex Value="3"/>
|
||||
<UsageCount Value="24"/>
|
||||
<EditorIndex Value="9"/>
|
||||
<UsageCount Value="25"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit281>
|
||||
<Unit282>
|
||||
@ -2019,8 +2015,8 @@
|
||||
<UnitName Value="os_linux"/>
|
||||
<CursorPos X="9" Y="342"/>
|
||||
<TopLine Value="325"/>
|
||||
<EditorIndex Value="17"/>
|
||||
<UsageCount Value="24"/>
|
||||
<EditorIndex Value="14"/>
|
||||
<UsageCount Value="25"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit282>
|
||||
<Unit283>
|
||||
@ -2035,8 +2031,8 @@
|
||||
<UnitName Value="os_windows"/>
|
||||
<CursorPos X="3" Y="314"/>
|
||||
<TopLine Value="300"/>
|
||||
<EditorIndex Value="16"/>
|
||||
<UsageCount Value="20"/>
|
||||
<EditorIndex Value="13"/>
|
||||
<UsageCount Value="21"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit284>
|
||||
<Unit285>
|
||||
@ -2059,9 +2055,7 @@
|
||||
<UnitName Value="libloader"/>
|
||||
<CursorPos X="1" Y="149"/>
|
||||
<TopLine Value="128"/>
|
||||
<EditorIndex Value="6"/>
|
||||
<UsageCount Value="24"/>
|
||||
<Loaded Value="True"/>
|
||||
<UsageCount Value="28"/>
|
||||
</Unit287>
|
||||
<Unit288>
|
||||
<Filename Value="../../Units/MMLAddon/tpa.pas"/>
|
||||
@ -2070,127 +2064,144 @@
|
||||
<TopLine Value="1677"/>
|
||||
<UsageCount Value="11"/>
|
||||
</Unit288>
|
||||
<Unit289>
|
||||
<Filename Value="../../Units/PascalScript/x86.inc"/>
|
||||
<CursorPos X="1" Y="162"/>
|
||||
<TopLine Value="134"/>
|
||||
<EditorIndex Value="2"/>
|
||||
<UsageCount Value="10"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit289>
|
||||
<Unit290>
|
||||
<Filename Value="../../Units/PascalScript/uPSUtils.pas"/>
|
||||
<UnitName Value="uPSUtils"/>
|
||||
<CursorPos X="63" Y="722"/>
|
||||
<TopLine Value="713"/>
|
||||
<EditorIndex Value="5"/>
|
||||
<UsageCount Value="10"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit290>
|
||||
</Units>
|
||||
<JumpHistory Count="30" HistoryIndex="29">
|
||||
<Position1>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="300" Column="36" TopLine="283"/>
|
||||
<Caret Line="295" Column="29" TopLine="278"/>
|
||||
</Position1>
|
||||
<Position2>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="301" Column="27" TopLine="283"/>
|
||||
<Caret Line="333" Column="31" TopLine="316"/>
|
||||
</Position2>
|
||||
<Position3>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="303" Column="53" TopLine="283"/>
|
||||
<Caret Line="334" Column="41" TopLine="316"/>
|
||||
</Position3>
|
||||
<Position4>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="304" Column="41" TopLine="283"/>
|
||||
<Filename Value="../../Units/MMLCore/iomanager.pas"/>
|
||||
<Caret Line="543" Column="1" TopLine="526"/>
|
||||
</Position4>
|
||||
<Position5>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="332" Column="30" TopLine="315"/>
|
||||
<Caret Line="560" Column="43" TopLine="537"/>
|
||||
</Position5>
|
||||
<Position6>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="333" Column="54" TopLine="315"/>
|
||||
<Caret Line="571" Column="76" TopLine="537"/>
|
||||
</Position6>
|
||||
<Position7>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="331" Column="59" TopLine="315"/>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/psexportedmethods.inc"/>
|
||||
<Caret Line="64" Column="24" TopLine="36"/>
|
||||
</Position7>
|
||||
<Position8>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="93" Column="43" TopLine="77"/>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/psexportedmethods.inc"/>
|
||||
<Caret Line="61" Column="8" TopLine="36"/>
|
||||
</Position8>
|
||||
<Position9>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="219" Column="34" TopLine="203"/>
|
||||
<Caret Line="511" Column="27" TopLine="494"/>
|
||||
</Position9>
|
||||
<Position10>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="248" Column="33" TopLine="232"/>
|
||||
<Filename Value="testunit.pas"/>
|
||||
<Caret Line="1439" Column="47" TopLine="1421"/>
|
||||
</Position10>
|
||||
<Position11>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="32" Column="42" TopLine="23"/>
|
||||
<Caret Line="511" Column="29" TopLine="494"/>
|
||||
</Position11>
|
||||
<Position12>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="37" Column="14" TopLine="23"/>
|
||||
<Caret Line="508" Column="18" TopLine="491"/>
|
||||
</Position12>
|
||||
<Position13>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="295" Column="29" TopLine="278"/>
|
||||
<Caret Line="105" Column="22" TopLine="88"/>
|
||||
</Position13>
|
||||
<Position14>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="333" Column="31" TopLine="316"/>
|
||||
<Caret Line="344" Column="19" TopLine="325"/>
|
||||
</Position14>
|
||||
<Position15>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="334" Column="41" TopLine="316"/>
|
||||
<Caret Line="344" Column="10" TopLine="327"/>
|
||||
</Position15>
|
||||
<Position16>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="18" Column="42" TopLine="1"/>
|
||||
<Caret Line="106" Column="27" TopLine="89"/>
|
||||
</Position16>
|
||||
<Position17>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="37" Column="14" TopLine="20"/>
|
||||
<Filename Value="../../Units/PascalScript/x86.inc"/>
|
||||
<Caret Line="330" Column="29" TopLine="316"/>
|
||||
</Position17>
|
||||
<Position18>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="295" Column="29" TopLine="278"/>
|
||||
<Filename Value="colourhistory.pas"/>
|
||||
<Caret Line="73" Column="7" TopLine="55"/>
|
||||
</Position18>
|
||||
<Position19>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="333" Column="31" TopLine="316"/>
|
||||
<Filename Value="../../Units/PascalScript/uPSDebugger.pas"/>
|
||||
<Caret Line="627" Column="13" TopLine="323"/>
|
||||
</Position19>
|
||||
<Position20>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="334" Column="41" TopLine="316"/>
|
||||
<Filename Value="../../Units/PascalScript/x86.inc"/>
|
||||
<Caret Line="162" Column="1" TopLine="145"/>
|
||||
</Position20>
|
||||
<Position21>
|
||||
<Filename Value="../../Units/MMLCore/libloader.pas"/>
|
||||
<Caret Line="149" Column="1" TopLine="128"/>
|
||||
<Filename Value="../../Units/PascalScript/x86.inc"/>
|
||||
<Caret Line="330" Column="1" TopLine="313"/>
|
||||
</Position21>
|
||||
<Position22>
|
||||
<Filename Value="../../Units/MMLCore/libloader.pas"/>
|
||||
<Caret Line="150" Column="1" TopLine="128"/>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/window.inc"/>
|
||||
<Caret Line="37" Column="1" TopLine="19"/>
|
||||
</Position22>
|
||||
<Position23>
|
||||
<Filename Value="../../Units/MMLCore/libloader.pas"/>
|
||||
<Caret Line="151" Column="1" TopLine="128"/>
|
||||
<Filename Value="../../Units/PascalScript/x86.inc"/>
|
||||
<Caret Line="154" Column="16" TopLine="145"/>
|
||||
</Position23>
|
||||
<Position24>
|
||||
<Filename Value="../../Units/MMLCore/libloader.pas"/>
|
||||
<Caret Line="152" Column="1" TopLine="128"/>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="115" Column="45" TopLine="106"/>
|
||||
</Position24>
|
||||
<Position25>
|
||||
<Filename Value="../../Units/MMLCore/iomanager.pas"/>
|
||||
<Caret Line="543" Column="1" TopLine="526"/>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="128" Column="62" TopLine="106"/>
|
||||
</Position25>
|
||||
<Position26>
|
||||
<Filename Value="../../Units/MMLCore/libloader.pas"/>
|
||||
<Caret Line="149" Column="1" TopLine="128"/>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="131" Column="62" TopLine="106"/>
|
||||
</Position26>
|
||||
<Position27>
|
||||
<Filename Value="../../Units/MMLCore/libloader.pas"/>
|
||||
<Caret Line="150" Column="1" TopLine="128"/>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="344" Column="27" TopLine="318"/>
|
||||
</Position27>
|
||||
<Position28>
|
||||
<Filename Value="../../Units/MMLCore/libloader.pas"/>
|
||||
<Caret Line="151" Column="1" TopLine="128"/>
|
||||
<Filename Value="../../Units/PascalScript/x86.inc"/>
|
||||
<Caret Line="162" Column="1" TopLine="134"/>
|
||||
</Position28>
|
||||
<Position29>
|
||||
<Filename Value="../../Units/MMLCore/libloader.pas"/>
|
||||
<Caret Line="152" Column="1" TopLine="128"/>
|
||||
<Filename Value="../../Units/PascalScript/uPSUtils.pas"/>
|
||||
<Caret Line="730" Column="5" TopLine="713"/>
|
||||
</Position29>
|
||||
<Position30>
|
||||
<Filename Value="../../Units/MMLAddon/mmlpsthread.pas"/>
|
||||
<Caret Line="560" Column="43" TopLine="537"/>
|
||||
<Filename Value="../../Units/MMLAddon/PSInc/Wrappers/window.inc"/>
|
||||
<Caret Line="1" Column="1" TopLine="1"/>
|
||||
</Position30>
|
||||
</JumpHistory>
|
||||
</ProjectOptions>
|
||||
|
||||
@ -58,7 +58,7 @@ AddFunction(@ps_RandomRange,'function RandomRange(aFrom,aTo: Integer): Integer;'
|
||||
SetCurrSection('Window');
|
||||
AddFunction(@Freeze, 'function Freeze:boolean;');
|
||||
AddFunction(@Unfreeze, 'function Unfreeze: boolean;');
|
||||
AddFunction(@GetClientDimensions, 'procedure GetClientDimensions(out w, h:integer);');
|
||||
AddFunction(@GetClientDimensions, 'procedure GetClientDimensions(var w, h:integer);');
|
||||
AddFunction(@SetTargetBitmap,'procedure SetTargetBitmap(Bitmap : integer);');
|
||||
AddFunction(@SetDesktopAsClient,'procedure SetDesktopAsClient');
|
||||
AddFunction(@SetTargetArray, 'procedure SetTargetArray(P: Integer; w, h: integer);');
|
||||
|
||||
@ -512,26 +512,28 @@ class function TMMLPSThread.GetExportedMethods: TExpMethodArr;
|
||||
var
|
||||
c : integer;
|
||||
CurrSection : string;
|
||||
procedure SetCurrSection(str : string);
|
||||
begin;
|
||||
CurrSection := Str;
|
||||
end;
|
||||
|
||||
procedure AddFunction( Ptr : Pointer; DeclStr : String);
|
||||
begin;
|
||||
// SetLength(ExportedMethods,c+1);
|
||||
if c >= 300 then
|
||||
raise exception.create('PSThread.LoadMethods: Exported more than 300 functions');
|
||||
Result[c].FuncDecl:= DeclStr;
|
||||
Result[c].FuncPtr:= Ptr;
|
||||
Result[c].Section:= CurrSection;
|
||||
inc(c);
|
||||
end;
|
||||
procedure SetCurrSection(str : string);
|
||||
begin;
|
||||
CurrSection := Str;
|
||||
end;
|
||||
|
||||
procedure AddFunction( Ptr : Pointer; DeclStr : String);
|
||||
begin;
|
||||
// SetLength(ExportedMethods,c+1);
|
||||
if c >= 300 then
|
||||
raise exception.create('PSThread.LoadMethods: Exported more than 300 functions');
|
||||
Result[c].FuncDecl:= DeclStr;
|
||||
Result[c].FuncPtr:= Ptr;
|
||||
Result[c].Section:= CurrSection;
|
||||
inc(c);
|
||||
end;
|
||||
|
||||
begin
|
||||
c := 0;
|
||||
CurrSection := 'Other';
|
||||
SetLength(Result,300);
|
||||
|
||||
{$i PSInc/psexportedmethods.inc}
|
||||
|
||||
SetLength(Result,c);
|
||||
|
||||
Loading…
Reference in New Issue
Block a user