Code: Alles auswählen
d:\ALASKA\AIDOS-X>XPP __AIDOS-X
__AIDOS-X.prg(0:0): fatal XBT0407: System memory exhausted
Fatal error, exiting
Moderator: Moderatoren
Code: Alles auswählen
d:\ALASKA\AIDOS-X>XPP __AIDOS-X
__AIDOS-X.prg(0:0): fatal XBT0407: System memory exhausted
Fatal error, exiting
welchen Vorteil bringt eine grosse Source Code DateiEugeny Lutsenko hat geschrieben: ↑Mo, 08. Jun 2020 6:48 Ich möchte in der Lage sein, große Quelltexte zu kompilieren, die als eine einzelne Datei dargestellt werden.
es bringt auch nichts wenn du versuchst noch paar Byte zu finden ... du bist schon lange im roten Bereich.Eugeny Lutsenko hat geschrieben: ↑Mo, 08. Jun 2020 6:48 Es gibt jedoch einen Speicherfehler:gibt es eine Möglichkeit, den Compiler so zu starten, dass er bei der Speichernutzung absolute Priorität vor anderen Laufenden Programmen hat?Code: Alles auswählen
d:\ALASKA\AIDOS-X>XPP __AIDOS-X __AIDOS-X.prg(0:0): fatal XBT0407: System memory exhausted Fatal error, exiting
Hier ist es: http://lc.kubagro.ru/__AIDOS-X.txtFrank Grossheinrich hat geschrieben: ↑Mo, 08. Jun 2020 13:08 Hallo Eugeny,
nur aus persönlichem Interesse: definiere "grosse Quelltexte". Wie groß ist dieses PRG?
Grüße, Frank
i´m just working on German VAT and Project haveProcessed 1 files, containing 134241 lines of source code
Time in process: 18:51
more Code but less time the mean CLICK have to do more work with your Style of CodeProcessed 171 files, containing 216535 lines of source code
Time in process: 15:32
Code: Alles auswählen
aColor := Sp_Color()
FUNCTION Sp_Color()
LOCAL aColor := {}
AADD( aColor, BD_BLUEMIST ) // GraMakeRGBColor({195,238,255}) // BLUE
RETURN aColor
if it have only 1 Entry than Function / Procedure can be change into STATIC FUNC / STATIC PROC when it is in same PRG*+ Function Add_rec1_5()
*+ Called from ( aidosx.prg ) 1 - function f1_5()
there are much more Code which are not used so clean-up your Code and delete it when not used*+ Function LB_Inform()
*+ Function NextColSch()
*+ Function ExitColSch()
*+ Function GuiStdDialog()
*+ Function GetFilename()
*+ Function EditBlock()
*+ Function WriteField()
Code: Alles auswählen
STATIC xVar
FUNCTION MyVar(xValue)
IF PCOUNT() > 0
xVar := xValue
ENDIF
RETURN xVar
Code: Alles auswählen
#xtranslate aJustDelete => Stack\[SP, 1]
#xtranslate cGetWahl => Stack\[SP, 2]
#xtranslate cNewPath => Stack\[SP, 3]
...
#xtranslate cFilter => Stack\[SP,51]
STATIC Stack := {}
STATIC SP := 0
FUNCTION SP_INIT() // init STACK
AADD( Stack, ARRAY( 51 ) )
SP ++
aJustDelete := {}
cGetWahl := "*.*"
cNewPath := ""
...
cFilter := ""
RETURN NIL
FUNCTION SP_cFilter( xValue )
IF PCOUNT() > 0
cFilter := xValue
ENDIF
RETURN cFilter
Code: Alles auswählen
SET ORDER TO 1;T=DBSEEK(STR(M_KodAdmAppls,8))
USE Classes EXCLUSIVE NEW;N_Cls = RECCOUNT()
USE aKodCls EXCLUSIVE NEW;ZAP
it is your App which does not compile if you don´t fix it.Eugeny Lutsenko hat geschrieben: ↑Di, 09. Jun 2020 13:27 Ich habe einfach keine Zeit dafür. Um ehrlich zu sein, denke ich, dass, wenn man so viel Arbeit in Sie investiert, es notwendig ist, eine andere Programmiersprache zu verwenden. Ich denke, diese C# - Sprache.
Jimmy,
und nach einigem hin und her ohne eines hinweises auf eine nun fehlerbefreiende "startmöglichkeit" des compilersEugeny Lutsenko hat geschrieben: ↑Mo, 08. Jun 2020 6:48 Ich möchte in der Lage sein, große Quelltexte zu kompilieren, die als eine einzelne Datei dargestellt werden. Es gibt jedoch einen Speicherfehler:gibt es eine Möglichkeit, den Compiler so zu starten, dass er bei der Speichernutzung absolute Priorität vor anderen Laufenden Programmen hat? Ich habe versucht, im Internet zu finden, irgendwie gefunden, versucht, aber bisher habe ich es nicht geschafftCode: Alles auswählen
d:\ALASKA\AIDOS-X>XPP __AIDOS-X __AIDOS-X.prg(0:0): fatal XBT0407: System memory exhausted Fatal error, exiting
Eugeny Lutsenko hat geschrieben: ↑Mi, 10. Jun 2020 6:41 https://translate.yandex.ru/:
Ich bin allen sehr dankbar für wertvolle Tipps. Mein großer Quellcode kompiliert perfekt auf meinem Computer. Es ist immer auf dem neuesten Stand unter: http://lc.kubagro.ru/__AIDOS-X.txt