mirror of
				https://github.com/Perlmint/glew-cmake.git
				synced 2025-11-03 22:04:16 +00:00 
			
		
		
		
	Tolerate lowercase hex digits in enumerants, in addition to 0-9, A-F
This commit is contained in:
		
							parent
							
								
									54ce3fb039
								
							
						
					
					
						commit
						3c83effd40
					
				@ -149,7 +149,7 @@ my %regex = (
 | 
				
			|||||||
    prefix   => qr/^(?:[aw]?gl|glX)/, # gl | agl | wgl | glX
 | 
					    prefix   => qr/^(?:[aw]?gl|glX)/, # gl | agl | wgl | glX
 | 
				
			||||||
    tprefix  => qr/^(?:[AW]?GL|GLX)_/, # GL_ | AGL_ | WGL_ | GLX_
 | 
					    tprefix  => qr/^(?:[AW]?GL|GLX)_/, # GL_ | AGL_ | WGL_ | GLX_
 | 
				
			||||||
    section  => compile_regex('^(', join('|', @sections), ')$'), # sections in spec
 | 
					    section  => compile_regex('^(', join('|', @sections), ')$'), # sections in spec
 | 
				
			||||||
    token    => qr/^([A-Z0-9][A-Z0-9_x]*):?\s+((?:0x)?[0-9A-F]+)([^\?]*)$/, # define tokens
 | 
					    token    => qr/^([A-Z0-9][A-Z0-9_x]*):?\s+((?:0x)?[0-9A-Fa-f]+)(|\s[^\?]*)$/, # define tokens
 | 
				
			||||||
    types    => compile_regex('\b(', join('|', keys %typemap), ')\b'), # var types
 | 
					    types    => compile_regex('\b(', join('|', keys %typemap), ')\b'), # var types
 | 
				
			||||||
    voidtype => compile_regex('\b(', keys %voidtypemap, ')\b '), # void type
 | 
					    voidtype => compile_regex('\b(', keys %voidtypemap, ')\b '), # void type
 | 
				
			||||||
);
 | 
					);
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
		Reference in New Issue
	
	Block a user