home *** CD-ROM | disk | FTP | other *** search
- /*-------------------------------------------------------*/
- /* Einige nützliche Macros fuer */
- /* den Umgang mit C-Compilern */
- /* Ein Beispiel zum C-ABC Teil 3 */
- /* PASCAL 3/88 */
- /*-------------------------------------------------------*/
-
- #define sqr(a) (a)*(a) /* quadrieren */
-
- #define abs(a) ((a) < 0) ? (-(a)) : (a) /* Betrag */
-
- /* nützliche defines für Pascal-Programmierer */
-
- #define not(a) !(a) /* logische Negierung */
-
- #define then
-
- #define begin {
-
- #define end ;}
-
- #define repeat do{
-
- #define until(a) }while(!(a));
-