ack/lang/cem/cemcom.ansi/pragma.c
David Given c1aca7dae5 First milestone of replacing the build system.
--HG--
branch : dtrg-buildsystem
rename : lang/cem/cpp.ansi/Parameters => lang/cem/cpp.ansi/parameters.h
2013-05-12 20:45:55 +01:00

46 lines
778 B
C

/*
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*/
/* $Id$ */
/* PREPROCESSOR: PRAGMA INTERPRETER */
#include "parameters.h"
#define P_UNKNOWN 0
#define NR_PRAGMAS 0
struct pkey {
char *pk_name;
int pk_key;
} pragmas[NR_PRAGMAS + 1] = {
{0, P_UNKNOWN}
};
extern struct idf *GetIdentifier();
do_pragma()
{
#if NR_PRAGMAS
register struct pkey *pkp = &pragmas[0];
#endif
register struct idf *id = GetIdentifier(1);
if (id != (struct idf *)0) {
#if NR_PRAGMAS
while(pkp->pk_name) {
if (strcmp(pkp->pk_name, id->id_text) == 0)
break;
pkp++;
}
switch (pkp->pk_key) {
case P_UNKNOWN:
default:
break;
}
#endif
SkipToNewLine();
}
}