COMPORT – Compilador Portugol - Nilo Menezes

FUNCOES.CPP
#include
#include
#define FUNCOES
#include "funcoes.h"
long
fASH (long R, long c)
{
long t, s;
const m = (1 = 0)
for (; c >= 0; c--)
t = 1;
t = (t & !m) + s;
return (t);
}
long
fLSH (long R, long c)
{
long t;
t = R;
if (c >= 0)
for (; c >= 0; c--)
t = t > 1;
return (t);
}
int
ODD (long x)
{
return ((1 & x));
}
int
SHORT (long x)
{
return ((0xFFFF & x));
}
char minusculaC(char texto)
{
char minus[] = "áéíóúâêîôûäëïöüÿãõàèìòùñç";
char maius[] = "ÁÉÍÓÚÂÊÎÔÛÄËÏÖÜYÃÕÀÈÌÒÙÑÇ";
char *c;
if(texto>='A' && texto