mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-14 23:40:39 -08:00
Code Issues Projects Releases Wiki Activity

Add eventinterngenstring for general strings

Browse source 
Copied from Perforce
 Change: 20748
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Pekka Pirinen 1999-04-26 18:04:59 +01:00
parent 92485e8629
commit ea3e054090
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
mps/src/event.h
View file

@ -1,7 +1,7 @@
/* impl.h.event -- Event Logging Interface
*
* Copyright (C) 1997. Harlequin Group plc. All rights reserved.
* $HopeName: MMsrc!event.h(trunk.12) $
* $HopeName: MMsrc!event.h(trunk.13) $
*
* READERSHIP
*
@ -24,6 +24,7 @@ extern Res EventInit(void);
extern void EventFinish(void);
extern Word EventControl(Word, Word);
extern Word EventInternString(const char *);
extern Word EventInternGenString(size_t, const char *);
extern void EventLabelAddr(Addr, Word);
@ -101,7 +102,8 @@ extern Word EventKindControl;
#define EventInit() NOOP
#define EventFinish() NOOP
#define EventControl(r, f) (UNUSED(r), UNUSED(f), (Word)0)
#define EventInternString(l) (UNUSED(l), (Word)0)
#define EventInternString(s) (UNUSED(s), (Word)0)
#define EventInternGenString(l, s) (UNUSED(l), UNUSED(s), (Word)0)
#define EventLabelAddr(a, i) BEGIN UNUSED(a); UNUSED(i); END