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

minor fix...

Browse Source 
Signed-off-by: Alex A. Naanou <alex.nanou@gmail.com>
This commit is contained in:
Alex A. Naanou 2016-12-18 16:40:57 +03:00
parent 54c79a049c
commit e749977e11
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Slang/slang.js
View File

@ -460,7 +460,8 @@ var NAMESPACE = {
// get item... // get item...
// o k -- o v // o k -- o v
'item': function(context){ 'item': function(context){
return context.stack[context.stack.length - 1][context.stack.pop()] }, var k = context.stack.pop()
return context.stack[context.stack.length - 1][k] },
// remove/pop item from object... // remove/pop item from object...
// o k -- o v // o k -- o v
@ -507,7 +508,7 @@ var NAMESPACE = {
var BOOTSTRAP = [ var BOOTSTRAP = [
'-------------------------------------------------------------------------------', '-------------------------------------------------------------------------------',
'', '',
' Slang is a simple and complete [S]tack [lang]uage.', ' [S]lang is a [s]imple and complete [S]tack [lang]uage.',
'', '',
' Slang was designed for three main reasons:', ' Slang was designed for three main reasons:',
' - a means to experiment with several aspects of language design,', ' - a means to experiment with several aspects of language design,',
@ -745,7 +746,8 @@ var BOOTSTRAP = [
'', '',
'', '',
'-------------------------------------------------------------------------------', '-------------------------------------------------------------------------------',
's2b drop', 's2b drop -- cleanup after docs...',
'ns {} proto! ns! . -- keep new words in a seporate context...',
'--', '--',
'-- With that out of the way, let\'s start with the bootstrap...', '-- With that out of the way, let\'s start with the bootstrap...',
'', '',
@ -767,7 +769,7 @@ var BOOTSTRAP = [
' [ rot2 ns tor2 item! . ] item!', ' [ rot2 ns tor2 item! . ] item!',
' -- Word definition...', ' -- Word definition...',
' -- syntax: :: <ident> <value>', ' -- syntax: :: <ident> <value>',
' :: ( -- )', ' :: ( | w b -- | )',
' [ \\word! \\exec 2 2 _swapN ] item!', ' [ \\word! \\exec 2 2 _swapN ] item!',
'.', '.',
'', '',