diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/include.kurt | 3 | ||||
| -rw-r--r-- | test/print.kurt | 6 | ||||
| -rw-r--r-- | test/std.kurt | 33 | 
3 files changed, 6 insertions, 36 deletions
| diff --git a/test/include.kurt b/test/include.kurt deleted file mode 100644 index 80b69d2..0000000 --- a/test/include.kurt +++ /dev/null @@ -1,3 +0,0 @@ -kütüphane "std.lorth" - -stdout "Merhaba Dünya!\n" write
\ No newline at end of file diff --git a/test/print.kurt b/test/print.kurt new file mode 100644 index 0000000..f82f7a4 --- /dev/null +++ b/test/print.kurt @@ -0,0 +1,6 @@ +;; test +;; (format nil "Merhaba Dunya!~%") + +kütüphane "std.kurt" + +stdout "Merhaba Dunya!\n" write
\ No newline at end of file diff --git a/test/std.kurt b/test/std.kurt deleted file mode 100644 index 97fc60b..0000000 --- a/test/std.kurt +++ /dev/null @@ -1,33 +0,0 @@ -;; Currently makro stack notation is ignored by the compiler. -makro sys-write  1 son -makro write (fd string -- ) -    değiş sys-write syscall-3 son -makro stdout 1 son - -makro / (a b -- (a / b))  divmod düş son -makro % (a b -- (a % b))  divmod değiş düş son -makro 2eş (a b -- a b a b)  üst üst son - -makro load64 (bel -- a) -    7 + 0 -    8 << üst oku + değiş 1 - değiş -    8 << üst oku + değiş 1 - değiş -    8 << üst oku + değiş 1 - değiş -    8 << üst oku + değiş 1 - değiş -    8 << üst oku + değiş 1 - değiş -    8 << üst oku + değiş 1 - değiş -    8 << üst oku + değiş 1 - değiş -    8 << üst oku + değiş düş -son - -makro byte-max  255 son ;; 2^8 - 1 = 255 -makro store64 (bel a -- ) -    2eş byte-max & yaz 8 >> değiş 1 + değiş -    2eş byte-max & yaz 8 >> değiş 1 + değiş -    2eş byte-max & yaz 8 >> değiş 1 + değiş -    2eş byte-max & yaz 8 >> değiş 1 + değiş -    2eş byte-max & yaz 8 >> değiş 1 + değiş -    2eş byte-max & yaz 8 >> değiş 1 + değiş -    2eş byte-max & yaz 8 >> değiş 1 + değiş -    2eş byte-max & yaz 8 >> düş düş -son
\ No newline at end of file | 
