9 lines
484 B
Plaintext
9 lines
484 B
Plaintext
$HL,1$$WW,0$#define __DATE__ #exe{StreamPrint("\"%D\"",Now);}
|
|
#define __TIME__ #exe{StreamPrint("\"%T\"",Now);}
|
|
#define __LINE__ #exe{StreamPrint("%d",Fs->last_lex->lex_include_stk->line_num);}
|
|
#define __CMD_LINE__ #exe{StreamPrint("%d",Fs->last_lex->flags&CCF_CMD_LINE && Fs->last_lex->lex_include_stk->depth<2);}
|
|
#define __FILE__ #exe{StreamPrint("\"%s\"",Fs->last_lex->lex_include_stk->full_name);}
|
|
#define __DIR__ #exe{StreamDir;}
|
|
|
|
See $LK,"::/Demo/Directives.CPP"$.$HL,0$$WW,1$
|