diff options
| author | mRnea <akannemre@gmail.com> | 2024-08-22 00:24:19 +0300 | 
|---|---|---|
| committer | mRnea <akannemre@gmail.com> | 2024-08-22 00:24:19 +0300 | 
| commit | 4c8409da359cf0da14214ccc939c10ac759f76a5 (patch) | |
| tree | b9af87c1a47a401503992b280b5253d00957ceb6 /test | |
| parent | 4367febcd70e9bb7538cd168917ec3c7d3b0a6f3 (diff) | |
added new examples
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 | 
