CPP (antaŭtraktilo): Malsamoj inter versioj

[kontrolita revizio][kontrolita revizio]
Enhavo forigita Enhavo aldonita
multaj kosmetikaj ŝanĝoj
Etikedo: Iksokodo
 
Linio 52:
 
<syntaxhighlight lang="c">
#define AUXTO auto
#define ELIRU break
#define OKAZO case
#define SIGNA char
#define SIGNAJ char
#define KOMPLEKSA complex
#define KOMPLEKSAJ complex
#define KONST const
#define PLU continue
#define CETERE default
#define FARU do
#define DUOBLA double
#define DUOBLAJ double
#define ALIE else
#define ENUM enum
#define EKSTERA extern
#define EKSTERAJ extern
#define REELA float
#define REELAJ float
#define POR for
#define AL goto
#define SE if
#define IMAGINARA imaginary
#define MALFERMITA inline
#define ENTJERA int
#define ENTJERAJ int
#define LONGA long
#define LONGAJ long
#define REGXISTRO register
#define REGXISTROJ register
#define EKSKLUZIVA restrict
#define EKSKLUZIVAJ restrict
#define REEN return
#define KURTA short
#define KURTAJ short
#define SIGNUMA signed
#define SIGNUMAJ signed
#define DABAJTOJ sizeof
#define STATIKA static
#define STATIKAJ static
#define RIKORDO struct
#define STRUKTURO struct
#define ELEKTU switch
#define TIPDIFINO typedef
#define UNIO union
#define NATURA unsigned
#define NATURAJ unsigned
#define VAKA void
#define VARIEMA volatile
#define VARIEMAJ volatile
#define DUM while
</syntaxhighlight>
 
Linio 108:
 
#include "eoc.h"
ENTJERA cxen_al_ent(SIGNA *cx)
{
ENTJERAJ i, n, minuso = 0; /* lokaj variabloj */
POR(i = 0; cx[i] == ' ' || cx[i] == '\n' || cx[i] == '\t'; i++) ;
ELEKTU(cx[i]) {
OKAZO '-': minuso = 1;
OKAZO '+': i++;
}
POR(n = 0; cx[i] >= '0' && cx[i] <= '9';)
n = 10 * n + cx[i++] - '0';
REEN minuso ? -n : n ;
}
 
Linio 126:
4 al_ent.o
$
$ '''cpp''' -P al_ent.c
int cxen_al_ent(char *cx)
{
Linio 139:
return minuso ? -n : n ;
}
$
 
[[Kategorio:Komputikaj lingvoj]]