11 lines
		
	
	
		
			442 B
		
	
	
	
		
			Factor
		
	
	
			
		
		
	
	
			11 lines
		
	
	
		
			442 B
		
	
	
	
		
			Factor
		
	
	
| USING: compiler.codegen.relocation help.markup help.syntax strings ;
 | |
| IN: compiler.codegen.labels
 | |
| 
 | |
| HELP: define-label
 | |
| { $values { "name" string } }
 | |
| { $description "Defines a new label with the given name. The " { $slot "offset" } " slot is filled in later." } ;
 | |
| 
 | |
| HELP: resolve-label
 | |
| { $values { "label/name" { $link label } " or " { $link string } } }
 | |
| { $description "Assigns the current " { $link compiled-offset } " to the given label." } ;
 |