romfast/foxbin2prg
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Changeset: 477 fdbozzo - 09/11/2014 22:22:02:

Browse Source 
- Arreglo del header
This commit is contained in:
fdbozzo
2014-11-09 22:28:54 +01:00
parent 3c944235a1
commit c7ed26808d
1 changed files with 10 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
foxbin2prg.prg
View File

@@ -10652,9 +10652,13 @@ DEFINE CLASS c_conversor_vcx_a_prg AS c_conversor_bin_a_prg
laClasses(lnClassCount,2) = lcCodigo laClasses(lnClassCount,2) = lcCodigo
ENDSCAN ENDSCAN
IF toFoxBin2Prg.l_UseClassPerFile
lcExternalHeader = lcExternalHeader + CR_LF
ENDIF
*-- Genero el VC2 *-- Genero el VC2
lcOutputFile = .c_OutputFile lcOutputFile = .c_OutputFile
lcCodigo = toFoxBin2Prg.get_PROGRAM_HEADER() + lcExternalHeader + CR_LF + C_FB2PRG_CODE lcCodigo = toFoxBin2Prg.get_PROGRAM_HEADER() + lcExternalHeader + C_FB2PRG_CODE
IF .l_Test IF .l_Test
FOR I = 1 TO lnClassCount FOR I = 1 TO lnClassCount
@@ -10911,9 +10915,13 @@ DEFINE CLASS c_conversor_scx_a_prg AS c_conversor_bin_a_prg
laClasses(lnClassCount,2) = lcCodigo laClasses(lnClassCount,2) = lcCodigo
ENDSCAN ENDSCAN
IF toFoxBin2Prg.l_UseClassPerFile
lcExternalHeader = lcExternalHeader + CR_LF
ENDIF
*-- Genero el SC2 *-- Genero el SC2
lcOutputFile = .c_OutputFile lcOutputFile = .c_OutputFile
lcCodigo = toFoxBin2Prg.get_PROGRAM_HEADER() + lcExternalHeader + CR_LF + C_FB2PRG_CODE lcCodigo = toFoxBin2Prg.get_PROGRAM_HEADER() + lcExternalHeader + C_FB2PRG_CODE
IF .l_Test IF .l_Test
FOR I = 1 TO lnClassCount FOR I = 1 TO lnClassCount