mirror of
https://github.com/Zeal-Operating-System/ZealOS.git
synced 2025-03-13 11:38:16 +00:00
8 lines
499 B
Text
Executable file
8 lines
499 B
Text
Executable file
$HL,1$$WW,0$#define __DATE__ #exe{StreamPrint("\"%D\"", Now);}
|
|
#define __TIME__ #exe{StreamPrint("\"%T\"", Now);}
|
|
#define __LINE__ #exe{StreamPrint("%d", Fs->last_cc->lex_include_stack->line_num);}
|
|
#define __CMD_LINE__ #exe{StreamPrint("%d", Fs->last_cc->flags & CCF_CMD_LINE && Fs->last_cc->lex_include_stack->depth < 1);}
|
|
#define __FILE__ #exe{StreamPrint("\"%s\"", Fs->last_cc->lex_include_stack->full_name);}
|
|
#define __DIR__ #exe{StreamDir;}
|
|
|
|
See $LK,"::/Demo/Directives.ZC"$.$HL,0$$WW,1$
|