code: func yaml_parser_fetch_block_entry(parser *yaml_parser_t) bool {
  	// Check if the scanner is in the block context.
  	if parser.flow_level == 0 {
  		// Check if we are allowed to start a new entry.
  		if !parser.simple_key_allowed {
  			return yaml_parser_set_scanner_error(parser, "", parser.mark,
  				"block sequence entries are not allowed in this context")
  		}
  		// Add the BLOCK-SEQUENCE-START token if needed.
  		if !yaml_parser_roll_indent(parser, parser.mark.column, -1, yaml_BLOCK_SEQUENCE_START_TOKEN, parser.mark) {
  			return false
  		}
  	} else {
  		// It is an error for the '-' indicator to occur in the flow context,
  		// but we let the Parser detect and report about it because the Parser
  		// is able to point to the context.
  	}
  
  	// Reset any potential simple keys on the current flow level.
  	if !yaml_parser_remove_simple_key(parser) {
  		return false
  	}
  
  	// Simple keys are allowed after '-'.
  	parser.simple_key_allowed = true
  
  	// Consume the token.
  	start_mark := parser.mark
  	skip(parser)
  	end_mark := parser.mark
  
  	// Create the BLOCK-ENTRY token and append it to the queue.
  	token := yaml_token_t{
  		typ:        yaml_BLOCK_ENTRY_TOKEN,
  		start_mark: start_mark,
  		end_mark:   end_mark,
  	}
  	yaml_insert_token(parser, -1, &token)
  	return true
  }
docs: // Produce the BLOCK-ENTRY token.