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 |