diff options
author | Adrian Kummerlaender | 2017-04-19 22:22:18 +0200 |
---|---|---|
committer | Adrian Kummerlaender | 2017-04-19 22:22:18 +0200 |
commit | 39099c0398a978965a71409bcec67f20a8c02fc7 (patch) | |
tree | f330e32382d883e8cdb84203a565f61735fa2856 /library | |
parent | fd8a28b1ee22993bf70b0f451b46ab0a631b0c17 (diff) | |
download | slang-39099c0398a978965a71409bcec67f20a8c02fc7.tar slang-39099c0398a978965a71409bcec67f20a8c02fc7.tar.gz slang-39099c0398a978965a71409bcec67f20a8c02fc7.tar.bz2 slang-39099c0398a978965a71409bcec67f20a8c02fc7.tar.lz slang-39099c0398a978965a71409bcec67f20a8c02fc7.tar.xz slang-39099c0398a978965a71409bcec67f20a8c02fc7.tar.zst slang-39099c0398a978965a71409bcec67f20a8c02fc7.zip |
Add base library for non-primitive words
Diffstat (limited to 'library')
-rw-r--r-- | library/base.slang | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/library/base.slang b/library/base.slang new file mode 100644 index 0000000..dc2c725 --- /dev/null +++ b/library/base.slang @@ -0,0 +1,4 @@ +§ abs dup 0 < if -1 * then else ; + +§ min ovr ovr < if pop then swp pop else ; +§ max ovr ovr < if swp pop then pop else ; |