| 
									
										
										
										
											2008-06-18 05:30:21 -04:00
										 |  |  | ! Copyright (C) 2008 Chris Double. | 
					
						
							| 
									
										
										
										
											2008-06-17 05:55:53 -04:00
										 |  |  | ! See http://factorcode.org/license.txt for BSD license. | 
					
						
							| 
									
										
										
										
											2008-06-18 08:42:11 -04:00
										 |  |  | USING: kernel accessors peg.javascript.tokenizer peg.javascript.parser ;
 | 
					
						
							| 
									
										
										
										
											2008-06-17 05:55:53 -04:00
										 |  |  | IN: peg.javascript | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2008-06-18 08:42:11 -04:00
										 |  |  | : parse-javascript ( string -- ast )
 | 
					
						
							| 
									
										
										
										
											2008-06-20 10:09:46 -04:00
										 |  |  |   javascript [ | 
					
						
							|  |  |  |     ast>> | 
					
						
							| 
									
										
										
										
											2008-06-18 08:42:11 -04:00
										 |  |  |   ] [ | 
					
						
							| 
									
										
										
										
											2008-06-20 10:09:46 -04:00
										 |  |  |     "Unable to parse JavaScript" throw
 | 
					
						
							| 
									
										
										
										
											2008-06-18 08:42:11 -04:00
										 |  |  |   ] if* ;
 |