In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Re: ERRO DE LÓGICA EM XAILER 3.2 - HELP-ME

Foro público de Xailer en español
User avatar
Marcelo Coelho Silva
Posts: 267
Joined: Sat May 31, 2008 4:49 pm

Re: ERRO DE LÓGICA EM XAILER 3.2 - HELP-ME

Postby Marcelo Coelho Silva » Wed Jun 25, 2014 5:28 pm

Prezado Mario,
O que poderemos fazer ? o MinGw é confiável ? Podemos utilizar um
Compilador C que possui Erros de Lógica ?
Fiquei Preocupado com a conversão de Compilador, passando meus Sistemas
de BCC para MinGW !!!
Att.
Marcelo Coelho Silva
Mhacke Software do Brasil.
Em 04/06/2014 09:16, www[dot]eMeAsOfT[dot]com escreveu:> Marcelo:
> Usando o Xailer 3.2 e
> LogDebug((cLetra >= "(" .and. cLetra <= ";"),(cLetra >= "?"
> .and. cLetra <= "_"),(cLetra >= "a" .and. cLetra <= "}"))
>
>
>
> BCC:
> #1: .F. .T. .F.
> #2: .F. .T. .F.
> #3: .F. .T. .F.
> #4: .F. .T. .F.
> #5: .F. .T. .F.
> #6: .F. .T. .F.
> #7: .F. .F. .F.
> #8: .F. .F. .F.
> #9: .F. .T. .F.
> #10: .F. .F. .F.
> #11: .F. .T. .F.
> #12: .F. .T. .F.
> #13: .F. .F. .F.
> #14: .F. .T. .F.
> #15: .F. .T. .F.
> #16: .F. .T. .F.
> #17: .F. .T. .F.
> #18: .F. .T. .F.
> #19: .F. .T. .F.
>
> MinGW
> #1: .F. .T. .F.
> #2: .F. .T. .F.
> #3: .F. .T. .F.
> #4: .F. .T. .F.
> #5: .F. .T. .F.
> #6: .F. .T. .F.
> #7: .F. .T. .F.
> #8: .F. .T. .F.
> #9: .F. .T. .F.
> #10: .F. .F. .F.
> #11: .F. .T. .F.
> #12: .F. .T. .F.
> #13: .F. .F. .F.
> #14: .F. .T. .F.
> #15: .F. .T. .F.
> #16: .F. .T. .F.
> #17: .F. .T. .F.
> #18: .F. .T. .F.
> #19: .F. .T. .F.
> #20: .F. .T. .F.
> #21: .F. .T. .F.
> #22: .F. .T. .F.
> #23: .F. .T. .F.
>
> Realmente a lógica está diferente entre os 2.
>
> Mário Angelini
---
Este email está limpo de ví­rus e malwares porque a proteção do avast! Antiví­rus está ativa.
http://www.avast.com
Att.

Marcelo Coelho Silva
Brasil.
Cassiano de Oliveira
Posts: 475
Joined: Tue Jul 24, 2012 10:21 pm

Re: ERRO DE LÓGICA EM XAILER 3.2 - HELP-ME

Postby Cassiano de Oliveira » Wed Jun 25, 2014 7:18 pm

Marcelo acho q isto cabe vc postar no fórum Pro pra ver o q os
Desenvolvedores dizem.
[]´s
"Marcelo Coelho Silva" wrote in message news:53aaeaa8$1@svctag-j7w3v3j....
Prezado Mario,
O que poderemos fazer ? o MinGw é confiável ? Podemos utilizar um
Compilador C que possui Erros de Lógica ?
Fiquei Preocupado com a conversão de Compilador, passando meus Sistemas
de BCC para MinGW !!!
Att.
Marcelo Coelho Silva
Mhacke Software do Brasil.
Em 04/06/2014 09:16, www[dot]eMeAsOfT[dot]com escreveu:> Marcelo:
> Usando o Xailer 3.2 e
> LogDebug((cLetra >= "(" .and. cLetra <= ";"),(cLetra >= "?"
> .and. cLetra <= "_"),(cLetra >= "a" .and. cLetra <= "}"))
>
>
>
> BCC:
> #1: .F. .T. .F.
> #2: .F. .T. .F.
> #3: .F. .T. .F.
> #4: .F. .T. .F.
> #5: .F. .T. .F.
> #6: .F. .T. .F.
> #7: .F. .F. .F.
> #8: .F. .F. .F.
> #9: .F. .T. .F.
> #10: .F. .F. .F.
> #11: .F. .T. .F.
> #12: .F. .T. .F.
> #13: .F. .F. .F.
> #14: .F. .T. .F.
> #15: .F. .T. .F.
> #16: .F. .T. .F.
> #17: .F. .T. .F.
> #18: .F. .T. .F.
> #19: .F. .T. .F.
>
> MinGW
> #1: .F. .T. .F.
> #2: .F. .T. .F.
> #3: .F. .T. .F.
> #4: .F. .T. .F.
> #5: .F. .T. .F.
> #6: .F. .T. .F.
> #7: .F. .T. .F.
> #8: .F. .T. .F.
> #9: .F. .T. .F.
> #10: .F. .F. .F.
> #11: .F. .T. .F.
> #12: .F. .T. .F.
> #13: .F. .F. .F.
> #14: .F. .T. .F.
> #15: .F. .T. .F.
> #16: .F. .T. .F.
> #17: .F. .T. .F.
> #18: .F. .T. .F.
> #19: .F. .T. .F.
> #20: .F. .T. .F.
> #21: .F. .T. .F.
> #22: .F. .T. .F.
> #23: .F. .T. .F.
>
> Realmente a lógica está diferente entre os 2.
>
> Mário Angelini
---
Este email está limpo de ví­rus e malwares porque a proteção do avast!
Antiví­rus está ativa.
http://www.avast.com
---
Este email está limpo de ví­rus e malwares porque a proteção do avast! Antiví­rus está ativa.
http://www.avast.com
Carlos Mora
Posts: 88
Joined: Fri Jul 28, 2006 9:36 am

Re: ERRO DE LÓGICA EM XAILER 3.2 - HELP-ME

Postby Carlos Mora » Thu Jun 26, 2014 3:36 pm

Creo que no es un problema de lógica del compilador. ¿Podrí­a ser
xHarbour maneja un codepage diferente del que maneja Harbour? Si los
codepages son distintos, los valores ASCII (en los que se basa la
función) podrí­an ser diferentes y eso explicarí­a el resultado diferente.
No sé con xHarbour, pero con Harbour podemos usar
HB_SetCodePage( [<cCodePageID>] ) --> cOldCodePageID
Dejo un enlace donde está muy bien explicado y tiene un ejemplo bastante
esclarecedor:
http://www.creasolgroup.com/xOraclipLanguageReferenceGuide/x OraClip%20Language%20Reference/Functions/Hb_setcodepage_f.en .html
Un saludo,
Carlos
El 25/06/2014 17:28, Marcelo Coelho Silva escribió:
> Prezado Mario,
>
> O que poderemos fazer ? o MinGw é confiável ? Podemos utilizar um
> Compilador C que possui Erros de Lógica ?
>
> Fiquei Preocupado com a conversão de Compilador, passando meus Sistemas
> de BCC para MinGW !!!
>
> Att.
>
> Marcelo Coelho Silva
> Mhacke Software do Brasil.
>
>
> Em 04/06/2014 09:16, www[dot]eMeAsOfT[dot]com escreveu:> Marcelo:
> > Usando o Xailer 3.2 e
> > LogDebug((cLetra >= "(" .and. cLetra <= ";"),(cLetra >= "?"
> > .and. cLetra <= "_"),(cLetra >= "a" .and. cLetra <= "}"))
> >
> >
> >
> > BCC:
> > #1: .F. .T. .F.
> > #2: .F. .T. .F.
> > #3: .F. .T. .F.
> > #4: .F. .T. .F.
> > #5: .F. .T. .F.
> > #6: .F. .T. .F.
> > #7: .F. .F. .F.
> > #8: .F. .F. .F.
> > #9: .F. .T. .F.
> > #10: .F. .F. .F.
> > #11: .F. .T. .F.
> > #12: .F. .T. .F.
> > #13: .F. .F. .F.
> > #14: .F. .T. .F.
> > #15: .F. .T. .F.
> > #16: .F. .T. .F.
> > #17: .F. .T. .F.
> > #18: .F. .T. .F.
> > #19: .F. .T. .F.
> >
> > MinGW
> > #1: .F. .T. .F.
> > #2: .F. .T. .F.
> > #3: .F. .T. .F.
> > #4: .F. .T. .F.
> > #5: .F. .T. .F.
> > #6: .F. .T. .F.
> > #7: .F. .T. .F.
> > #8: .F. .T. .F.
> > #9: .F. .T. .F.
> > #10: .F. .F. .F.
> > #11: .F. .T. .F.
> > #12: .F. .T. .F.
> > #13: .F. .F. .F.
> > #14: .F. .T. .F.
> > #15: .F. .T. .F.
> > #16: .F. .T. .F.
> > #17: .F. .T. .F.
> > #18: .F. .T. .F.
> > #19: .F. .T. .F.
> > #20: .F. .T. .F.
> > #21: .F. .T. .F.
> > #22: .F. .T. .F.
> > #23: .F. .T. .F.
> >
> > Realmente a lógica está diferente entre os 2.
> >
> > Mário Angelini
>
>
> ---
> Este email está limpo de ví­rus e malwares porque a proteção do avast!
> Antiví­rus está ativa.
> http://www.avast.com
>
User avatar
Marcelo Coelho Silva
Posts: 267
Joined: Sat May 31, 2008 4:49 pm

Re: ERRO DE LÓGICA EM XAILER 3.2 - HELP-ME

Postby Marcelo Coelho Silva » Fri Jun 27, 2014 3:55 am

Prezado Carlos Mora,
A questão é que o teste foi realizado com Harbour+MinGW e Harbour+BCC,
somente foi trocado o Compilador C (não foi utilizado xHarbour). Ou
Seja, apresentou problema de lógica apenas com a troca do Compilador C.
Att.
Marcelo Coelho Silva
Mhacker Software do Brasil.
Em 26/06/2014 10:36, Carlos Mora escreveu:
> Creo que no es un problema de lógica del compilador. ¿Podrí­a ser
> xHarbour maneja un codepage diferente del que maneja Harbour? Si los
> codepages son distintos, los valores ASCII (en los que se basa la
> función) podrí­an ser diferentes y eso explicarí­a el resultado diferente.
>
> No sé con xHarbour, pero con Harbour podemos usar
>
> HB_SetCodePage( [<cCodePageID>] ) --> cOldCodePageID
>
> Dejo un enlace donde está muy bien explicado y tiene un ejemplo bastante
> esclarecedor:
>
> http://www.creasolgroup.com/xOraclipLanguageReferenceGuide/x OraClip%20Language%20Reference/Functions/Hb_setcodepage_f.en .html
>
>
> Un saludo,
>
> Carlos
>
> El 25/06/2014 17:28, Marcelo Coelho Silva escribió:
>> Prezado Mario,
>>
>> O que poderemos fazer ? o MinGw é confiável ? Podemos utilizar um
>> Compilador C que possui Erros de Lógica ?
>>
>> Fiquei Preocupado com a conversão de Compilador, passando meus Sistemas
>> de BCC para MinGW !!!
>>
>> Att.
>>
>> Marcelo Coelho Silva
>> Mhacke Software do Brasil.
>>
>>
>> Em 04/06/2014 09:16, www[dot]eMeAsOfT[dot]com escreveu:> Marcelo:
>> > Usando o Xailer 3.2 e
>> > LogDebug((cLetra >= "(" .and. cLetra <= ";"),(cLetra >= "?"
>> > .and. cLetra <= "_"),(cLetra >= "a" .and. cLetra <= "}"))
>> >
>> >
>> >
>> > BCC:
>> > #1: .F. .T. .F.
>> > #2: .F. .T. .F.
>> > #3: .F. .T. .F.
>> > #4: .F. .T. .F.
>> > #5: .F. .T. .F.
>> > #6: .F. .T. .F.
>> > #7: .F. .F. .F.
>> > #8: .F. .F. .F.
>> > #9: .F. .T. .F.
>> > #10: .F. .F. .F.
>> > #11: .F. .T. .F.
>> > #12: .F. .T. .F.
>> > #13: .F. .F. .F.
>> > #14: .F. .T. .F.
>> > #15: .F. .T. .F.
>> > #16: .F. .T. .F.
>> > #17: .F. .T. .F.
>> > #18: .F. .T. .F.
>> > #19: .F. .T. .F.
>> >
>> > MinGW
>> > #1: .F. .T. .F.
>> > #2: .F. .T. .F.
>> > #3: .F. .T. .F.
>> > #4: .F. .T. .F.
>> > #5: .F. .T. .F.
>> > #6: .F. .T. .F.
>> > #7: .F. .T. .F.
>> > #8: .F. .T. .F.
>> > #9: .F. .T. .F.
>> > #10: .F. .F. .F.
>> > #11: .F. .T. .F.
>> > #12: .F. .T. .F.
>> > #13: .F. .F. .F.
>> > #14: .F. .T. .F.
>> > #15: .F. .T. .F.
>> > #16: .F. .T. .F.
>> > #17: .F. .T. .F.
>> > #18: .F. .T. .F.
>> > #19: .F. .T. .F.
>> > #20: .F. .T. .F.
>> > #21: .F. .T. .F.
>> > #22: .F. .T. .F.
>> > #23: .F. .T. .F.
>> >
>> > Realmente a lógica está diferente entre os 2.
>> >
>> > Mário Angelini
>>
>>
>> ---
>> Este email está limpo de ví­rus e malwares porque a proteção do avast!
>> Antiví­rus está ativa.
>> http://www.avast.com
>>
>
>
---
Este email está limpo de ví­rus e malwares porque a proteção do avast! Antiví­rus está ativa.
http://www.avast.com
Att.

Marcelo Coelho Silva
Brasil.
Carlos Mora
Posts: 88
Joined: Fri Jul 28, 2006 9:36 am

Re: ERRO DE LÓGICA EM XAILER 3.2 - HELP-ME

Postby Carlos Mora » Fri Jun 27, 2014 12:57 pm

Hola Marcelo,
perdone, interpreté mal el problema, pensé que hací­a referencia a
versiones anteriores de Xailer, que usaban xHarbour+BCC.
Aún así­, es probable que el problema sea el mismo: BCC es un compilador
que ya empieza a mostrar signos propios de la edad :)
MinGW es mantenido al dí­a, seguramente el problema sea el mismo que le
comenté, y para eliminar ambigí¼edades tal vez pudiese hacer la prueba de
especificar en ambos compiladores el codepage para ver si la
inconsistencia persiste.
Un saludo,
Carlos
El 27/06/2014 3:55, Marcelo Coelho Silva escribió:
> Prezado Carlos Mora,
>
> A questão é que o teste foi realizado com Harbour+MinGW e Harbour+BCC,
> somente foi trocado o Compilador C (não foi utilizado xHarbour). Ou
> Seja, apresentou problema de lógica apenas com a troca do Compilador C.
>
> Att.
>
> Marcelo Coelho Silva
> Mhacker Software do Brasil.
>
>
> Em 26/06/2014 10:36, Carlos Mora escreveu:
>> Creo que no es un problema de lógica del compilador. ¿Podrí­a ser
>> xHarbour maneja un codepage diferente del que maneja Harbour? Si los
>> codepages son distintos, los valores ASCII (en los que se basa la
>> función) podrí­an ser diferentes y eso explicarí­a el resultado diferente.
>>
>> No sé con xHarbour, pero con Harbour podemos usar
>>
>> HB_SetCodePage( [<cCodePageID>] ) --> cOldCodePageID
>>
>> Dejo un enlace donde está muy bien explicado y tiene un ejemplo bastante
>> esclarecedor:
>>
>> http://www.creasolgroup.com/xOraclipLanguageReferenceGuide/x OraClip%20Language%20Reference/Functions/Hb_setcodepage_f.en .html
>>
>>
>>
>> Un saludo,
>>
>> Carlos
>>
>> El 25/06/2014 17:28, Marcelo Coelho Silva escribió:
>>> Prezado Mario,
>>>
>>> O que poderemos fazer ? o MinGw é confiável ? Podemos utilizar um
>>> Compilador C que possui Erros de Lógica ?
>>>
>>> Fiquei Preocupado com a conversão de Compilador, passando meus Sistemas
>>> de BCC para MinGW !!!
>>>
>>> Att.
>>>
>>> Marcelo Coelho Silva
>>> Mhacke Software do Brasil.
>>>
>>>
>>> Em 04/06/2014 09:16, www[dot]eMeAsOfT[dot]com escreveu:> Marcelo:
>>> > Usando o Xailer 3.2 e
>>> > LogDebug((cLetra >= "(" .and. cLetra <= ";"),(cLetra >= "?"
>>> > .and. cLetra <= "_"),(cLetra >= "a" .and. cLetra <= "}"))
>>> >
>>> >
>>> >
>>> > BCC:
>>> > #1: .F. .T. .F.
>>> > #2: .F. .T. .F.
>>> > #3: .F. .T. .F.
>>> > #4: .F. .T. .F.
>>> > #5: .F. .T. .F.
>>> > #6: .F. .T. .F.
>>> > #7: .F. .F. .F.
>>> > #8: .F. .F. .F.
>>> > #9: .F. .T. .F.
>>> > #10: .F. .F. .F.
>>> > #11: .F. .T. .F.
>>> > #12: .F. .T. .F.
>>> > #13: .F. .F. .F.
>>> > #14: .F. .T. .F.
>>> > #15: .F. .T. .F.
>>> > #16: .F. .T. .F.
>>> > #17: .F. .T. .F.
>>> > #18: .F. .T. .F.
>>> > #19: .F. .T. .F.
>>> >
>>> > MinGW
>>> > #1: .F. .T. .F.
>>> > #2: .F. .T. .F.
>>> > #3: .F. .T. .F.
>>> > #4: .F. .T. .F.
>>> > #5: .F. .T. .F.
>>> > #6: .F. .T. .F.
>>> > #7: .F. .T. .F.
>>> > #8: .F. .T. .F.
>>> > #9: .F. .T. .F.
>>> > #10: .F. .F. .F.
>>> > #11: .F. .T. .F.
>>> > #12: .F. .T. .F.
>>> > #13: .F. .F. .F.
>>> > #14: .F. .T. .F.
>>> > #15: .F. .T. .F.
>>> > #16: .F. .T. .F.
>>> > #17: .F. .T. .F.
>>> > #18: .F. .T. .F.
>>> > #19: .F. .T. .F.
>>> > #20: .F. .T. .F.
>>> > #21: .F. .T. .F.
>>> > #22: .F. .T. .F.
>>> > #23: .F. .T. .F.
>>> >
>>> > Realmente a lógica está diferente entre os 2.
>>> >
>>> > Mário Angelini
>>>
>>>
>>> ---
>>> Este email está limpo de ví­rus e malwares porque a proteção do avast!
>>> Antiví­rus está ativa.
>>> http://www.avast.com
>>>
>>
>>
>
>
> ---
> Este email está limpo de ví­rus e malwares porque a proteção do avast!
> Antiví­rus está ativa.
> http://www.avast.com
>
User avatar
jfgimenez
Site Admin
Posts: 5635
Joined: Mon Apr 06, 2015 8:48 pm
Contact:

Re: ERRO DE LÓGICA EM XAILER 3.2 - HELP-ME

Postby jfgimenez » Fri Jun 27, 2014 2:10 pm

Marcelo,
el problema no está en BCC ni en MinGW, sino en el "codepage" que tengas
seleccionado. Antes, en xHarbour, el codepage por defecto era el inglés
(EN), que se corresponde con el código ASCII original. Pero en Harbour,
se selecciona el codepage por defecto en función del sistema operativo
donde se arranque el programa. En mi caso, por defecto me selecciona
ESWIN, pero en tu caso puede ser PTISO (no estoy seguro). Si quieres que
Harbour funcione exactamente igual que lo hací­a xHarbour, sólo tienes
que poner lo siguiente al comienzo del programa:
HB_CdPSelect( "EN" )
Por otro lado, en vez de cambiar la codepage, es mucho más apropiado y
seguro cambiar la forma en la que comparas los caracteres en esa
función. A primera vista hay dos opciones:
1) Comparar los códigos ASCII en vez de las cadenas:
nLetra := Asc( cLetra )
IF ( nLetra >= 40 .AND. nLetra <= 59 ) .OR. ;
( nLetra >= 63 .AND. nLetra <= 95 ) .OR. ;
( nLetra >= 97 .AND. nLetra <= 125 )
...
2) Utilizar el operador $
IF cLetra $
" ()*+,-./0123456789:;?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_abcdefg hijklmnopqrstuvwxyz{|} "
...
La opción 2) es, a mi modo de ver, la mejor solución a este problema.
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info

Return to “Spanish”