Some help lint fixes, including a fix for help lint itself
							parent
							
								
									7ef5addd4c
								
							
						
					
					
						commit
						184de13b57
					
				| 
						 | 
				
			
			@ -41,12 +41,15 @@ HELP: +user-assigned-id+
 | 
			
		|||
{ $description "The user is responsible for choosing a primary key for tuples inserted with this database type. Keys must be unique or else the database will throw an error. Usually it is better to use a " { $link +db-assigned-id+ } "." } ;
 | 
			
		||||
 | 
			
		||||
HELP: <generator-bind>
 | 
			
		||||
{ $values { "slot-name" object } { "key" object } { "generator-singleton" object } { "type" object } { "generator-bind" generator-bind } }
 | 
			
		||||
{ $description "" } ;
 | 
			
		||||
 | 
			
		||||
HELP: <literal-bind>
 | 
			
		||||
{ $values { "key" object } { "type" object } { "value" object } { "literal-bind" literal-bind } }
 | 
			
		||||
{ $description "" } ;
 | 
			
		||||
 | 
			
		||||
HELP: <low-level-binding>
 | 
			
		||||
{ $values { "value" object } { "low-level-binding" low-level-binding } }
 | 
			
		||||
{ $description "" } ;
 | 
			
		||||
 | 
			
		||||
HELP: BIG-INTEGER
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -43,10 +43,9 @@ IN: help.lint
 | 
			
		|||
 | 
			
		||||
: check-values ( word element -- )
 | 
			
		||||
    {
 | 
			
		||||
        [ drop { [ symbol? ] [ macro? ] [ parsing-word? ] } 1|| ]
 | 
			
		||||
        [ drop "declared-effect" word-prop not ]
 | 
			
		||||
        [ nip contains-funky-elements? ]
 | 
			
		||||
        [ drop symbol? ]
 | 
			
		||||
        [ drop macro? ]
 | 
			
		||||
        [
 | 
			
		||||
            [ effect-values >array ]
 | 
			
		||||
            [ extract-values >array ]
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -5,7 +5,7 @@ heaps.private ;
 | 
			
		|||
IN: assoc-heaps
 | 
			
		||||
 | 
			
		||||
HELP: <assoc-heap>
 | 
			
		||||
{ $values { "assoc" assoc } { "heap" heap } }
 | 
			
		||||
{ $values { "assoc" assoc } { "heap" heap } { "assoc-heap" assoc-heap } }
 | 
			
		||||
{ $description "Constructs a new " { $link assoc-heap } " from two existing data structures." } ;
 | 
			
		||||
 | 
			
		||||
HELP: <unique-max-heap>
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue