14 lines
		
	
	
		
			490 B
		
	
	
	
		
			Factor
		
	
	
			
		
		
	
	
			14 lines
		
	
	
		
			490 B
		
	
	
	
		
			Factor
		
	
	
USING: kernel http.server help.markup help.syntax http
 | 
						|
vocabs.loader ;
 | 
						|
IN: furnace.json
 | 
						|
 | 
						|
HELP: <json-content>
 | 
						|
{ $values { "body" object } { "response" response } }
 | 
						|
{ $description "Creates an HTTP response which serves a serialized JSON object to the client." } ;
 | 
						|
 | 
						|
ARTICLE: "furnace.json" "Furnace JSON support"
 | 
						|
"The " { $vocab-link "furnace.json" } " vocabulary provides a utility word for serving HTTP responses with JSON content."
 | 
						|
{ $subsections <json-content> } ;
 | 
						|
 | 
						|
ABOUT: "furnace.json"
 |