opengl no longer depends on *.lib
							parent
							
								
									b2fa4e2f07
								
							
						
					
					
						commit
						b886718609
					
				| 
						 | 
				
			
			@ -1,6 +1,6 @@
 | 
			
		|||
USING: alien alien.syntax combinators kernel parser sequences
 | 
			
		||||
system words namespaces hashtables init math arrays assocs
 | 
			
		||||
sequences.lib continuations ;
 | 
			
		||||
continuations ;
 | 
			
		||||
 | 
			
		||||
ERROR: unknown-gl-platform ;
 | 
			
		||||
<< {
 | 
			
		||||
| 
						 | 
				
			
			@ -30,7 +30,7 @@ reset-gl-function-number-counter
 | 
			
		|||
: gl-function-pointer ( names n -- funptr )
 | 
			
		||||
    gl-function-context 2array dup +gl-function-pointers+ get-global at
 | 
			
		||||
    [ 2nip ] [
 | 
			
		||||
        >r [ gl-function-address ] attempt-each 
 | 
			
		||||
        >r [ gl-function-address ] map [ ] find nip
 | 
			
		||||
        dup [ "OpenGL function not available" throw ] unless
 | 
			
		||||
        dup r>
 | 
			
		||||
        +gl-function-pointers+ get-global set-at
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -1,5 +1,5 @@
 | 
			
		|||
USING: help.markup help.syntax io kernel math quotations
 | 
			
		||||
opengl.gl multiline assocs vocabs.loader sequences ;
 | 
			
		||||
opengl.gl assocs vocabs.loader sequences ;
 | 
			
		||||
IN: opengl
 | 
			
		||||
 | 
			
		||||
HELP: gl-color
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue