mirror of
				https://github.com/flynx/Course-JavaScript.git
				synced 2025-10-31 20:10:08 +00:00 
			
		
		
		
	added a prefix construct...
Signed-off-by: Alex A. Naanou <alex.nanou@gmail.com>
This commit is contained in:
		
							parent
							
								
									4057b7c7bd
								
							
						
					
					
						commit
						ba3f6de717
					
				| @ -849,6 +849,20 @@ var BOOTSTRAP = [ | ||||
| 'infix: >= ge', | ||||
| '', | ||||
| '', | ||||
| '-- swap stack and code untill the block finishes and consumes it\'s arguments', | ||||
| '-- then swap them back...', | ||||
| ':: prefix: ( | op word -- | ) [', | ||||
| '	[', | ||||
| '		-- format the word definition...', | ||||
| '		--		NAME WORD	->	:: NAME WORD', | ||||
| '		s2b \\ :: -2 before b2s', | ||||
| '', | ||||
| '		-- the code template', | ||||
| '		[ \\ _flip \\ exec \\ WORD _flip ] clone', | ||||
| '			swap WORD replace', | ||||
| '			3 0 _swapN', | ||||
| '	] \\ exec 2 2 _swapN ]', | ||||
| '', | ||||
| '', | ||||
| '-- Tests and examples...', | ||||
| '', | ||||
|  | ||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user