diff --git a/foxbin2prg.prg b/foxbin2prg.prg
index afe63ce..171d322 100644
--- a/foxbin2prg.prg
+++ b/foxbin2prg.prg
@@ -4109,6 +4109,27 @@ DEFINE CLASS c_conversor_prg_a_bin AS c_conversor_base
+ *******************************************************************************************************************
+ PROCEDURE analizarBloque_LIBCOMMENT
+ *------------------------------------------------------
+ *-- Analiza el bloque *
+ *------------------------------------------------------
+ LPARAMETERS toModulo, tcLine, taCodeLines, I, tnCodeLines
+
+ LOCAL llBloqueEncontrado, laPropsAndValues(1,2), lnPropsAndValues_Count
+
+ IF LEFT( tcLine, LEN(C_LIBCOMMENT_I) ) == C_LIBCOMMENT_I
+ llBloqueEncontrado = .T.
+
+ *-- Metadatos del módulo
+ toModulo._Comment = ALLTRIM( STREXTRACT( tcLine, C_LIBCOMMENT_I, C_LIBCOMMENT_F ) )
+ ENDIF
+
+ RETURN llBloqueEncontrado
+ ENDPROC
+
+
+
*******************************************************************************************************************
PROCEDURE createProject
@@ -5625,27 +5646,6 @@ DEFINE CLASS c_conversor_prg_a_bin AS c_conversor_base
- *******************************************************************************************************************
- PROCEDURE analizarBloque_LIBCOMMENT
- *------------------------------------------------------
- *-- Analiza el bloque *
- *------------------------------------------------------
- LPARAMETERS toModulo, tcLine, taCodeLines, I, tnCodeLines
-
- LOCAL llBloqueEncontrado, laPropsAndValues(1,2), lnPropsAndValues_Count
-
- IF LEFT( tcLine, LEN(C_LIBCOMMENT_I) ) == C_LIBCOMMENT_I
- llBloqueEncontrado = .T.
-
- *-- Metadatos del módulo
- toModulo._Comment = ALLTRIM( STREXTRACT( tcLine, C_LIBCOMMENT_I, C_LIBCOMMENT_F ) )
- ENDIF
-
- RETURN llBloqueEncontrado
- ENDPROC
-
-
-
*******************************************************************************************************************
PROCEDURE analizarBloque_OBJECTMETADATA
LPARAMETERS toClase, tcLine