diff options
| author | Xander <xander@icth.xyz> | 2023-07-04 13:26:09 +0200 |
|---|---|---|
| committer | Xander <xander@icth.xyz> | 2023-07-04 13:26:09 +0200 |
| commit | 415f75c275c991949ef7c9d2c62d07e8eba761b5 (patch) | |
| tree | f52ea1c30e179b717ca10c6d170b723e3c5132c6 /kernel/output/print.dats | |
| parent | 5adc7cf997d481a6afb3ed95573d6eff44cbdd5b (diff) | |
| download | ats-os-415f75c275c991949ef7c9d2c62d07e8eba761b5.tar.xz ats-os-415f75c275c991949ef7c9d2c62d07e8eba761b5.zip | |
Overloading print + cleanup
Diffstat (limited to 'kernel/output/print.dats')
| -rw-r--r-- | kernel/output/print.dats | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/kernel/output/print.dats b/kernel/output/print.dats new file mode 100644 index 0000000..22fe575 --- /dev/null +++ b/kernel/output/print.dats @@ -0,0 +1,15 @@ +#include "share/atspre_staload.hats" + +#define ATS_DYNLOADFLAG 0 + +staload "kernel/output/writer.sats" + +extern fun print_newline() : void +implement print_newline() : void = put_string("\n") + +extern fun assert_errmsg(b: bool, msg: string) : void +implement assert_errmsg(b: bool, msg: string) : void = put_string(msg) + +overload print with put_string of 1 + +macdef assertloc(tf) = assert_errmsg (,(tf), $mylocation) |