flynx/Slang
1
0
Fork 0
mirror of https://github.com/flynx/Slang.git synced 2025-10-31 19:40:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

updated the logic operators -- thanks to Anna Puchkina for pointing out that my implementation was way too over-comlicated ;)

Browse Source 
Signed-off-by: Alex A. Naanou <alex.nanou@gmail.com>
This commit is contained in:
Alex A. Naanou 2014-02-13 02:58:15 +04:00
parent 3cc915c553
commit 1db04d7f16
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Slang/slang.js
View File

@ -670,8 +670,8 @@ var BOOTSTRAP = [
'', '',
'-- we already have gt and eq, now let\'s define the rest...', '-- we already have gt and eq, now let\'s define the rest...',
':: ne ( a b -- c ) [ eq not ]', ':: ne ( a b -- c ) [ eq not ]',
':: lt ( a b -- c ) [ dup2 eq not rot gt not tor and ]', ':: lt ( a b -- c ) [ swap gt ]',
':: ge ( a b -- c ) [ dup2 eq rot gt tor or ]', ':: ge ( a b -- c ) [ lt not ]',
':: le ( a b -- c ) [ gt not ]', ':: le ( a b -- c ) [ gt not ]',
'', '',
':: inc ( a -- b ) [ 1 add ]', ':: inc ( a -- b ) [ 1 add ]',