Merge branch 'master' of git://factorcode.org/git/factor into llvm
commit
cf64ea4583
|
@ -2,44 +2,27 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: accessors assocs heaps kernel namespaces sequences fry math
|
||||
combinators arrays sorting compiler.utilities
|
||||
compiler.cfg.linear-scan.live-intervals
|
||||
compiler.cfg.linear-scan.allocation.coalescing
|
||||
compiler.cfg.linear-scan.allocation.spilling
|
||||
compiler.cfg.linear-scan.allocation.splitting
|
||||
compiler.cfg.linear-scan.allocation.state ;
|
||||
IN: compiler.cfg.linear-scan.allocation
|
||||
|
||||
: relevant-ranges ( new inactive -- new' inactive' )
|
||||
! Slice off all ranges of 'inactive' that precede the start of 'new'
|
||||
[ [ ranges>> ] bi@ ] [ nip start>> ] 2bi '[ to>> _ >= ] filter ;
|
||||
: free-positions ( new -- assoc )
|
||||
vreg>> reg-class>> registers get at [ 1/0. ] H{ } map>assoc ;
|
||||
|
||||
: intersect-live-range ( range1 range2 -- n/f )
|
||||
2dup [ from>> ] bi@ > [ swap ] when
|
||||
2dup [ to>> ] [ from>> ] bi* >= [ nip from>> ] [ 2drop f ] if ;
|
||||
: active-positions ( new -- assoc )
|
||||
vreg>> active-intervals-for [ reg>> 0 ] H{ } map>assoc ;
|
||||
|
||||
: intersect-live-ranges ( ranges1 ranges2 -- n )
|
||||
{
|
||||
{ [ over empty? ] [ 2drop 1/0. ] }
|
||||
{ [ dup empty? ] [ 2drop 1/0. ] }
|
||||
[
|
||||
2dup [ first ] bi@ intersect-live-range dup [ 2nip ] [
|
||||
drop
|
||||
2dup [ first from>> ] bi@ <
|
||||
[ [ rest-slice ] dip ] [ rest-slice ] if
|
||||
intersect-live-ranges
|
||||
] if
|
||||
]
|
||||
} cond ;
|
||||
|
||||
: intersect-inactive ( new inactive -- n )
|
||||
relevant-ranges intersect-live-ranges ;
|
||||
: inactive-positions ( new -- assoc )
|
||||
dup vreg>> inactive-intervals-for
|
||||
[ [ reg>> swap ] keep relevant-ranges intersect-live-ranges ]
|
||||
with H{ } map>assoc ;
|
||||
|
||||
: compute-free-pos ( new -- free-pos )
|
||||
dup vreg>>
|
||||
[ nip reg-class>> registers get at [ 1/0. ] H{ } map>assoc ]
|
||||
[ inactive-intervals-for [ [ reg>> swap ] keep intersect-inactive ] with H{ } map>assoc ]
|
||||
[ nip active-intervals-for [ reg>> 0 ] H{ } map>assoc ]
|
||||
2tri 3array assoc-combine
|
||||
>alist alist-max ;
|
||||
[ free-positions ] [ inactive-positions ] [ active-positions ] tri
|
||||
3array assoc-combine >alist alist-max ;
|
||||
|
||||
: no-free-registers? ( result -- ? )
|
||||
second 0 = ; inline
|
||||
|
|
|
@ -1,18 +1,28 @@
|
|||
! Copyright (C) 2009 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: accessors kernel sequences
|
||||
combinators.short-circuit
|
||||
compiler.cfg.linear-scan.live-intervals
|
||||
compiler.cfg.linear-scan.allocation.state ;
|
||||
IN: compiler.cfg.linear-scan.allocation.coalescing
|
||||
|
||||
: active-interval ( vreg -- live-interval )
|
||||
dup [ dup active-intervals-for [ vreg>> = ] with find nip ] when ;
|
||||
|
||||
: intersects-inactive-intervals? ( live-interval -- ? )
|
||||
dup vreg>> inactive-intervals-for
|
||||
[ relevant-ranges intersect-live-ranges 1/0. = ] with all? ;
|
||||
|
||||
: coalesce? ( live-interval -- ? )
|
||||
[ start>> ] [ copy-from>> active-interval ] bi
|
||||
dup [ end>> = ] [ 2drop f ] if ;
|
||||
{
|
||||
[ copy-from>> active-interval ]
|
||||
[ [ start>> ] [ copy-from>> active-interval end>> ] bi = ]
|
||||
[ intersects-inactive-intervals? ]
|
||||
} 1&& ;
|
||||
|
||||
: coalesce ( live-interval -- )
|
||||
dup copy-from>> active-interval
|
||||
[ [ add-active ] [ [ delete-active ] [ add-handled ] bi ] bi* ]
|
||||
[ reg>> >>reg drop ]
|
||||
2bi ;
|
||||
|
|
@ -1414,7 +1414,7 @@ USING: math.private ;
|
|||
{ uses { 5 10 } }
|
||||
{ ranges V{ T{ live-range f 5 10 } } }
|
||||
}
|
||||
intersect-inactive
|
||||
relevant-ranges intersect-live-ranges
|
||||
] unit-test
|
||||
|
||||
! Bug in live spill slots calculation
|
||||
|
|
|
@ -144,3 +144,25 @@ M: ##copy-float compute-live-intervals*
|
|||
live-intervals set
|
||||
<reversed> [ compute-live-intervals-step ] each
|
||||
] keep values dup finish-live-intervals ;
|
||||
|
||||
: relevant-ranges ( new inactive -- new' inactive' )
|
||||
! Slice off all ranges of 'inactive' that precede the start of 'new'
|
||||
[ [ ranges>> ] bi@ ] [ nip start>> ] 2bi '[ to>> _ >= ] filter ;
|
||||
|
||||
: intersect-live-range ( range1 range2 -- n/f )
|
||||
2dup [ from>> ] bi@ > [ swap ] when
|
||||
2dup [ to>> ] [ from>> ] bi* >= [ nip from>> ] [ 2drop f ] if ;
|
||||
|
||||
: intersect-live-ranges ( ranges1 ranges2 -- n )
|
||||
{
|
||||
{ [ over empty? ] [ 2drop 1/0. ] }
|
||||
{ [ dup empty? ] [ 2drop 1/0. ] }
|
||||
[
|
||||
2dup [ first ] bi@ intersect-live-range dup [ 2nip ] [
|
||||
drop
|
||||
2dup [ first from>> ] bi@ <
|
||||
[ [ rest-slice ] dip ] [ rest-slice ] if
|
||||
intersect-live-ranges
|
||||
] if
|
||||
]
|
||||
} cond ;
|
||||
|
|
|
@ -0,0 +1,85 @@
|
|||
! Copyright (C) 2009 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: kernel assocs sequences accessors fry combinators grouping
|
||||
sets compiler.cfg compiler.cfg.hats
|
||||
compiler.cfg.stack-analysis.state ;
|
||||
IN: compiler.cfg.stack-analysis.merge
|
||||
|
||||
: initial-state ( bb states -- state ) 2drop <state> ;
|
||||
|
||||
: single-predecessor ( bb states -- state ) nip first clone ;
|
||||
|
||||
ERROR: must-equal-failed seq ;
|
||||
|
||||
: must-equal ( seq -- elt )
|
||||
dup all-equal? [ first ] [ must-equal-failed ] if ;
|
||||
|
||||
: merge-heights ( state predecessors states -- state )
|
||||
nip
|
||||
[ [ ds-height>> ] map must-equal >>ds-height ]
|
||||
[ [ rs-height>> ] map must-equal >>rs-height ] bi ;
|
||||
|
||||
: insert-peek ( predecessor loc -- vreg )
|
||||
! XXX critical edges
|
||||
'[ _ ^^peek ] add-instructions ;
|
||||
|
||||
: merge-loc ( predecessors locs>vregs loc -- vreg )
|
||||
! Insert a ##phi in the current block where the input
|
||||
! is the vreg storing loc from each predecessor block
|
||||
[ '[ [ _ ] dip at ] map ] keep
|
||||
'[ [ ] [ _ insert-peek ] ?if ] 2map
|
||||
dup all-equal? [ first ] [ ^^phi ] if ;
|
||||
|
||||
: (merge-locs) ( predecessors assocs -- assoc )
|
||||
dup [ keys ] map concat prune
|
||||
[ [ 2nip ] [ merge-loc ] 3bi ] with with
|
||||
H{ } map>assoc ;
|
||||
|
||||
: merge-locs ( state predecessors states -- state )
|
||||
[ locs>vregs>> ] map (merge-locs) >>locs>vregs ;
|
||||
|
||||
: merge-actual-loc ( locs>vregs loc -- vreg )
|
||||
'[ [ _ ] dip at ] map
|
||||
dup all-equal? [ first ] [ drop f ] if ;
|
||||
|
||||
: merge-actual-locs ( state predecessors states -- state )
|
||||
nip
|
||||
[ actual-locs>vregs>> ] map
|
||||
dup [ keys ] map concat prune
|
||||
[ [ nip ] [ merge-actual-loc ] 2bi ] with
|
||||
H{ } map>assoc
|
||||
[ nip ] assoc-filter
|
||||
>>actual-locs>vregs ;
|
||||
|
||||
: merge-changed-locs ( state predecessors states -- state )
|
||||
nip [ changed-locs>> ] map assoc-combine >>changed-locs ;
|
||||
|
||||
ERROR: cannot-merge-poisoned states ;
|
||||
|
||||
: multiple-predecessors ( bb states -- state )
|
||||
dup [ not ] any? [
|
||||
[ <state> ] 2dip
|
||||
sift merge-heights
|
||||
] [
|
||||
dup [ poisoned?>> ] any? [
|
||||
cannot-merge-poisoned
|
||||
] [
|
||||
[ state new ] 2dip
|
||||
[ predecessors>> ] dip
|
||||
{
|
||||
[ merge-locs ]
|
||||
[ merge-actual-locs ]
|
||||
[ merge-heights ]
|
||||
[ merge-changed-locs ]
|
||||
} 2cleave
|
||||
] if
|
||||
] if ;
|
||||
|
||||
: merge-states ( bb states -- state )
|
||||
! If any states are poisoned, save all registers
|
||||
! to the stack in each branch
|
||||
dup length {
|
||||
{ 0 [ initial-state ] }
|
||||
{ 1 [ single-predecessor ] }
|
||||
[ drop multiple-predecessors ]
|
||||
} case ;
|
|
@ -1,42 +1,19 @@
|
|||
! Copyright (C) 2009 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: accessors assocs kernel namespaces math sequences fry grouping
|
||||
sets make combinators compiler.cfg.copy-prop compiler.cfg.def-use
|
||||
compiler.cfg.instructions compiler.cfg.registers compiler.cfg.rpo
|
||||
compiler.cfg.hats compiler.cfg ;
|
||||
sets make combinators
|
||||
compiler.cfg
|
||||
compiler.cfg.copy-prop
|
||||
compiler.cfg.def-use
|
||||
compiler.cfg.instructions
|
||||
compiler.cfg.registers
|
||||
compiler.cfg.rpo
|
||||
compiler.cfg.hats
|
||||
compiler.cfg.stack-analysis.state
|
||||
compiler.cfg.stack-analysis.merge ;
|
||||
IN: compiler.cfg.stack-analysis
|
||||
|
||||
! Convert stack operations to register operations
|
||||
|
||||
! If 'poisoned' is set, disregard height information. This is set if we don't have
|
||||
! height change information for an instruction.
|
||||
TUPLE: state locs>vregs actual-locs>vregs changed-locs ds-height rs-height poisoned? ;
|
||||
|
||||
: <state> ( -- state )
|
||||
state new
|
||||
H{ } clone >>locs>vregs
|
||||
H{ } clone >>actual-locs>vregs
|
||||
H{ } clone >>changed-locs
|
||||
0 >>ds-height
|
||||
0 >>rs-height ;
|
||||
|
||||
M: state clone
|
||||
call-next-method
|
||||
[ clone ] change-locs>vregs
|
||||
[ clone ] change-actual-locs>vregs
|
||||
[ clone ] change-changed-locs ;
|
||||
|
||||
: loc>vreg ( loc -- vreg ) state get locs>vregs>> at ;
|
||||
|
||||
: record-peek ( dst loc -- )
|
||||
state get [ locs>vregs>> set-at ] [ actual-locs>vregs>> set-at ] 3bi ;
|
||||
|
||||
: changed-loc ( loc -- )
|
||||
state get changed-locs>> conjoin ;
|
||||
|
||||
: record-replace ( src loc -- )
|
||||
dup changed-loc state get locs>vregs>> set-at ;
|
||||
|
||||
GENERIC: height-for ( loc -- n )
|
||||
|
||||
M: ds-loc height-for drop state get ds-height>> ;
|
||||
|
@ -64,12 +41,6 @@ M: rs-loc untranslate-loc (translate-loc) + <rs-loc> ;
|
|||
[ 2drop ] [ untranslate-loc ##replace ] if
|
||||
] assoc-each ;
|
||||
|
||||
: clear-state ( state -- )
|
||||
[ locs>vregs>> clear-assoc ]
|
||||
[ actual-locs>vregs>> clear-assoc ]
|
||||
[ changed-locs>> clear-assoc ]
|
||||
tri ;
|
||||
|
||||
ERROR: poisoned-state state ;
|
||||
|
||||
: sync-state ( -- )
|
||||
|
@ -84,6 +55,14 @@ ERROR: poisoned-state state ;
|
|||
! Abstract interpretation
|
||||
GENERIC: visit ( insn -- )
|
||||
|
||||
: adjust-ds ( n -- ) state get [ + ] change-ds-height drop ;
|
||||
|
||||
M: ##inc-d visit [ , ] [ n>> adjust-ds ] bi ;
|
||||
|
||||
: adjust-rs ( n -- ) state get [ + ] change-rs-height drop ;
|
||||
|
||||
M: ##inc-r visit [ , ] [ n>> adjust-rs ] bi ;
|
||||
|
||||
! Instructions which don't have any effect on the stack
|
||||
UNION: neutral-insn
|
||||
##flushable
|
||||
|
@ -113,14 +92,6 @@ t local-only? set-global
|
|||
M: sync-if-back-edge visit
|
||||
sync-state? [ sync-state ] when , ;
|
||||
|
||||
: adjust-d ( n -- ) state get [ + ] change-ds-height drop ;
|
||||
|
||||
M: ##inc-d visit [ , ] [ n>> adjust-d ] bi ;
|
||||
|
||||
: adjust-r ( n -- ) state get [ + ] change-rs-height drop ;
|
||||
|
||||
M: ##inc-r visit [ , ] [ n>> adjust-r ] bi ;
|
||||
|
||||
: eliminate-peek ( dst src -- )
|
||||
! the requested stack location is already in 'src'
|
||||
[ ##copy ] [ swap copies get set-at ] 2bi ;
|
||||
|
@ -138,7 +109,7 @@ M: ##copy visit
|
|||
[ call-next-method ] [ record-copy ] bi ;
|
||||
|
||||
M: ##call visit
|
||||
[ call-next-method ] [ height>> adjust-d ] bi ;
|
||||
[ call-next-method ] [ height>> adjust-ds ] bi ;
|
||||
|
||||
! Instructions that poison the stack state
|
||||
UNION: poison-insn
|
||||
|
@ -167,7 +138,7 @@ UNION: kill-vreg-insn
|
|||
M: kill-vreg-insn visit sync-state , ;
|
||||
|
||||
: visit-alien-node ( node -- )
|
||||
params>> [ out-d>> length ] [ in-d>> length ] bi - adjust-d ;
|
||||
params>> [ out-d>> length ] [ in-d>> length ] bi - adjust-ds ;
|
||||
|
||||
M: ##alien-invoke visit
|
||||
[ call-next-method ] [ visit-alien-node ] bi ;
|
||||
|
@ -180,87 +151,6 @@ M: ##alien-callback visit , ;
|
|||
! Maps basic-blocks to states
|
||||
SYMBOLS: state-in state-out ;
|
||||
|
||||
: initial-state ( bb states -- state ) 2drop <state> ;
|
||||
|
||||
: single-predecessor ( bb states -- state ) nip first clone ;
|
||||
|
||||
ERROR: must-equal-failed seq ;
|
||||
|
||||
: must-equal ( seq -- elt )
|
||||
dup all-equal? [ first ] [ must-equal-failed ] if ;
|
||||
|
||||
: merge-heights ( state predecessors states -- state )
|
||||
nip
|
||||
[ [ ds-height>> ] map must-equal >>ds-height ]
|
||||
[ [ rs-height>> ] map must-equal >>rs-height ] bi ;
|
||||
|
||||
: insert-peek ( predecessor loc -- vreg )
|
||||
! XXX critical edges
|
||||
'[ _ ^^peek ] add-instructions ;
|
||||
|
||||
: merge-loc ( predecessors locs>vregs loc -- vreg )
|
||||
! Insert a ##phi in the current block where the input
|
||||
! is the vreg storing loc from each predecessor block
|
||||
[ '[ [ _ ] dip at ] map ] keep
|
||||
'[ [ ] [ _ insert-peek ] ?if ] 2map
|
||||
dup all-equal? [ first ] [ ^^phi ] if ;
|
||||
|
||||
: (merge-locs) ( predecessors assocs -- assoc )
|
||||
dup [ keys ] map concat prune
|
||||
[ [ 2nip ] [ merge-loc ] 3bi ] with with
|
||||
H{ } map>assoc ;
|
||||
|
||||
: merge-locs ( state predecessors states -- state )
|
||||
[ locs>vregs>> ] map (merge-locs) >>locs>vregs ;
|
||||
|
||||
: merge-loc' ( locs>vregs loc -- vreg )
|
||||
! Insert a ##phi in the current block where the input
|
||||
! is the vreg storing loc from each predecessor block
|
||||
'[ [ _ ] dip at ] map
|
||||
dup all-equal? [ first ] [ drop f ] if ;
|
||||
|
||||
: merge-actual-locs ( state predecessors states -- state )
|
||||
nip
|
||||
[ actual-locs>vregs>> ] map
|
||||
dup [ keys ] map concat prune
|
||||
[ [ nip ] [ merge-loc' ] 2bi ] with
|
||||
H{ } map>assoc
|
||||
[ nip ] assoc-filter
|
||||
>>actual-locs>vregs ;
|
||||
|
||||
: merge-changed-locs ( state predecessors states -- state )
|
||||
nip [ changed-locs>> ] map assoc-combine >>changed-locs ;
|
||||
|
||||
ERROR: cannot-merge-poisoned states ;
|
||||
|
||||
: multiple-predecessors ( bb states -- state )
|
||||
dup [ not ] any? [
|
||||
[ <state> ] 2dip
|
||||
sift merge-heights
|
||||
] [
|
||||
dup [ poisoned?>> ] any? [
|
||||
cannot-merge-poisoned
|
||||
] [
|
||||
[ state new ] 2dip
|
||||
[ predecessors>> ] dip
|
||||
{
|
||||
[ merge-locs ]
|
||||
[ merge-actual-locs ]
|
||||
[ merge-heights ]
|
||||
[ merge-changed-locs ]
|
||||
} 2cleave
|
||||
] if
|
||||
] if ;
|
||||
|
||||
: merge-states ( bb states -- state )
|
||||
! If any states are poisoned, save all registers
|
||||
! to the stack in each branch
|
||||
dup length {
|
||||
{ 0 [ initial-state ] }
|
||||
{ 1 [ single-predecessor ] }
|
||||
[ drop multiple-predecessors ]
|
||||
} case ;
|
||||
|
||||
: block-in-state ( bb -- states )
|
||||
dup predecessors>> state-out get '[ _ at ] map merge-states ;
|
||||
|
||||
|
|
|
@ -0,0 +1,43 @@
|
|||
! Copyright (C) 2009 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: kernel accessors namespaces assocs sets math ;
|
||||
IN: compiler.cfg.stack-analysis.state
|
||||
|
||||
TUPLE: state
|
||||
locs>vregs actual-locs>vregs changed-locs
|
||||
ds-height rs-height poisoned? ;
|
||||
|
||||
: <state> ( -- state )
|
||||
state new
|
||||
H{ } clone >>locs>vregs
|
||||
H{ } clone >>actual-locs>vregs
|
||||
H{ } clone >>changed-locs
|
||||
0 >>ds-height
|
||||
0 >>rs-height ;
|
||||
|
||||
M: state clone
|
||||
call-next-method
|
||||
[ clone ] change-locs>vregs
|
||||
[ clone ] change-actual-locs>vregs
|
||||
[ clone ] change-changed-locs ;
|
||||
|
||||
: loc>vreg ( loc -- vreg ) state get locs>vregs>> at ;
|
||||
|
||||
: record-peek ( dst loc -- )
|
||||
state get [ locs>vregs>> set-at ] [ actual-locs>vregs>> set-at ] 3bi ;
|
||||
|
||||
: changed-loc ( loc -- )
|
||||
state get changed-locs>> conjoin ;
|
||||
|
||||
: record-replace ( src loc -- )
|
||||
dup changed-loc state get locs>vregs>> set-at ;
|
||||
|
||||
: clear-state ( state -- )
|
||||
[ locs>vregs>> clear-assoc ]
|
||||
[ actual-locs>vregs>> clear-assoc ]
|
||||
[ changed-locs>> clear-assoc ]
|
||||
tri ;
|
||||
|
||||
: adjust-ds ( n -- ) state get [ + ] change-ds-height drop ;
|
||||
|
||||
: adjust-rs ( n -- ) state get [ + ] change-rs-height drop ;
|
|
@ -4,29 +4,53 @@ USING: combinators kernel accessors sequences math arrays ;
|
|||
IN: images
|
||||
|
||||
SINGLETONS:
|
||||
L LA BGR RGB BGRA RGBA ABGR ARGB RGBX XRGB BGRX XBGR
|
||||
ubyte-components ushort-components
|
||||
A L LA BGR RGB BGRA RGBA ABGR ARGB RGBX XRGB BGRX XBGR
|
||||
INTENSITY DEPTH DEPTH-STENCIL R RG
|
||||
ubyte-components ushort-components uint-components
|
||||
half-components float-components
|
||||
byte-integer-components ubyte-integer-components
|
||||
short-integer-components ushort-integer-components
|
||||
int-integer-components uint-integer-components ;
|
||||
int-integer-components uint-integer-components
|
||||
u-5-5-5-1-components u-5-6-5-components
|
||||
u-10-10-10-2-components
|
||||
u-24-components u-24-8-components
|
||||
float-32-u-8-components
|
||||
u-9-9-9-e5-components
|
||||
float-11-11-10-components ;
|
||||
|
||||
UNION: component-order
|
||||
L LA BGR RGB BGRA RGBA ABGR ARGB RGBX XRGB BGRX XBGR ;
|
||||
A L LA BGR RGB BGRA RGBA ABGR ARGB RGBX XRGB BGRX XBGR
|
||||
INTENSITY DEPTH DEPTH-STENCIL R RG ;
|
||||
|
||||
UNION: component-type
|
||||
ubyte-components ushort-components
|
||||
half-components float-components
|
||||
byte-integer-components ubyte-integer-components
|
||||
short-integer-components ushort-integer-components
|
||||
int-integer-components uint-integer-components ;
|
||||
int-integer-components uint-integer-components
|
||||
u-5-5-5-1-components u-5-6-5-components
|
||||
u-10-10-10-2-components
|
||||
u-24-components u-24-8-components
|
||||
float-32-u-8-components
|
||||
u-9-9-9-e5-components
|
||||
float-11-11-10-components ;
|
||||
|
||||
UNION: unnormalized-integer-components
|
||||
byte-integer-components ubyte-integer-components
|
||||
short-integer-components ushort-integer-components
|
||||
int-integer-components uint-integer-components ;
|
||||
|
||||
UNION: alpha-channel BGRA RGBA ABGR ARGB ;
|
||||
UNION: packed-components
|
||||
u-5-5-5-1-components u-5-6-5-components
|
||||
u-10-10-10-2-components
|
||||
u-24-components u-24-8-components
|
||||
float-32-u-8-components
|
||||
u-9-9-9-e5-components
|
||||
float-11-11-10-components ;
|
||||
|
||||
UNION: alpha-channel BGRA RGBA ABGR ARGB LA A INTENSITY ;
|
||||
|
||||
UNION: alpha-channel-precedes-colors ABGR ARGB XBGR XRGB ;
|
||||
|
||||
TUPLE: image dim component-order component-type upside-down? bitmap ;
|
||||
|
||||
|
@ -36,14 +60,11 @@ TUPLE: image dim component-order component-type upside-down? bitmap ;
|
|||
|
||||
GENERIC: load-image* ( path class -- image )
|
||||
|
||||
DEFER: bytes-per-pixel
|
||||
|
||||
<PRIVATE
|
||||
|
||||
: bytes-per-component ( component-type -- n )
|
||||
{
|
||||
{ ubyte-components [ 1 ] }
|
||||
{ ushort-components [ 2 ] }
|
||||
{ uint-components [ 4 ] }
|
||||
{ half-components [ 2 ] }
|
||||
{ float-components [ 4 ] }
|
||||
{ byte-integer-components [ 1 ] }
|
||||
|
@ -54,8 +75,21 @@ DEFER: bytes-per-pixel
|
|||
{ uint-integer-components [ 4 ] }
|
||||
} case ;
|
||||
|
||||
: bytes-per-packed-pixel ( component-type -- n )
|
||||
{
|
||||
{ u-5-5-5-1-components [ 2 ] }
|
||||
{ u-5-6-5-components [ 2 ] }
|
||||
{ u-10-10-10-2-components [ 4 ] }
|
||||
{ u-24-components [ 4 ] }
|
||||
{ u-24-8-components [ 4 ] }
|
||||
{ u-9-9-9-e5-components [ 4 ] }
|
||||
{ float-11-11-10-components [ 4 ] }
|
||||
{ float-32-u-8-components [ 8 ] }
|
||||
} case ;
|
||||
|
||||
: component-count ( component-order -- n )
|
||||
{
|
||||
{ A [ 1 ] }
|
||||
{ L [ 1 ] }
|
||||
{ LA [ 2 ] }
|
||||
{ BGR [ 3 ] }
|
||||
|
@ -68,8 +102,22 @@ DEFER: bytes-per-pixel
|
|||
{ XRGB [ 4 ] }
|
||||
{ BGRX [ 4 ] }
|
||||
{ XBGR [ 4 ] }
|
||||
{ INTENSITY [ 1 ] }
|
||||
{ DEPTH [ 1 ] }
|
||||
{ DEPTH-STENCIL [ 1 ] }
|
||||
{ R [ 1 ] }
|
||||
{ RG [ 2 ] }
|
||||
} case ;
|
||||
|
||||
: bytes-per-pixel ( image -- n )
|
||||
dup component-type>> packed-components?
|
||||
[ component-type>> bytes-per-packed-pixel ] [
|
||||
[ component-order>> component-count ]
|
||||
[ component-type>> bytes-per-component ] bi *
|
||||
] if ;
|
||||
|
||||
<PRIVATE
|
||||
|
||||
: pixel@ ( x y image -- start end bitmap )
|
||||
[ dim>> first * + ]
|
||||
[ bytes-per-pixel [ * dup ] keep + ]
|
||||
|
@ -80,10 +128,6 @@ DEFER: bytes-per-pixel
|
|||
|
||||
PRIVATE>
|
||||
|
||||
: bytes-per-pixel ( image -- n )
|
||||
[ component-order>> component-count ]
|
||||
[ component-type>> bytes-per-component ] bi * ;
|
||||
|
||||
: pixel-at ( x y image -- pixel )
|
||||
pixel@ subseq ;
|
||||
|
||||
|
|
|
@ -3,10 +3,8 @@ IN: math.primes.erato
|
|||
|
||||
HELP: sieve
|
||||
{ $values { "n" "the greatest odd number to consider" } { "arr" "a bit array" } }
|
||||
{ $description "Return a bit array containing a primality bit for every odd number between 3 and " { $snippet "n" } " (inclusive). " { $snippet ">index" } " can be used to retrieve the index of an odd number to be tested." } ;
|
||||
{ $description "Apply Eratostene sieve up to " { $snippet "n" } ". Primality can then be tested using " { $link sieve } "." } ;
|
||||
|
||||
HELP: >index
|
||||
{ $values { "n" "an odd number" } { "i" "the corresponding index" } }
|
||||
{ $description "Retrieve the index corresponding to the odd number on the stack." } ;
|
||||
|
||||
{ sieve >index } related-words
|
||||
HELP: marked-prime?
|
||||
{ $values { "n" "an integer" } { "arr" "a byte array returned by " { $link sieve } } { "?" "a boolean" } }
|
||||
{ $description "Check whether a number between 3 and the limit given to " { $link sieve } " has been marked as a prime number."} ;
|
||||
|
|
|
@ -1,3 +1,10 @@
|
|||
USING: bit-arrays math.primes.erato tools.test ;
|
||||
USING: byte-arrays math math.bitwise math.primes.erato sequences tools.test ;
|
||||
|
||||
[ ?{ t t t f t t f t t f t f f t } ] [ 29 sieve ] unit-test
|
||||
[ B{ 255 251 247 126 } ] [ 100 sieve ] unit-test
|
||||
[ 1 100 sieve marked-prime? ] [ bounds-error? ] must-fail-with
|
||||
[ 120 100 sieve marked-prime? ] [ bounds-error? ] must-fail-with
|
||||
[ f ] [ 119 100 sieve marked-prime? ] unit-test
|
||||
[ t ] [ 113 100 sieve marked-prime? ] unit-test
|
||||
|
||||
! There are 25997 primes below 300000. 1 must be removed and 3 5 7 added.
|
||||
[ 25997 ] [ 299999 sieve [ bit-count ] sigma 2 + ] unit-test
|
|
@ -1,25 +1,41 @@
|
|||
! Copyright (C) 2009 Samuel Tardieu.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: bit-arrays kernel math math.functions math.ranges sequences ;
|
||||
USING: arrays byte-arrays kernel math math.bitwise math.functions math.order
|
||||
math.ranges sequences sequences.private ;
|
||||
IN: math.primes.erato
|
||||
|
||||
: >index ( n -- i )
|
||||
3 - 2 /i ; inline
|
||||
<PRIVATE
|
||||
|
||||
: index> ( i -- n )
|
||||
2 * 3 + ; inline
|
||||
CONSTANT: masks B{ 0 128 0 0 0 0 0 64 0 0 0 32 0 16 0 0 0 8 0 4 0 0 0 2 0 0 0 0 0 1 }
|
||||
|
||||
: mark-multiples ( i arr -- )
|
||||
[ index> [ sq >index ] keep ] dip
|
||||
[ length 1 - swap <range> f swap ] keep
|
||||
[ set-nth ] curry with each ;
|
||||
: bit-pos ( n -- byte/f mask/f )
|
||||
30 /mod masks nth-unsafe dup zero? [ 2drop f f ] when ;
|
||||
|
||||
: maybe-mark-multiples ( i arr -- )
|
||||
2dup nth [ mark-multiples ] [ 2drop ] if ;
|
||||
: marked-unsafe? ( n arr -- ? )
|
||||
[ bit-pos ] dip swap [ [ nth-unsafe ] [ bitand zero? not ] bi* ] [ 2drop f ] if* ;
|
||||
|
||||
: init-sieve ( n -- arr )
|
||||
>index 1 + <bit-array> dup set-bits ;
|
||||
: unmark ( n arr -- )
|
||||
[ bit-pos swap ] dip
|
||||
over [ [ swap unmask ] change-nth-unsafe ] [ 3drop ] if ;
|
||||
|
||||
: upper-bound ( arr -- n ) length 30 * 1 - ;
|
||||
|
||||
: unmark-multiples ( i arr -- )
|
||||
2dup marked-unsafe? [
|
||||
[ [ dup sq ] [ upper-bound ] bi* rot <range> ] keep
|
||||
[ unmark ] curry each
|
||||
] [
|
||||
2drop
|
||||
] if ;
|
||||
|
||||
: init-sieve ( n -- arr ) 29 + 30 /i 255 <array> >byte-array ;
|
||||
|
||||
PRIVATE>
|
||||
|
||||
: sieve ( n -- arr )
|
||||
[ init-sieve ] [ sqrt >index [0,b] ] bi
|
||||
over [ maybe-mark-multiples ] curry each ; foldable
|
||||
init-sieve [ 2 swap upper-bound sqrt [a,b] ] keep
|
||||
[ [ unmark-multiples ] curry each ] keep ;
|
||||
|
||||
: marked-prime? ( n arr -- ? )
|
||||
2dup upper-bound 2 swap between? [ bounds-error ] unless
|
||||
over { 2 3 5 } member? [ 2drop t ] [ marked-unsafe? ] if ;
|
|
@ -1,5 +1,5 @@
|
|||
USING: arrays math math.primes math.primes.miller-rabin
|
||||
tools.test ;
|
||||
USING: arrays kernel math math.primes math.primes.miller-rabin
|
||||
sequences tools.test ;
|
||||
IN: math.primes.tests
|
||||
|
||||
{ 1237 } [ 1234 next-prime ] unit-test
|
||||
|
@ -10,6 +10,9 @@ IN: math.primes.tests
|
|||
{ { 4999963 4999999 5000011 5000077 5000081 } }
|
||||
[ 4999962 5000082 primes-between >array ] unit-test
|
||||
|
||||
{ { 8999981 8999993 9000011 9000041 } }
|
||||
[ 8999980 9000045 primes-between >array ] unit-test
|
||||
|
||||
[ 2 ] [ 1 next-prime ] unit-test
|
||||
[ 3 ] [ 2 next-prime ] unit-test
|
||||
[ 5 ] [ 3 next-prime ] unit-test
|
||||
|
@ -18,3 +21,8 @@ IN: math.primes.tests
|
|||
[ 100000000000031 ] [ 100000000000000 next-prime ] unit-test
|
||||
|
||||
[ 49 ] [ 50 random-prime log2 ] unit-test
|
||||
|
||||
[ t ] [ 5000077 dup find-relative-prime coprime? ] unit-test
|
||||
|
||||
[ 5 t { 14 14 14 14 14 } ]
|
||||
[ 5 15 unique-primes [ length ] [ [ prime? ] all? ] [ [ log2 ] map ] tri ] unit-test
|
||||
|
|
|
@ -1,37 +1,55 @@
|
|||
! Copyright (C) 2007-2009 Samuel Tardieu.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: combinators kernel math math.bitwise math.functions
|
||||
math.order math.primes.erato math.primes.miller-rabin
|
||||
math.ranges random sequences sets fry ;
|
||||
USING: combinators combinators.short-circuit fry kernel math
|
||||
math.bitwise math.functions math.order math.primes.erato
|
||||
math.primes.erato.private math.primes.miller-rabin math.ranges
|
||||
literals random sequences sets vectors ;
|
||||
IN: math.primes
|
||||
|
||||
<PRIVATE
|
||||
|
||||
: look-in-bitmap ( n -- ? ) >index 4999999 sieve nth ;
|
||||
: look-in-bitmap ( n -- ? ) $[ 8999999 sieve ] marked-unsafe? ; inline
|
||||
|
||||
: really-prime? ( n -- ? )
|
||||
dup 5000000 < [ look-in-bitmap ] [ miller-rabin ] if ; foldable
|
||||
: (prime?) ( n -- ? )
|
||||
dup 8999999 <= [ look-in-bitmap ] [ miller-rabin ] if ;
|
||||
|
||||
! In order not to reallocate large vectors, we compute the upper bound
|
||||
! of the number of primes in a given interval. We use a double inequality given
|
||||
! by Pierre Dusart in http://www.ams.org/mathscinet-getitem?mr=99d:11133
|
||||
! for x > 598. Under this limit, we know that there are at most 108 primes.
|
||||
: upper-pi ( x -- y )
|
||||
dup log [ / ] [ 1.2762 swap / 1 + ] bi * ceiling ;
|
||||
|
||||
: lower-pi ( x -- y )
|
||||
dup log [ / ] [ 0.992 swap / 1 + ] bi * floor ;
|
||||
|
||||
: <primes-vector> ( low high -- vector )
|
||||
swap [ [ upper-pi ] [ lower-pi ] bi* - >integer
|
||||
108 max 10000 min <vector> ] keep
|
||||
3 < [ [ 2 swap push ] keep ] when ;
|
||||
|
||||
: simple? ( n -- ? ) { [ even? ] [ 3 mod 0 = ] [ 5 mod 0 = ] } 1|| ;
|
||||
|
||||
PRIVATE>
|
||||
|
||||
: prime? ( n -- ? )
|
||||
{
|
||||
{ [ dup 2 < ] [ drop f ] }
|
||||
{ [ dup even? ] [ 2 = ] }
|
||||
[ really-prime? ]
|
||||
{ [ dup 7 < ] [ { 2 3 5 } member? ] }
|
||||
{ [ dup simple? ] [ drop f ] }
|
||||
[ (prime?) ]
|
||||
} cond ; foldable
|
||||
|
||||
: next-prime ( n -- p )
|
||||
dup 2 < [
|
||||
drop 2
|
||||
] [
|
||||
next-odd [ dup really-prime? ] [ 2 + ] until
|
||||
next-odd [ dup prime? ] [ 2 + ] until
|
||||
] if ; foldable
|
||||
|
||||
: primes-between ( low high -- seq )
|
||||
[ dup 3 max dup even? [ 1 + ] when ] dip
|
||||
2 <range> [ prime? ] filter
|
||||
swap 3 < [ 2 prefix ] when ;
|
||||
[ [ 3 max dup even? [ 1 + ] when ] dip 2 <range> ]
|
||||
[ <primes-vector> ] 2bi
|
||||
[ '[ [ prime? ] _ push-if ] each ] keep clone ;
|
||||
|
||||
: primes-upto ( n -- seq ) 2 swap primes-between ;
|
||||
|
||||
|
@ -65,5 +83,5 @@ ERROR: too-few-primes n numbits ;
|
|||
|
||||
: unique-primes ( n numbits -- seq )
|
||||
2dup 2^ estimated-primes > [ too-few-primes ] when
|
||||
2dup '[ _ random-prime ] replicate
|
||||
2dup [ random-prime ] curry replicate
|
||||
dup all-unique? [ 2nip ] [ drop unique-primes ] if ;
|
||||
|
|
|
@ -4,32 +4,32 @@ IN: opengl.framebuffers
|
|||
|
||||
HELP: gen-framebuffer
|
||||
{ $values { "id" integer } }
|
||||
{ $description "Wrapper for " { $link glGenFramebuffersEXT } " to handle the common case of generating a single framebuffer ID." } ;
|
||||
{ $description "Wrapper for " { $link glGenFramebuffers } " to handle the common case of generating a single framebuffer ID." } ;
|
||||
|
||||
HELP: gen-renderbuffer
|
||||
{ $values { "id" integer } }
|
||||
{ $description "Wrapper for " { $link glGenRenderbuffersEXT } " to handle the common case of generating a single render buffer ID." } ;
|
||||
{ $description "Wrapper for " { $link glGenRenderbuffers } " to handle the common case of generating a single render buffer ID." } ;
|
||||
|
||||
HELP: delete-framebuffer
|
||||
{ $values { "id" integer } }
|
||||
{ $description "Wrapper for " { $link glDeleteFramebuffersEXT } " to handle the common case of deleting a single framebuffer ID." } ;
|
||||
{ $description "Wrapper for " { $link glDeleteFramebuffers } " to handle the common case of deleting a single framebuffer ID." } ;
|
||||
|
||||
HELP: delete-renderbuffer
|
||||
{ $values { "id" integer } }
|
||||
{ $description "Wrapper for " { $link glDeleteRenderbuffersEXT } " to handle the common case of deleting a single render buffer ID." } ;
|
||||
{ $description "Wrapper for " { $link glDeleteRenderbuffers } " to handle the common case of deleting a single render buffer ID." } ;
|
||||
|
||||
{ gen-framebuffer delete-framebuffer } related-words
|
||||
{ gen-renderbuffer delete-renderbuffer } related-words
|
||||
|
||||
HELP: framebuffer-incomplete?
|
||||
{ $values { "status/f" "The framebuffer error code, or " { $snippet "f" } " if the framebuffer is render-complete." } }
|
||||
{ $description "Checks the framebuffer currently bound by " { $link glBindFramebufferEXT } " or " { $link with-framebuffer } " to see if it is incomplete, i.e., it is not ready to be rendered to." } ;
|
||||
{ $description "Checks the framebuffer currently bound by " { $link glBindFramebuffer } " or " { $link with-framebuffer } " to see if it is incomplete, i.e., it is not ready to be rendered to." } ;
|
||||
|
||||
HELP: check-framebuffer
|
||||
{ $description "Checks the framebuffer currently bound by " { $link glBindFramebufferEXT } " or " { $link with-framebuffer } " with " { $link framebuffer-incomplete? } ", and throws a descriptive error if the framebuffer is incomplete." } ;
|
||||
{ $description "Checks the framebuffer currently bound by " { $link glBindFramebuffer } " or " { $link with-framebuffer } " with " { $link framebuffer-incomplete? } ", and throws a descriptive error if the framebuffer is incomplete." } ;
|
||||
|
||||
HELP: with-framebuffer
|
||||
{ $values { "id" "The id of a framebuffer object." } { "quot" "a quotation" } }
|
||||
{ $description "Binds framebuffer " { $snippet "id" } " in the dynamic extent of " { $snippet "quot" } ", restoring the window framebuffer when finished." } ;
|
||||
{ $description "Binds framebuffer " { $snippet "id" } " for drawing in the dynamic extent of " { $snippet "quot" } ", restoring the window framebuffer when finished." } ;
|
||||
|
||||
ABOUT: "gl-utilities"
|
||||
ABOUT: "gl-utilities"
|
||||
|
|
|
@ -5,30 +5,30 @@ alien.c-types ;
|
|||
IN: opengl.framebuffers
|
||||
|
||||
: gen-framebuffer ( -- id )
|
||||
[ glGenFramebuffersEXT ] (gen-gl-object) ;
|
||||
[ glGenFramebuffers ] (gen-gl-object) ;
|
||||
: gen-renderbuffer ( -- id )
|
||||
[ glGenRenderbuffersEXT ] (gen-gl-object) ;
|
||||
[ glGenRenderbuffers ] (gen-gl-object) ;
|
||||
|
||||
: delete-framebuffer ( id -- )
|
||||
[ glDeleteFramebuffersEXT ] (delete-gl-object) ;
|
||||
[ glDeleteFramebuffers ] (delete-gl-object) ;
|
||||
: delete-renderbuffer ( id -- )
|
||||
[ glDeleteRenderbuffersEXT ] (delete-gl-object) ;
|
||||
[ glDeleteRenderbuffers ] (delete-gl-object) ;
|
||||
|
||||
: framebuffer-incomplete? ( -- status/f )
|
||||
GL_FRAMEBUFFER_EXT glCheckFramebufferStatusEXT
|
||||
dup GL_FRAMEBUFFER_COMPLETE_EXT = f rot ? ;
|
||||
GL_DRAW_FRAMEBUFFER glCheckFramebufferStatus
|
||||
dup GL_FRAMEBUFFER_COMPLETE = f rot ? ;
|
||||
|
||||
: framebuffer-error ( status -- * )
|
||||
{
|
||||
{ GL_FRAMEBUFFER_COMPLETE_EXT [ "framebuffer complete" ] }
|
||||
{ GL_FRAMEBUFFER_UNSUPPORTED_EXT [ "framebuffer configuration unsupported" ] }
|
||||
{ GL_FRAMEBUFFER_INCOMPLETE_ATTACHMENT_EXT [ "framebuffer incomplete (incomplete attachment)" ] }
|
||||
{ GL_FRAMEBUFFER_INCOMPLETE_MISSING_ATTACHMENT_EXT [ "framebuffer incomplete (missing attachment)" ] }
|
||||
{ GL_FRAMEBUFFER_COMPLETE [ "framebuffer complete" ] }
|
||||
{ GL_FRAMEBUFFER_UNSUPPORTED [ "framebuffer configuration unsupported" ] }
|
||||
{ GL_FRAMEBUFFER_INCOMPLETE_ATTACHMENT [ "framebuffer incomplete (incomplete attachment)" ] }
|
||||
{ GL_FRAMEBUFFER_INCOMPLETE_MISSING_ATTACHMENT [ "framebuffer incomplete (missing attachment)" ] }
|
||||
{ GL_FRAMEBUFFER_INCOMPLETE_DIMENSIONS_EXT [ "framebuffer incomplete (dimension mismatch)" ] }
|
||||
{ GL_FRAMEBUFFER_INCOMPLETE_FORMATS_EXT [ "framebuffer incomplete (format mismatch)" ] }
|
||||
{ GL_FRAMEBUFFER_INCOMPLETE_DRAW_BUFFER_EXT [ "framebuffer incomplete (draw buffer(s) have no attachment)" ] }
|
||||
{ GL_FRAMEBUFFER_INCOMPLETE_READ_BUFFER_EXT [ "framebuffer incomplete (read buffer has no attachment)" ] }
|
||||
{ GL_FRAMEBUFFER_INCOMPLETE_MULTISAMPLE_EXT [ "framebuffer incomplete (multisample counts don't match)" ] }
|
||||
{ GL_FRAMEBUFFER_INCOMPLETE_DRAW_BUFFER [ "framebuffer incomplete (draw buffer(s) have no attachment)" ] }
|
||||
{ GL_FRAMEBUFFER_INCOMPLETE_READ_BUFFER [ "framebuffer incomplete (read buffer has no attachment)" ] }
|
||||
{ GL_FRAMEBUFFER_INCOMPLETE_MULTISAMPLE [ "framebuffer incomplete (multisample counts don't match)" ] }
|
||||
[ drop gl-error "unknown framebuffer error" ]
|
||||
} case throw ;
|
||||
|
||||
|
@ -36,19 +36,19 @@ IN: opengl.framebuffers
|
|||
framebuffer-incomplete? [ framebuffer-error ] when* ;
|
||||
|
||||
: with-framebuffer ( id quot -- )
|
||||
[ GL_FRAMEBUFFER_EXT swap glBindFramebufferEXT ] dip
|
||||
[ GL_FRAMEBUFFER_EXT 0 glBindFramebufferEXT ] [ ] cleanup ; inline
|
||||
[ GL_DRAW_FRAMEBUFFER swap glBindFramebuffer ] dip
|
||||
[ GL_DRAW_FRAMEBUFFER 0 glBindFramebuffer ] [ ] cleanup ; inline
|
||||
|
||||
: with-draw-read-framebuffers ( draw-id read-id quot -- )
|
||||
[
|
||||
[ GL_DRAW_FRAMEBUFFER_EXT swap glBindFramebufferEXT ]
|
||||
[ GL_READ_FRAMEBUFFER_EXT swap glBindFramebufferEXT ] bi*
|
||||
[ GL_DRAW_FRAMEBUFFER swap glBindFramebuffer ]
|
||||
[ GL_READ_FRAMEBUFFER swap glBindFramebuffer ] bi*
|
||||
] dip
|
||||
[
|
||||
GL_DRAW_FRAMEBUFFER_EXT 0 glBindFramebufferEXT
|
||||
GL_READ_FRAMEBUFFER_EXT 0 glBindFramebufferEXT
|
||||
GL_DRAW_FRAMEBUFFER 0 glBindFramebuffer
|
||||
GL_READ_FRAMEBUFFER 0 glBindFramebuffer
|
||||
] [ ] cleanup ; inline
|
||||
|
||||
: framebuffer-attachment ( attachment -- id )
|
||||
GL_FRAMEBUFFER_EXT swap GL_FRAMEBUFFER_ATTACHMENT_OBJECT_NAME_EXT
|
||||
0 <uint> [ glGetFramebufferAttachmentParameterivEXT ] keep *uint ;
|
||||
GL_FRAMEBUFFER swap GL_FRAMEBUFFER_ATTACHMENT_OBJECT_NAME
|
||||
0 <uint> [ glGetFramebufferAttachmentParameteriv ] keep *uint ;
|
||||
|
|
|
@ -322,7 +322,7 @@ CONSTANT: GL_DECR HEX: 1E03
|
|||
CONSTANT: GL_NONE HEX: 0
|
||||
CONSTANT: GL_LEFT HEX: 0406
|
||||
CONSTANT: GL_RIGHT HEX: 0407
|
||||
|
||||
CONSTANT: GL_FRONT_LEFT HEX: 0400
|
||||
CONSTANT: GL_FRONT_RIGHT HEX: 0401
|
||||
CONSTANT: GL_BACK_LEFT HEX: 0402
|
||||
CONSTANT: GL_BACK_RIGHT HEX: 0403
|
||||
|
@ -1167,6 +1167,22 @@ GL-FUNCTION: void glTexImage3D { glTexImage3DEXT } ( GLenum target, GLint level,
|
|||
GL-FUNCTION: void glTexSubImage3D { glTexSubImage3DEXT } ( GLenum target, GLint level, GLint xoffset, GLint yoffset, GLint zoffset, GLsizei width, GLsizei height, GLsizei depth, GLenum format, GLenum type, GLvoid* pixels ) ;
|
||||
|
||||
|
||||
! GL_ARB_imaging
|
||||
|
||||
|
||||
CONSTANT: GL_CONSTANT_COLOR HEX: 8001
|
||||
CONSTANT: GL_ONE_MINUS_CONSTANT_COLOR HEX: 8002
|
||||
CONSTANT: GL_CONSTANT_ALPHA HEX: 8003
|
||||
CONSTANT: GL_ONE_MINUS_CONSTANT_ALPHA HEX: 8004
|
||||
CONSTANT: GL_BLEND_COLOR HEX: 8005
|
||||
CONSTANT: GL_FUNC_ADD HEX: 8006
|
||||
CONSTANT: GL_MIN HEX: 8007
|
||||
CONSTANT: GL_MAX HEX: 8008
|
||||
CONSTANT: GL_BLEND_EQUATION HEX: 8009
|
||||
CONSTANT: GL_FUNC_SUBTRACT HEX: 800A
|
||||
CONSTANT: GL_FUNC_REVERSE_SUBTRACT HEX: 800B
|
||||
|
||||
|
||||
! OpenGL 1.3
|
||||
|
||||
|
||||
|
@ -1370,6 +1386,8 @@ GL-FUNCTION: void glMultiDrawArrays { glMultiDrawArraysEXT } ( GLenum mode, GLin
|
|||
GL-FUNCTION: void glMultiDrawElements { glMultiDrawElementsEXT } ( GLenum mode, GLsizei* count, GLenum type, GLvoid** indices, GLsizei primcount ) ;
|
||||
GL-FUNCTION: void glPointParameterf { glPointParameterfARB } ( GLenum pname, GLfloat param ) ;
|
||||
GL-FUNCTION: void glPointParameterfv { glPointParameterfvARB } ( GLenum pname, GLfloat* params ) ;
|
||||
GL-FUNCTION: void glPointParameteri { glPointParameteriARB } ( GLenum pname, GLint param ) ;
|
||||
GL-FUNCTION: void glPointParameteriv { glPointParameterivARB } ( GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: void glSecondaryColor3b { glSecondaryColor3bEXT } ( GLbyte red, GLbyte green, GLbyte blue ) ;
|
||||
GL-FUNCTION: void glSecondaryColor3bv { glSecondaryColor3bvEXT } ( GLbyte* v ) ;
|
||||
GL-FUNCTION: void glSecondaryColor3d { glSecondaryColor3dEXT } ( GLdouble red, GLdouble green, GLdouble blue ) ;
|
||||
|
@ -1567,7 +1585,6 @@ CONSTANT: GL_UPPER_LEFT HEX: 8CA2
|
|||
CONSTANT: GL_STENCIL_BACK_REF HEX: 8CA3
|
||||
CONSTANT: GL_STENCIL_BACK_VALUE_MASK HEX: 8CA4
|
||||
CONSTANT: GL_STENCIL_BACK_WRITEMASK HEX: 8CA5
|
||||
CONSTANT: GL_BLEND_EQUATION HEX: 8009
|
||||
ALIAS: GL_BLEND_EQUATION_RGB GL_BLEND_EQUATION
|
||||
|
||||
TYPEDEF: char GLchar
|
||||
|
@ -1687,6 +1704,12 @@ CONSTANT: GL_COMPRESSED_SRGB HEX: 8C48
|
|||
CONSTANT: GL_COMPRESSED_SRGB_ALPHA HEX: 8C49
|
||||
CONSTANT: GL_COMPRESSED_SLUMINANCE HEX: 8C4A
|
||||
CONSTANT: GL_COMPRESSED_SLUMINANCE_ALPHA HEX: 8C4B
|
||||
CONSTANT: GL_FLOAT_MAT2x3 HEX: 8B65
|
||||
CONSTANT: GL_FLOAT_MAT2x4 HEX: 8B66
|
||||
CONSTANT: GL_FLOAT_MAT3x2 HEX: 8B67
|
||||
CONSTANT: GL_FLOAT_MAT3x4 HEX: 8B68
|
||||
CONSTANT: GL_FLOAT_MAT4x2 HEX: 8B69
|
||||
CONSTANT: GL_FLOAT_MAT4x3 HEX: 8B6A
|
||||
|
||||
GL-FUNCTION: void glUniformMatrix2x3fv { } ( GLint location, GLsizei count, GLboolean transpose, GLfloat* value ) ;
|
||||
GL-FUNCTION: void glUniformMatrix2x4fv { } ( GLint location, GLsizei count, GLboolean transpose, GLfloat* value ) ;
|
||||
|
@ -1696,214 +1719,452 @@ GL-FUNCTION: void glUniformMatrix4x2fv { } ( GLint location, GLsizei count, GLbo
|
|||
GL-FUNCTION: void glUniformMatrix4x3fv { } ( GLint location, GLsizei count, GLboolean transpose, GLfloat* value ) ;
|
||||
|
||||
|
||||
! GL_EXT_framebuffer_object
|
||||
! OpenGL 3.0
|
||||
|
||||
|
||||
CONSTANT: GL_INVALID_FRAMEBUFFER_OPERATION_EXT HEX: 0506
|
||||
CONSTANT: GL_MAX_RENDERBUFFER_SIZE_EXT HEX: 84E8
|
||||
CONSTANT: GL_FRAMEBUFFER_BINDING_EXT HEX: 8CA6
|
||||
CONSTANT: GL_RENDERBUFFER_BINDING_EXT HEX: 8CA7
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_OBJECT_TYPE_EXT HEX: 8CD0
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_OBJECT_NAME_EXT HEX: 8CD1
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_LEVEL_EXT HEX: 8CD2
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_CUBE_MAP_FACE_EXT HEX: 8CD3
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_3D_ZOFFSET_EXT HEX: 8CD4
|
||||
CONSTANT: GL_FRAMEBUFFER_COMPLETE_EXT HEX: 8CD5
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_ATTACHMENT_EXT HEX: 8CD6
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_MISSING_ATTACHMENT_EXT HEX: 8CD7
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_DIMENSIONS_EXT HEX: 8CD9
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_FORMATS_EXT HEX: 8CDA
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_DRAW_BUFFER_EXT HEX: 8CDB
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_READ_BUFFER_EXT HEX: 8CDC
|
||||
CONSTANT: GL_FRAMEBUFFER_UNSUPPORTED_EXT HEX: 8CDD
|
||||
CONSTANT: GL_MAX_COLOR_ATTACHMENTS_EXT HEX: 8CDF
|
||||
CONSTANT: GL_COLOR_ATTACHMENT0_EXT HEX: 8CE0
|
||||
CONSTANT: GL_COLOR_ATTACHMENT1_EXT HEX: 8CE1
|
||||
CONSTANT: GL_COLOR_ATTACHMENT2_EXT HEX: 8CE2
|
||||
CONSTANT: GL_COLOR_ATTACHMENT3_EXT HEX: 8CE3
|
||||
CONSTANT: GL_COLOR_ATTACHMENT4_EXT HEX: 8CE4
|
||||
CONSTANT: GL_COLOR_ATTACHMENT5_EXT HEX: 8CE5
|
||||
CONSTANT: GL_COLOR_ATTACHMENT6_EXT HEX: 8CE6
|
||||
CONSTANT: GL_COLOR_ATTACHMENT7_EXT HEX: 8CE7
|
||||
CONSTANT: GL_COLOR_ATTACHMENT8_EXT HEX: 8CE8
|
||||
CONSTANT: GL_COLOR_ATTACHMENT9_EXT HEX: 8CE9
|
||||
CONSTANT: GL_COLOR_ATTACHMENT10_EXT HEX: 8CEA
|
||||
CONSTANT: GL_COLOR_ATTACHMENT11_EXT HEX: 8CEB
|
||||
CONSTANT: GL_COLOR_ATTACHMENT12_EXT HEX: 8CEC
|
||||
CONSTANT: GL_COLOR_ATTACHMENT13_EXT HEX: 8CED
|
||||
CONSTANT: GL_COLOR_ATTACHMENT14_EXT HEX: 8CEE
|
||||
CONSTANT: GL_COLOR_ATTACHMENT15_EXT HEX: 8CEF
|
||||
CONSTANT: GL_DEPTH_ATTACHMENT_EXT HEX: 8D00
|
||||
CONSTANT: GL_STENCIL_ATTACHMENT_EXT HEX: 8D20
|
||||
CONSTANT: GL_FRAMEBUFFER_EXT HEX: 8D40
|
||||
CONSTANT: GL_RENDERBUFFER_EXT HEX: 8D41
|
||||
CONSTANT: GL_RENDERBUFFER_WIDTH_EXT HEX: 8D42
|
||||
CONSTANT: GL_RENDERBUFFER_HEIGHT_EXT HEX: 8D43
|
||||
CONSTANT: GL_RENDERBUFFER_INTERNAL_FORMAT_EXT HEX: 8D44
|
||||
CONSTANT: GL_STENCIL_INDEX1_EXT HEX: 8D46
|
||||
CONSTANT: GL_STENCIL_INDEX4_EXT HEX: 8D47
|
||||
CONSTANT: GL_STENCIL_INDEX8_EXT HEX: 8D48
|
||||
CONSTANT: GL_STENCIL_INDEX16_EXT HEX: 8D49
|
||||
CONSTANT: GL_RENDERBUFFER_RED_SIZE_EXT HEX: 8D50
|
||||
CONSTANT: GL_RENDERBUFFER_GREEN_SIZE_EXT HEX: 8D51
|
||||
CONSTANT: GL_RENDERBUFFER_BLUE_SIZE_EXT HEX: 8D52
|
||||
CONSTANT: GL_RENDERBUFFER_ALPHA_SIZE_EXT HEX: 8D53
|
||||
CONSTANT: GL_RENDERBUFFER_DEPTH_SIZE_EXT HEX: 8D54
|
||||
CONSTANT: GL_RENDERBUFFER_STENCIL_SIZE_EXT HEX: 8D55
|
||||
TYPEDEF: ushort GLhalf
|
||||
|
||||
GL-FUNCTION: void glBindFramebufferEXT { } ( GLenum target, GLuint framebuffer ) ;
|
||||
GL-FUNCTION: void glBindRenderbufferEXT { } ( GLenum target, GLuint renderbuffer ) ;
|
||||
GL-FUNCTION: GLenum glCheckFramebufferStatusEXT { } ( GLenum target ) ;
|
||||
GL-FUNCTION: void glDeleteFramebuffersEXT { } ( GLsizei n, GLuint* framebuffers ) ;
|
||||
GL-FUNCTION: void glDeleteRenderbuffersEXT { } ( GLsizei n, GLuint* renderbuffers ) ;
|
||||
GL-FUNCTION: void glFramebufferRenderbufferEXT { } ( GLenum target, GLenum attachment, GLenum renderbuffertarget, GLuint renderbuffer ) ;
|
||||
GL-FUNCTION: void glFramebufferTexture1DEXT { } ( GLenum target, GLenum attachment, GLenum textarget, GLuint texture, GLint level ) ;
|
||||
GL-FUNCTION: void glFramebufferTexture2DEXT { } ( GLenum target, GLenum attachment, GLenum textarget, GLuint texture, GLint level ) ;
|
||||
GL-FUNCTION: void glFramebufferTexture3DEXT { } ( GLenum target, GLenum attachment, GLenum textarget, GLuint texture, GLint level, GLint zoffset ) ;
|
||||
GL-FUNCTION: void glGenFramebuffersEXT { } ( GLsizei n, GLuint* framebuffers ) ;
|
||||
GL-FUNCTION: void glGenRenderbuffersEXT { } ( GLsizei n, GLuint* renderbuffers ) ;
|
||||
GL-FUNCTION: void glGenerateMipmapEXT { } ( GLenum target ) ;
|
||||
GL-FUNCTION: void glGetFramebufferAttachmentParameterivEXT { } ( GLenum target, GLenum attachment, GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: void glGetRenderbufferParameterivEXT { } ( GLenum target, GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: GLboolean glIsFramebufferEXT { } ( GLuint framebuffer ) ;
|
||||
GL-FUNCTION: GLboolean glIsRenderbufferEXT { } ( GLuint renderbuffer ) ;
|
||||
GL-FUNCTION: void glRenderbufferStorageEXT { } ( GLenum target, GLenum internalformat, GLsizei width, GLsizei height ) ;
|
||||
CONSTANT: GL_VERTEX_ATTRIB_ARRAY_INTEGER HEX: 88FD
|
||||
CONSTANT: GL_SAMPLER_CUBE_SHADOW HEX: 8DC5
|
||||
CONSTANT: GL_UNSIGNED_INT_VEC2 HEX: 8DC6
|
||||
CONSTANT: GL_UNSIGNED_INT_VEC3 HEX: 8DC7
|
||||
CONSTANT: GL_UNSIGNED_INT_VEC4 HEX: 8DC8
|
||||
CONSTANT: GL_INT_SAMPLER_1D HEX: 8DC9
|
||||
CONSTANT: GL_INT_SAMPLER_2D HEX: 8DCA
|
||||
CONSTANT: GL_INT_SAMPLER_3D HEX: 8DCB
|
||||
CONSTANT: GL_INT_SAMPLER_CUBE HEX: 8DCC
|
||||
CONSTANT: GL_INT_SAMPLER_2D_RECT HEX: 8DCD
|
||||
CONSTANT: GL_INT_SAMPLER_1D_ARRAY HEX: 8DCE
|
||||
CONSTANT: GL_INT_SAMPLER_2D_ARRAY HEX: 8DCF
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_1D HEX: 8DD1
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_2D HEX: 8DD2
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_3D HEX: 8DD3
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_CUBE HEX: 8DD4
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_2D_RECT HEX: 8DD5
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_1D_ARRAY HEX: 8DD6
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_2D_ARRAY HEX: 8DD7
|
||||
CONSTANT: GL_MIN_PROGRAM_TEXEL_OFFSET HEX: 8904
|
||||
CONSTANT: GL_MAX_PROGRAM_TEXEL_OFFSET HEX: 8905
|
||||
|
||||
CONSTANT: GL_RGBA32F HEX: 8814
|
||||
CONSTANT: GL_RGB32F HEX: 8815
|
||||
CONSTANT: GL_RGBA16F HEX: 881A
|
||||
CONSTANT: GL_RGB16F HEX: 881B
|
||||
CONSTANT: GL_TEXTURE_RED_TYPE HEX: 8C10
|
||||
CONSTANT: GL_TEXTURE_GREEN_TYPE HEX: 8C11
|
||||
CONSTANT: GL_TEXTURE_BLUE_TYPE HEX: 8C12
|
||||
CONSTANT: GL_TEXTURE_ALPHA_TYPE HEX: 8C13
|
||||
CONSTANT: GL_TEXTURE_DEPTH_TYPE HEX: 8C16
|
||||
CONSTANT: GL_UNSIGNED_NORMALIZED HEX: 8C17
|
||||
|
||||
! GL_EXT_framebuffer_blit
|
||||
CONSTANT: GL_QUERY_WAIT HEX: 8E13
|
||||
CONSTANT: GL_QUERY_NO_WAIT HEX: 8E14
|
||||
CONSTANT: GL_QUERY_BY_REGION_WAIT HEX: 8E15
|
||||
CONSTANT: GL_QUERY_BY_REGION_NO_WAIT HEX: 8E16
|
||||
|
||||
CONSTANT: GL_HALF_FLOAT HEX: 140B
|
||||
|
||||
GL-FUNCTION: void glBlitFramebufferEXT { } ( GLint srcX0, GLint srcY0, GLint srcX1, GLint srcY1,
|
||||
CONSTANT: GL_MAP_READ_BIT HEX: 0001
|
||||
CONSTANT: GL_MAP_WRITE_BIT HEX: 0002
|
||||
CONSTANT: GL_MAP_INVALIDATE_RANGE_BIT HEX: 0004
|
||||
CONSTANT: GL_MAP_INVALIDATE_BUFFER_BIT HEX: 0008
|
||||
CONSTANT: GL_MAP_FLUSH_EXPLICIT_BIT HEX: 0010
|
||||
CONSTANT: GL_MAP_UNSYNCHRONIZED_BIT HEX: 0020
|
||||
|
||||
CONSTANT: GL_R8 HEX: 8229
|
||||
CONSTANT: GL_R16 HEX: 822A
|
||||
CONSTANT: GL_RG8 HEX: 822B
|
||||
CONSTANT: GL_RG16 HEX: 822C
|
||||
CONSTANT: GL_R16F HEX: 822D
|
||||
CONSTANT: GL_R32F HEX: 822E
|
||||
CONSTANT: GL_RG16F HEX: 822F
|
||||
CONSTANT: GL_RG32F HEX: 8230
|
||||
CONSTANT: GL_R8I HEX: 8231
|
||||
CONSTANT: GL_R8UI HEX: 8232
|
||||
CONSTANT: GL_R16I HEX: 8233
|
||||
CONSTANT: GL_R16UI HEX: 8234
|
||||
CONSTANT: GL_R32I HEX: 8235
|
||||
CONSTANT: GL_R32UI HEX: 8236
|
||||
CONSTANT: GL_RG8I HEX: 8237
|
||||
CONSTANT: GL_RG8UI HEX: 8238
|
||||
CONSTANT: GL_RG16I HEX: 8239
|
||||
CONSTANT: GL_RG16UI HEX: 823A
|
||||
CONSTANT: GL_RG32I HEX: 823B
|
||||
CONSTANT: GL_RG32UI HEX: 823C
|
||||
CONSTANT: GL_RG HEX: 8227
|
||||
CONSTANT: GL_COMPRESSED_RED HEX: 8225
|
||||
CONSTANT: GL_COMPRESSED_RG HEX: 8226
|
||||
CONSTANT: GL_RG_INTEGER HEX: 8228
|
||||
|
||||
CONSTANT: GL_VERTEX_ARRAY_BINDING HEX: 85B5
|
||||
|
||||
CONSTANT: GL_CLAMP_READ_COLOR HEX: 891C
|
||||
CONSTANT: GL_FIXED_ONLY HEX: 891D
|
||||
|
||||
CONSTANT: GL_DEPTH_COMPONENT32F HEX: 8CAC
|
||||
CONSTANT: GL_DEPTH32F_STENCIL8 HEX: 8CAD
|
||||
|
||||
CONSTANT: GL_RGB9_E5 HEX: 8C3D
|
||||
CONSTANT: GL_UNSIGNED_INT_5_9_9_9_REV HEX: 8C3E
|
||||
CONSTANT: GL_TEXTURE_SHARED_SIZE HEX: 8C3F
|
||||
|
||||
CONSTANT: GL_R11F_G11F_B10F HEX: 8C3A
|
||||
CONSTANT: GL_UNSIGNED_INT_10F_11F_11F_REV HEX: 8C3B
|
||||
|
||||
CONSTANT: GL_INVALID_FRAMEBUFFER_OPERATION HEX: 0506
|
||||
CONSTANT: GL_MAX_RENDERBUFFER_SIZE HEX: 84E8
|
||||
CONSTANT: GL_FRAMEBUFFER_BINDING HEX: 8CA6
|
||||
CONSTANT: GL_RENDERBUFFER_BINDING HEX: 8CA7
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_OBJECT_TYPE HEX: 8CD0
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_OBJECT_NAME HEX: 8CD1
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_LEVEL HEX: 8CD2
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_CUBE_MAP_FACE HEX: 8CD3
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_COLOR_ENCODING HEX: 8210
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_COMPONENT_TYPE HEX: 8211
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_RED_SIZE HEX: 8212
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_GREEN_SIZE HEX: 8213
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_BLUE_SIZE HEX: 8214
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_ALPHA_SIZE HEX: 8215
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_DEPTH_SIZE HEX: 8216
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_STENCIL_SIZE HEX: 8217
|
||||
CONSTANT: GL_FRAMEBUFFER_DEFAULT HEX: 8218
|
||||
CONSTANT: GL_FRAMEBUFFER_UNDEFINED HEX: 8219
|
||||
CONSTANT: GL_DEPTH_STENCIL_ATTACHMENT HEX: 821A
|
||||
CONSTANT: GL_FRAMEBUFFER_COMPLETE HEX: 8CD5
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_ATTACHMENT HEX: 8CD6
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_MISSING_ATTACHMENT HEX: 8CD7
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_DRAW_BUFFER HEX: 8CDB
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_READ_BUFFER HEX: 8CDC
|
||||
CONSTANT: GL_FRAMEBUFFER_UNSUPPORTED HEX: 8CDD
|
||||
CONSTANT: GL_MAX_COLOR_ATTACHMENTS HEX: 8CDF
|
||||
CONSTANT: GL_COLOR_ATTACHMENT0 HEX: 8CE0
|
||||
CONSTANT: GL_COLOR_ATTACHMENT1 HEX: 8CE1
|
||||
CONSTANT: GL_COLOR_ATTACHMENT2 HEX: 8CE2
|
||||
CONSTANT: GL_COLOR_ATTACHMENT3 HEX: 8CE3
|
||||
CONSTANT: GL_COLOR_ATTACHMENT4 HEX: 8CE4
|
||||
CONSTANT: GL_COLOR_ATTACHMENT5 HEX: 8CE5
|
||||
CONSTANT: GL_COLOR_ATTACHMENT6 HEX: 8CE6
|
||||
CONSTANT: GL_COLOR_ATTACHMENT7 HEX: 8CE7
|
||||
CONSTANT: GL_COLOR_ATTACHMENT8 HEX: 8CE8
|
||||
CONSTANT: GL_COLOR_ATTACHMENT9 HEX: 8CE9
|
||||
CONSTANT: GL_COLOR_ATTACHMENT10 HEX: 8CEA
|
||||
CONSTANT: GL_COLOR_ATTACHMENT11 HEX: 8CEB
|
||||
CONSTANT: GL_COLOR_ATTACHMENT12 HEX: 8CEC
|
||||
CONSTANT: GL_COLOR_ATTACHMENT13 HEX: 8CED
|
||||
CONSTANT: GL_COLOR_ATTACHMENT14 HEX: 8CEE
|
||||
CONSTANT: GL_COLOR_ATTACHMENT15 HEX: 8CEF
|
||||
CONSTANT: GL_DEPTH_ATTACHMENT HEX: 8D00
|
||||
CONSTANT: GL_STENCIL_ATTACHMENT HEX: 8D20
|
||||
CONSTANT: GL_FRAMEBUFFER HEX: 8D40
|
||||
CONSTANT: GL_RENDERBUFFER HEX: 8D41
|
||||
CONSTANT: GL_RENDERBUFFER_WIDTH HEX: 8D42
|
||||
CONSTANT: GL_RENDERBUFFER_HEIGHT HEX: 8D43
|
||||
CONSTANT: GL_RENDERBUFFER_INTERNAL_FORMAT HEX: 8D44
|
||||
CONSTANT: GL_STENCIL_INDEX1 HEX: 8D46
|
||||
CONSTANT: GL_STENCIL_INDEX4 HEX: 8D47
|
||||
CONSTANT: GL_STENCIL_INDEX8 HEX: 8D48
|
||||
CONSTANT: GL_STENCIL_INDEX16 HEX: 8D49
|
||||
CONSTANT: GL_RENDERBUFFER_RED_SIZE HEX: 8D50
|
||||
CONSTANT: GL_RENDERBUFFER_GREEN_SIZE HEX: 8D51
|
||||
CONSTANT: GL_RENDERBUFFER_BLUE_SIZE HEX: 8D52
|
||||
CONSTANT: GL_RENDERBUFFER_ALPHA_SIZE HEX: 8D53
|
||||
CONSTANT: GL_RENDERBUFFER_DEPTH_SIZE HEX: 8D54
|
||||
CONSTANT: GL_RENDERBUFFER_STENCIL_SIZE HEX: 8D55
|
||||
|
||||
CONSTANT: GL_READ_FRAMEBUFFER HEX: 8CA8
|
||||
CONSTANT: GL_DRAW_FRAMEBUFFER HEX: 8CA9
|
||||
|
||||
ALIAS: GL_DRAW_FRAMEBUFFER_BINDING GL_FRAMEBUFFER_BINDING
|
||||
CONSTANT: GL_READ_FRAMEBUFFER_BINDING HEX: 8CAA
|
||||
|
||||
CONSTANT: GL_RENDERBUFFER_SAMPLES HEX: 8CAB
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_MULTISAMPLE HEX: 8D56
|
||||
CONSTANT: GL_MAX_SAMPLES HEX: 8D57
|
||||
|
||||
CONSTANT: GL_DEPTH_STENCIL HEX: 84F9
|
||||
CONSTANT: GL_UNSIGNED_INT_24_8 HEX: 84FA
|
||||
CONSTANT: GL_DEPTH24_STENCIL8 HEX: 88F0
|
||||
CONSTANT: GL_TEXTURE_STENCIL_SIZE HEX: 88F1
|
||||
|
||||
CONSTANT: GL_RGBA32UI HEX: 8D70
|
||||
CONSTANT: GL_RGB32UI HEX: 8D71
|
||||
|
||||
CONSTANT: GL_RGBA16UI HEX: 8D76
|
||||
CONSTANT: GL_RGB16UI HEX: 8D77
|
||||
|
||||
CONSTANT: GL_RGBA8UI HEX: 8D7C
|
||||
CONSTANT: GL_RGB8UI HEX: 8D7D
|
||||
|
||||
CONSTANT: GL_RGBA32I HEX: 8D82
|
||||
CONSTANT: GL_RGB32I HEX: 8D83
|
||||
|
||||
CONSTANT: GL_RGBA16I HEX: 8D88
|
||||
CONSTANT: GL_RGB16I HEX: 8D89
|
||||
|
||||
CONSTANT: GL_RGBA8I HEX: 8D8E
|
||||
CONSTANT: GL_RGB8I HEX: 8D8F
|
||||
|
||||
CONSTANT: GL_RED_INTEGER HEX: 8D94
|
||||
CONSTANT: GL_GREEN_INTEGER HEX: 8D95
|
||||
CONSTANT: GL_BLUE_INTEGER HEX: 8D96
|
||||
CONSTANT: GL_RGB_INTEGER HEX: 8D98
|
||||
CONSTANT: GL_RGBA_INTEGER HEX: 8D99
|
||||
CONSTANT: GL_BGR_INTEGER HEX: 8D9A
|
||||
CONSTANT: GL_BGRA_INTEGER HEX: 8D9B
|
||||
|
||||
CONSTANT: GL_FLOAT_32_UNSIGNED_INT_24_8_REV HEX: 8DAD
|
||||
|
||||
CONSTANT: GL_TEXTURE_1D_ARRAY HEX: 8C18
|
||||
CONSTANT: GL_TEXTURE_2D_ARRAY HEX: 8C1A
|
||||
|
||||
CONSTANT: GL_PROXY_TEXTURE_2D_ARRAY HEX: 8C1B
|
||||
|
||||
CONSTANT: GL_PROXY_TEXTURE_1D_ARRAY HEX: 8C19
|
||||
|
||||
CONSTANT: GL_TEXTURE_BINDING_1D_ARRAY HEX: 8C1C
|
||||
CONSTANT: GL_TEXTURE_BINDING_2D_ARRAY HEX: 8C1D
|
||||
CONSTANT: GL_MAX_ARRAY_TEXTURE_LAYERS HEX: 88FF
|
||||
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_LAYER HEX: 8CD4
|
||||
|
||||
CONSTANT: GL_SAMPLER_1D_ARRAY HEX: 8DC0
|
||||
CONSTANT: GL_SAMPLER_2D_ARRAY HEX: 8DC1
|
||||
CONSTANT: GL_SAMPLER_1D_ARRAY_SHADOW HEX: 8DC3
|
||||
CONSTANT: GL_SAMPLER_2D_ARRAY_SHADOW HEX: 8DC4
|
||||
|
||||
CONSTANT: GL_COMPRESSED_RED_RGTC1 HEX: 8DBB
|
||||
CONSTANT: GL_COMPRESSED_SIGNED_RED_RGTC1 HEX: 8DBC
|
||||
CONSTANT: GL_COMPRESSED_RG_RGTC2 HEX: 8DBD
|
||||
CONSTANT: GL_COMPRESSED_SIGNED_RG_RGTC2 HEX: 8DBE
|
||||
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_BUFFER HEX: 8C8E
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_BUFFER_START HEX: 8C84
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_BUFFER_SIZE HEX: 8C85
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_BUFFER_BINDING HEX: 8C8F
|
||||
CONSTANT: GL_INTERLEAVED_ATTRIBS HEX: 8C8C
|
||||
CONSTANT: GL_SEPARATE_ATTRIBS HEX: 8C8D
|
||||
CONSTANT: GL_PRIMITIVES_GENERATED HEX: 8C87
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_PRIMITIVES_WRITTEN HEX: 8C88
|
||||
CONSTANT: GL_RASTERIZER_DISCARD HEX: 8C89
|
||||
CONSTANT: GL_MAX_TRANSFORM_FEEDBACK_INTERLEAVED_COMPONENTS HEX: 8C8A
|
||||
CONSTANT: GL_MAX_TRANSFORM_FEEDBACK_SEPARATE_ATTRIBS HEX: 8C8B
|
||||
CONSTANT: GL_MAX_TRANSFORM_FEEDBACK_SEPARATE_COMPONENTS HEX: 8C80
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_VARYINGS HEX: 8C83
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_BUFFER_MODE HEX: 8C7F
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_VARYING_MAX_LENGTH HEX: 8C76
|
||||
|
||||
CONSTANT: GL_FRAMEBUFFER_SRGB HEX: 8DB9
|
||||
|
||||
CONSTANT: GL_MAJOR_VERSION HEX: 821B
|
||||
CONSTANT: GL_MINOR_VERSION HEX: 821C
|
||||
CONSTANT: GL_NUM_EXTENSIONS HEX: 821D
|
||||
CONSTANT: GL_CONTEXT_FLAGS HEX: 821E
|
||||
CONSTANT: GL_INDEX HEX: 8222
|
||||
CONSTANT: GL_DEPTH_BUFFER HEX: 8223
|
||||
CONSTANT: GL_STENCIL_BUFFER HEX: 8224
|
||||
CONSTANT: GL_CONTEXT_FLAG_FORWARD_COMPATIBLE_BIT HEX: 0001
|
||||
|
||||
ALIAS: GL_COMPARE_REF_TO_TEXTURE GL_COMPARE_R_TO_TEXTURE
|
||||
ALIAS: GL_MAX_VARYING_COMPONENTS GL_MAX_VARYING_FLOATS
|
||||
ALIAS: GL_MAX_CLIP_DISTANCES GL_MAX_CLIP_PLANES
|
||||
ALIAS: GL_CLIP_DISTANCE0 GL_CLIP_PLANE0
|
||||
ALIAS: GL_CLIP_DISTANCE1 GL_CLIP_PLANE1
|
||||
ALIAS: GL_CLIP_DISTANCE2 GL_CLIP_PLANE2
|
||||
ALIAS: GL_CLIP_DISTANCE3 GL_CLIP_PLANE3
|
||||
ALIAS: GL_CLIP_DISTANCE4 GL_CLIP_PLANE4
|
||||
ALIAS: GL_CLIP_DISTANCE5 GL_CLIP_PLANE5
|
||||
|
||||
GL-FUNCTION: void glVertexAttribIPointer { glVertexAttribIPointerEXT } ( GLuint index, GLint size, GLenum type, GLsizei stride, void* pointer ) ;
|
||||
|
||||
GL-FUNCTION: void glGetVertexAttribIiv { glGetVertexAttribIivEXT } ( GLuint index, GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: void glGetVertexAttribIuiv { glGetVertexAttribIuivEXT } ( GLuint index, GLenum pname, GLuint* params ) ;
|
||||
|
||||
GL-FUNCTION: void glUniform1ui { glUniform1uiEXT } ( GLint location, GLuint v0 ) ;
|
||||
GL-FUNCTION: void glUniform2ui { glUniform2uiEXT } ( GLint location, GLuint v0, GLuint v1 ) ;
|
||||
GL-FUNCTION: void glUniform3ui { glUniform3uiEXT } ( GLint location, GLuint v0, GLuint v1, GLuint v2 ) ;
|
||||
GL-FUNCTION: void glUniform4ui { glUniform4uiEXT } ( GLint location, GLuint v0, GLuint v1, GLuint v2, GLuint v3 ) ;
|
||||
|
||||
GL-FUNCTION: void glUniform1uiv { glUniform1uivEXT } ( GLint location, GLsizei count, GLuint* value ) ;
|
||||
GL-FUNCTION: void glUniform2uiv { glUniform2uivEXT } ( GLint location, GLsizei count, GLuint* value ) ;
|
||||
GL-FUNCTION: void glUniform3uiv { glUniform3uivEXT } ( GLint location, GLsizei count, GLuint* value ) ;
|
||||
GL-FUNCTION: void glUniform4uiv { glUniform4uivEXT } ( GLint location, GLsizei count, GLuint* value ) ;
|
||||
|
||||
GL-FUNCTION: void glGetUniformuiv { glGetUniformuivEXT } ( GLuint program, GLint location, GLuint* params ) ;
|
||||
|
||||
GL-FUNCTION: void glBindFragDataLocation { glBindFragDataLocationEXT } ( GLuint program, GLuint colorNumber, GLchar* name ) ;
|
||||
GL-FUNCTION: GLint glGetFragDataLocation { glGetFragDataLocationEXT } ( GLuint program, GLchar* name ) ;
|
||||
|
||||
GL-FUNCTION: void glBeginConditionalRender { glBeginConditionalRenderNV } ( GLuint id, GLenum mode ) ;
|
||||
GL-FUNCTION: void glEndConditionalRender { glEndConditionalRenderNV } ( ) ;
|
||||
|
||||
GL-FUNCTION: void glBindVertexArray { glBindVertexArrayAPPLE } ( GLuint array ) ;
|
||||
GL-FUNCTION: void glDeleteVertexArrays { glDeleteVertexArraysAPPLE } ( GLsizei n, GLuint* arrays ) ;
|
||||
GL-FUNCTION: void glGenVertexArrays { glGenVertexArraysAPPLE } ( GLsizei n, GLuint* arrays ) ;
|
||||
GL-FUNCTION: GLboolean glIsVertexArray { glIsVertexArrayAPPLE } ( GLuint array ) ;
|
||||
|
||||
GL-FUNCTION: void glClampColor { glClampColorARB } ( GLenum target, GLenum clamp ) ;
|
||||
|
||||
GL-FUNCTION: void glBindFramebuffer { glBindFramebufferEXT } ( GLenum target, GLuint framebuffer ) ;
|
||||
GL-FUNCTION: void glBindRenderbuffer { glBindRenderbufferEXT } ( GLenum target, GLuint renderbuffer ) ;
|
||||
GL-FUNCTION: GLenum glCheckFramebufferStatus { glCheckFramebufferStatusEXT } ( GLenum target ) ;
|
||||
GL-FUNCTION: void glDeleteFramebuffers { glDeleteFramebuffersEXT } ( GLsizei n, GLuint* framebuffers ) ;
|
||||
GL-FUNCTION: void glDeleteRenderbuffers { glDeleteRenderbuffersEXT } ( GLsizei n, GLuint* renderbuffers ) ;
|
||||
GL-FUNCTION: void glFramebufferRenderbuffer { glFramebufferRenderbufferEXT } ( GLenum target, GLenum attachment, GLenum renderbuffertarget, GLuint renderbuffer ) ;
|
||||
GL-FUNCTION: void glFramebufferTexture1D { glFramebufferTexture1DEXT } ( GLenum target, GLenum attachment, GLenum textarget, GLuint texture, GLint level ) ;
|
||||
GL-FUNCTION: void glFramebufferTexture2D { glFramebufferTexture2DEXT } ( GLenum target, GLenum attachment, GLenum textarget, GLuint texture, GLint level ) ;
|
||||
GL-FUNCTION: void glFramebufferTexture3D { glFramebufferTexture3DEXT } ( GLenum target, GLenum attachment, GLenum textarget, GLuint texture, GLint level, GLint zoffset ) ;
|
||||
GL-FUNCTION: void glFramebufferTextureLayer { glFramebufferTextureLayerEXT }
|
||||
( GLenum target, GLenum attachment,
|
||||
GLuint texture, GLint level, GLint layer ) ;
|
||||
GL-FUNCTION: void glGenFramebuffers { glGenFramebuffersEXT } ( GLsizei n, GLuint* framebuffers ) ;
|
||||
GL-FUNCTION: void glGenRenderbuffers { glGenRenderbuffersEXT } ( GLsizei n, GLuint* renderbuffers ) ;
|
||||
GL-FUNCTION: void glGenerateMipmap { glGenerateMipmapEXT } ( GLenum target ) ;
|
||||
GL-FUNCTION: void glGetFramebufferAttachmentParameteriv { glGetFramebufferAttachmentParameterivEXT } ( GLenum target, GLenum attachment, GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: void glGetRenderbufferParameteriv { glGetRenderbufferParameterivEXT } ( GLenum target, GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: GLboolean glIsFramebuffer { glIsFramebufferEXT } ( GLuint framebuffer ) ;
|
||||
GL-FUNCTION: GLboolean glIsRenderbuffer { glIsRenderbufferEXT } ( GLuint renderbuffer ) ;
|
||||
GL-FUNCTION: void glRenderbufferStorage { glRenderbufferStorageEXT } ( GLenum target, GLenum internalformat, GLsizei width, GLsizei height ) ;
|
||||
|
||||
GL-FUNCTION: void glBlitFramebuffer { glBlitFramebufferEXT }
|
||||
( GLint srcX0, GLint srcY0, GLint srcX1, GLint srcY1,
|
||||
GLint dstX0, GLint dstY0, GLint dstX1, GLint dstY1,
|
||||
GLbitfield mask, GLenum filter ) ;
|
||||
|
||||
CONSTANT: GL_READ_FRAMEBUFFER_EXT HEX: 8CA8
|
||||
CONSTANT: GL_DRAW_FRAMEBUFFER_EXT HEX: 8CA9
|
||||
|
||||
ALIAS: GL_DRAW_FRAMEBUFFER_BINDING_EXT GL_FRAMEBUFFER_BINDING_EXT
|
||||
CONSTANT: GL_READ_FRAMEBUFFER_BINDING_EXT HEX: 8CAA
|
||||
|
||||
|
||||
! GL_EXT_framebuffer_multisample
|
||||
|
||||
|
||||
GL-FUNCTION: void glRenderbufferStorageMultisampleEXT { } (
|
||||
GL-FUNCTION: void glRenderbufferStorageMultisample { glRenderbufferStorageMultisampleEXT } (
|
||||
GLenum target, GLsizei samples,
|
||||
GLenum internalformat,
|
||||
GLsizei width, GLsizei height ) ;
|
||||
|
||||
CONSTANT: GL_RENDERBUFFER_SAMPLES_EXT HEX: 8CAB
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_MULTISAMPLE_EXT HEX: 8D56
|
||||
CONSTANT: GL_MAX_SAMPLES_EXT HEX: 8D57
|
||||
GL-FUNCTION: void glTexParameterIiv { glTexParameterIivEXT } ( GLenum target, GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: void glTexParameterIuiv { glTexParameterIuivEXT } ( GLenum target, GLenum pname, GLuint* params ) ;
|
||||
GL-FUNCTION: void glGetTexParameterIiv { glGetTexParameterIivEXT } ( GLenum target, GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: void glGetTexParameterIuiv { glGetTexParameterIuivEXT } ( GLenum target, GLenum pname, GLuint* params ) ;
|
||||
|
||||
GL-FUNCTION: void glColorMaski { glColorMaskIndexedEXT }
|
||||
( GLuint buf, GLboolean r, GLboolean g, GLboolean b, GLboolean a ) ;
|
||||
|
||||
GL-FUNCTION: void glGetBooleani_v { glGetBooleanIndexedvEXT } ( GLenum value, GLuint index, GLboolean* data ) ;
|
||||
|
||||
GL-FUNCTION: void glGetIntegeri_v { glGetIntegerIndexedvEXT } ( GLenum value, GLuint index, GLint* data ) ;
|
||||
|
||||
GL-FUNCTION: void glEnablei { glEnableIndexedEXT } ( GLenum target, GLuint index ) ;
|
||||
|
||||
GL-FUNCTION: void glDisablei { glDisableIndexedEXT } ( GLenum target, GLuint index ) ;
|
||||
|
||||
GL-FUNCTION: GLboolean glIsEnabledi { glIsEnabledIndexedEXT } ( GLenum target, GLuint index ) ;
|
||||
|
||||
GL-FUNCTION: void glBindBufferRange { glBindBufferRangeEXT } ( GLenum target, GLuint index, GLuint buffer,
|
||||
GLintptr offset, GLsizeiptr size ) ;
|
||||
GL-FUNCTION: void glBindBufferBase { glBindBufferBaseEXT } ( GLenum target, GLuint index, GLuint buffer ) ;
|
||||
|
||||
GL-FUNCTION: void glBeginTransformFeedback { glBeginTransformFeedbackEXT } ( GLenum primitiveMode ) ;
|
||||
GL-FUNCTION: void glEndTransformFeedback { glEndTransformFeedbackEXT } ( ) ;
|
||||
|
||||
GL-FUNCTION: void glTransformFeedbackVaryings { glTransformFeedbackVaryingsEXT } ( GLuint program, GLsizei count,
|
||||
GLchar** varyings, GLenum bufferMode ) ;
|
||||
GL-FUNCTION: void glGetTransformFeedbackVarying { glGetTransformFeedbackVaryingEXT } ( GLuint program, GLuint index,
|
||||
GLsizei bufSize, GLsizei* length,
|
||||
GLsizei* size, GLenum* type, GLchar* name ) ;
|
||||
|
||||
GL-FUNCTION: void glClearBufferiv { } ( GLenum buffer, GLint drawbuffer, GLint* value ) ;
|
||||
GL-FUNCTION: void glClearBufferuiv { } ( GLenum buffer, GLint drawbuffer, GLuint* value ) ;
|
||||
GL-FUNCTION: void glClearBufferfv { } ( GLenum buffer, GLint drawbuffer, GLfloat* value ) ;
|
||||
GL-FUNCTION: void glClearBufferfi { } ( GLenum buffer, GLint drawbuffer, GLfloat depth, GLint stencil ) ;
|
||||
|
||||
GL-FUNCTION: GLubyte* glGetStringi { } ( GLenum value, GLuint index ) ;
|
||||
|
||||
GL-FUNCTION: GLvoid* glMapBufferRange { } ( GLenum target, GLintptr offset, GLsizeiptr length, GLbitfield access ) ;
|
||||
GL-FUNCTION: void glFlushMappedBufferRange { glFlushMappedBufferRangeAPPLE } ( GLenum target, GLintptr offset, GLsizeiptr size ) ;
|
||||
|
||||
|
||||
! GL_ARB_half_float_pixel, GL_ARB_half_float_vertex
|
||||
! OpenGL 3.1
|
||||
|
||||
CONSTANT: GL_RED_SNORM HEX: 8F90
|
||||
CONSTANT: GL_RG_SNORM HEX: 8F91
|
||||
CONSTANT: GL_RGB_SNORM HEX: 8F92
|
||||
CONSTANT: GL_RGBA_SNORM HEX: 8F93
|
||||
CONSTANT: GL_R8_SNORM HEX: 8F94
|
||||
CONSTANT: GL_RG8_SNORM HEX: 8F95
|
||||
CONSTANT: GL_RGB8_SNORM HEX: 8F96
|
||||
CONSTANT: GL_RGBA8_SNORM HEX: 8F97
|
||||
CONSTANT: GL_R16_SNORM HEX: 8F98
|
||||
CONSTANT: GL_RG16_SNORM HEX: 8F99
|
||||
CONSTANT: GL_RGB16_SNORM HEX: 8F9A
|
||||
CONSTANT: GL_RGBA16_SNORM HEX: 8F9B
|
||||
CONSTANT: GL_SIGNED_NORMALIZED HEX: 8F9C
|
||||
|
||||
CONSTANT: GL_HALF_FLOAT_ARB HEX: 140B
|
||||
CONSTANT: GL_PRIMITIVE_RESTART HEX: 8F9D
|
||||
CONSTANT: GL_PRIMITIVE_RESTART_INDEX HEX: 8F9E
|
||||
|
||||
CONSTANT: GL_COPY_READ_BUFFER HEX: 8F36
|
||||
CONSTANT: GL_COPY_WRITE_BUFFER HEX: 8F37
|
||||
|
||||
! GL_ARB_texture_float
|
||||
CONSTANT: GL_UNIFORM_BUFFER HEX: 8A11
|
||||
CONSTANT: GL_UNIFORM_BUFFER_BINDING HEX: 8A28
|
||||
CONSTANT: GL_UNIFORM_BUFFER_START HEX: 8A29
|
||||
CONSTANT: GL_UNIFORM_BUFFER_SIZE HEX: 8A2A
|
||||
CONSTANT: GL_MAX_VERTEX_UNIFORM_BLOCKS HEX: 8A2B
|
||||
CONSTANT: GL_MAX_GEOMETRY_UNIFORM_BLOCKS HEX: 8A2C
|
||||
CONSTANT: GL_MAX_FRAGMENT_UNIFORM_BLOCKS HEX: 8A2D
|
||||
CONSTANT: GL_MAX_COMBINED_UNIFORM_BLOCKS HEX: 8A2E
|
||||
CONSTANT: GL_MAX_UNIFORM_BUFFER_BINDINGS HEX: 8A2F
|
||||
CONSTANT: GL_MAX_UNIFORM_BLOCK_SIZE HEX: 8A30
|
||||
CONSTANT: GL_MAX_COMBINED_VERTEX_UNIFORM_COMPONENTS HEX: 8A31
|
||||
CONSTANT: GL_MAX_COMBINED_GEOMETRY_UNIFORM_COMPONENTS HEX: 8A32
|
||||
CONSTANT: GL_MAX_COMBINED_FRAGMENT_UNIFORM_COMPONENTS HEX: 8A33
|
||||
CONSTANT: GL_UNIFORM_BUFFER_OFFSET_ALIGNMENT HEX: 8A34
|
||||
CONSTANT: GL_ACTIVE_UNIFORM_BLOCK_MAX_NAME_LENGTH HEX: 8A35
|
||||
CONSTANT: GL_ACTIVE_UNIFORM_BLOCKS HEX: 8A36
|
||||
CONSTANT: GL_UNIFORM_TYPE HEX: 8A37
|
||||
CONSTANT: GL_UNIFORM_SIZE HEX: 8A38
|
||||
CONSTANT: GL_UNIFORM_NAME_LENGTH HEX: 8A39
|
||||
CONSTANT: GL_UNIFORM_BLOCK_INDEX HEX: 8A3A
|
||||
CONSTANT: GL_UNIFORM_OFFSET HEX: 8A3B
|
||||
CONSTANT: GL_UNIFORM_ARRAY_STRIDE HEX: 8A3C
|
||||
CONSTANT: GL_UNIFORM_MATRIX_STRIDE HEX: 8A3D
|
||||
CONSTANT: GL_UNIFORM_IS_ROW_MAJOR HEX: 8A3E
|
||||
CONSTANT: GL_UNIFORM_BLOCK_BINDING HEX: 8A3F
|
||||
CONSTANT: GL_UNIFORM_BLOCK_DATA_SIZE HEX: 8A40
|
||||
CONSTANT: GL_UNIFORM_BLOCK_NAME_LENGTH HEX: 8A41
|
||||
CONSTANT: GL_UNIFORM_BLOCK_ACTIVE_UNIFORMS HEX: 8A42
|
||||
CONSTANT: GL_UNIFORM_BLOCK_ACTIVE_UNIFORM_INDICES HEX: 8A43
|
||||
CONSTANT: GL_UNIFORM_BLOCK_REFERENCED_BY_VERTEX_SHADER HEX: 8A44
|
||||
CONSTANT: GL_UNIFORM_BLOCK_REFERENCED_BY_GEOMETRY_SHADER HEX: 8A45
|
||||
CONSTANT: GL_UNIFORM_BLOCK_REFERENCED_BY_FRAGMENT_SHADER HEX: 8A46
|
||||
CONSTANT: GL_INVALID_INDEX HEX: FFFFFFFF
|
||||
|
||||
CONSTANT: GL_TEXTURE_RECTANGLE HEX: 84F5
|
||||
CONSTANT: GL_TEXTURE_BINDING_RECTANGLE HEX: 84F6
|
||||
CONSTANT: GL_PROXY_TEXTURE_RECTANGLE HEX: 84F7
|
||||
CONSTANT: GL_MAX_RECTANGLE_TEXTURE_SIZE HEX: 84F8
|
||||
CONSTANT: GL_SAMPLER_2D_RECT HEX: 8B63
|
||||
CONSTANT: GL_SAMPLER_2D_RECT_SHADOW HEX: 8B64
|
||||
|
||||
CONSTANT: GL_RGBA32F_ARB HEX: 8814
|
||||
CONSTANT: GL_RGB32F_ARB HEX: 8815
|
||||
CONSTANT: GL_ALPHA32F_ARB HEX: 8816
|
||||
CONSTANT: GL_INTENSITY32F_ARB HEX: 8817
|
||||
CONSTANT: GL_LUMINANCE32F_ARB HEX: 8818
|
||||
CONSTANT: GL_LUMINANCE_ALPHA32F_ARB HEX: 8819
|
||||
CONSTANT: GL_RGBA16F_ARB HEX: 881A
|
||||
CONSTANT: GL_RGB16F_ARB HEX: 881B
|
||||
CONSTANT: GL_ALPHA16F_ARB HEX: 881C
|
||||
CONSTANT: GL_INTENSITY16F_ARB HEX: 881D
|
||||
CONSTANT: GL_LUMINANCE16F_ARB HEX: 881E
|
||||
CONSTANT: GL_LUMINANCE_ALPHA16F_ARB HEX: 881F
|
||||
CONSTANT: GL_TEXTURE_RED_TYPE_ARB HEX: 8C10
|
||||
CONSTANT: GL_TEXTURE_GREEN_TYPE_ARB HEX: 8C11
|
||||
CONSTANT: GL_TEXTURE_BLUE_TYPE_ARB HEX: 8C12
|
||||
CONSTANT: GL_TEXTURE_ALPHA_TYPE_ARB HEX: 8C13
|
||||
CONSTANT: GL_TEXTURE_LUMINANCE_TYPE_ARB HEX: 8C14
|
||||
CONSTANT: GL_TEXTURE_INTENSITY_TYPE_ARB HEX: 8C15
|
||||
CONSTANT: GL_TEXTURE_DEPTH_TYPE_ARB HEX: 8C16
|
||||
CONSTANT: GL_UNSIGNED_NORMALIZED_ARB HEX: 8C17
|
||||
CONSTANT: GL_SAMPLER_BUFFER HEX: 8DC2
|
||||
CONSTANT: GL_INT_SAMPLER_BUFFER HEX: 8DD0
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_BUFFER HEX: 8DD8
|
||||
|
||||
CONSTANT: GL_TEXTURE_BUFFER HEX: 8C2A
|
||||
|
||||
! GL_EXT_gpu_shader4
|
||||
CONSTANT: GL_MAX_TEXTURE_BUFFER_SIZE HEX: 8C2B
|
||||
CONSTANT: GL_TEXTURE_BINDING_BUFFER HEX: 8C2C
|
||||
CONSTANT: GL_TEXTURE_BUFFER_DATA_STORE_BINDING HEX: 8C2D
|
||||
CONSTANT: GL_TEXTURE_BUFFER_FORMAT HEX: 8C2E
|
||||
|
||||
GL-FUNCTION: void glDrawArraysInstanced { glDrawArraysInstancedARB } ( GLenum mode, GLint first, GLsizei count, GLsizei primcount ) ;
|
||||
GL-FUNCTION: void glDrawElementsInstanced { glDrawElementsInstancedARB } ( GLenum mode, GLsizei count, GLenum type, GLvoid* indices, GLsizei primcount ) ;
|
||||
GL-FUNCTION: void glTexBuffer { glTexBufferEXT } ( GLenum target, GLenum internalformat, GLuint buffer ) ;
|
||||
GL-FUNCTION: void glPrimitiveRestartIndex { } ( GLuint index ) ;
|
||||
|
||||
GL-FUNCTION: void glVertexAttribI1iEXT { } ( GLuint index, GLint x ) ;
|
||||
GL-FUNCTION: void glVertexAttribI2iEXT { } ( GLuint index, GLint x, GLint y ) ;
|
||||
GL-FUNCTION: void glVertexAttribI3iEXT { } ( GLuint index, GLint x, GLint y, GLint z ) ;
|
||||
GL-FUNCTION: void glVertexAttribI4iEXT { } ( GLuint index, GLint x, GLint y, GLint z, GLint w ) ;
|
||||
GL-FUNCTION: void glGetUniformIndices { } ( GLuint program, GLsizei uniformCount, GLchar** uniformNames, GLuint* uniformIndices ) ;
|
||||
GL-FUNCTION: void glGetActiveUniformsiv { } ( GLuint program, GLsizei uniformCount, GLuint* uniformIndices, GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: void glGetActiveUniformName { } ( GLuint program, GLuint uniformIndex, GLsizei bufSize, GLsizei* length, GLchar* uniformName ) ;
|
||||
GL-FUNCTION: GLuint glGetUniformBlockIndex { } ( GLuint program, GLchar* uniformBlockName ) ;
|
||||
GL-FUNCTION: void glGetActiveUniformBlockiv { } ( GLuint program, GLuint uniformBlockIndex, GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: void glGetActiveUniformBlockName { } ( GLuint program, GLuint uniformBlockIndex, GLsizei bufSize, GLsizei* length, GLchar* uniformName ) ;
|
||||
GL-FUNCTION: void glUniformBlockBinding { } ( GLuint buffer, GLuint uniformBlockIndex, GLuint uniformBlockBinding ) ;
|
||||
|
||||
GL-FUNCTION: void glVertexAttribI1uiEXT { } ( GLuint index, GLuint x ) ;
|
||||
GL-FUNCTION: void glVertexAttribI2uiEXT { } ( GLuint index, GLuint x, GLuint y ) ;
|
||||
GL-FUNCTION: void glVertexAttribI3uiEXT { } ( GLuint index, GLuint x, GLuint y, GLuint z ) ;
|
||||
GL-FUNCTION: void glVertexAttribI4uiEXT { } ( GLuint index, GLuint x, GLuint y, GLuint z, GLuint w ) ;
|
||||
|
||||
GL-FUNCTION: void glVertexAttribI1ivEXT { } ( GLuint index, GLint* v ) ;
|
||||
GL-FUNCTION: void glVertexAttribI2ivEXT { } ( GLuint index, GLint* v ) ;
|
||||
GL-FUNCTION: void glVertexAttribI3ivEXT { } ( GLuint index, GLint* v ) ;
|
||||
GL-FUNCTION: void glVertexAttribI4ivEXT { } ( GLuint index, GLint* v ) ;
|
||||
|
||||
GL-FUNCTION: void glVertexAttribI1uivEXT { } ( GLuint index, GLuint* v ) ;
|
||||
GL-FUNCTION: void glVertexAttribI2uivEXT { } ( GLuint index, GLuint* v ) ;
|
||||
GL-FUNCTION: void glVertexAttribI3uivEXT { } ( GLuint index, GLuint* v ) ;
|
||||
GL-FUNCTION: void glVertexAttribI4uivEXT { } ( GLuint index, GLuint* v ) ;
|
||||
|
||||
GL-FUNCTION: void glVertexAttribI4bvEXT { } ( GLuint index, GLbyte* v ) ;
|
||||
GL-FUNCTION: void glVertexAttribI4svEXT { } ( GLuint index, GLshort* v ) ;
|
||||
GL-FUNCTION: void glVertexAttribI4ubvEXT { } ( GLuint index, GLubyte* v ) ;
|
||||
GL-FUNCTION: void glVertexAttribI4usvEXT { } ( GLuint index, GLushort* v ) ;
|
||||
|
||||
GL-FUNCTION: void glVertexAttribIPointerEXT { } ( GLuint index, GLint size, GLenum type, GLsizei stride, void* pointer ) ;
|
||||
|
||||
GL-FUNCTION: void glGetVertexAttribIivEXT { } ( GLuint index, GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: void glGetVertexAttribIuivEXT { } ( GLuint index, GLenum pname, GLuint* params ) ;
|
||||
|
||||
GL-FUNCTION: void glUniform1uiEXT { } ( GLint location, GLuint v0 ) ;
|
||||
GL-FUNCTION: void glUniform2uiEXT { } ( GLint location, GLuint v0, GLuint v1 ) ;
|
||||
GL-FUNCTION: void glUniform3uiEXT { } ( GLint location, GLuint v0, GLuint v1, GLuint v2 ) ;
|
||||
GL-FUNCTION: void glUniform4uiEXT { } ( GLint location, GLuint v0, GLuint v1, GLuint v2, GLuint v3 ) ;
|
||||
|
||||
GL-FUNCTION: void glUniform1uivEXT { } ( GLint location, GLsizei count, GLuint* value ) ;
|
||||
GL-FUNCTION: void glUniform2uivEXT { } ( GLint location, GLsizei count, GLuint* value ) ;
|
||||
GL-FUNCTION: void glUniform3uivEXT { } ( GLint location, GLsizei count, GLuint* value ) ;
|
||||
GL-FUNCTION: void glUniform4uivEXT { } ( GLint location, GLsizei count, GLuint* value ) ;
|
||||
|
||||
GL-FUNCTION: void glGetUniformuivEXT { } ( GLuint program, GLint location, GLuint* params ) ;
|
||||
|
||||
GL-FUNCTION: void glBindFragDataLocationEXT { } ( GLuint program, GLuint colorNumber, GLchar* name ) ;
|
||||
GL-FUNCTION: GLint glGetFragDataLocationEXT { } ( GLuint program, GLchar* name ) ;
|
||||
|
||||
CONSTANT: GL_VERTEX_ATTRIB_ARRAY_INTEGER_EXT HEX: 88FD
|
||||
CONSTANT: GL_SAMPLER_1D_ARRAY_EXT HEX: 8DC0
|
||||
CONSTANT: GL_SAMPLER_2D_ARRAY_EXT HEX: 8DC1
|
||||
CONSTANT: GL_SAMPLER_BUFFER_EXT HEX: 8DC2
|
||||
CONSTANT: GL_SAMPLER_1D_ARRAY_SHADOW_EXT HEX: 8DC3
|
||||
CONSTANT: GL_SAMPLER_2D_ARRAY_SHADOW_EXT HEX: 8DC4
|
||||
CONSTANT: GL_SAMPLER_CUBE_SHADOW_EXT HEX: 8DC5
|
||||
CONSTANT: GL_UNSIGNED_INT_VEC2_EXT HEX: 8DC6
|
||||
CONSTANT: GL_UNSIGNED_INT_VEC3_EXT HEX: 8DC7
|
||||
CONSTANT: GL_UNSIGNED_INT_VEC4_EXT HEX: 8DC8
|
||||
CONSTANT: GL_INT_SAMPLER_1D_EXT HEX: 8DC9
|
||||
CONSTANT: GL_INT_SAMPLER_2D_EXT HEX: 8DCA
|
||||
CONSTANT: GL_INT_SAMPLER_3D_EXT HEX: 8DCB
|
||||
CONSTANT: GL_INT_SAMPLER_CUBE_EXT HEX: 8DCC
|
||||
CONSTANT: GL_INT_SAMPLER_2D_RECT_EXT HEX: 8DCD
|
||||
CONSTANT: GL_INT_SAMPLER_1D_ARRAY_EXT HEX: 8DCE
|
||||
CONSTANT: GL_INT_SAMPLER_2D_ARRAY_EXT HEX: 8DCF
|
||||
CONSTANT: GL_INT_SAMPLER_BUFFER_EXT HEX: 8DD0
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_1D_EXT HEX: 8DD1
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_2D_EXT HEX: 8DD2
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_3D_EXT HEX: 8DD3
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_CUBE_EXT HEX: 8DD4
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_2D_RECT_EXT HEX: 8DD5
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_1D_ARRAY_EXT HEX: 8DD6
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_2D_ARRAY_EXT HEX: 8DD7
|
||||
CONSTANT: GL_UNSIGNED_INT_SAMPLER_BUFFER_EXT HEX: 8DD8
|
||||
CONSTANT: GL_MIN_PROGRAM_TEXEL_OFFSET_EXT HEX: 8904
|
||||
CONSTANT: GL_MAX_PROGRAM_TEXEL_OFFSET_EXT HEX: 8905
|
||||
GL-FUNCTION: void glCopyBufferSubData { glCopyBufferSubDataEXT } ( GLenum readtarget, GLenum writetarget, GLintptr readoffset, GLintptr writeoffset, GLsizeiptr size ) ;
|
||||
|
||||
|
||||
! GL_EXT_geometry_shader4
|
||||
|
@ -1912,10 +2173,6 @@ CONSTANT: GL_MAX_PROGRAM_TEXEL_OFFSET_EXT HEX: 8905
|
|||
GL-FUNCTION: void glProgramParameteriEXT { } ( GLuint program, GLenum pname, GLint value ) ;
|
||||
GL-FUNCTION: void glFramebufferTextureEXT { } ( GLenum target, GLenum attachment,
|
||||
GLuint texture, GLint level ) ;
|
||||
GL-FUNCTION: void glFramebufferTextureLayerEXT { } ( GLenum target, GLenum attachment,
|
||||
GLuint texture, GLint level, GLint layer ) ;
|
||||
GL-FUNCTION: void glFramebufferTextureFaceEXT { } ( GLenum target, GLenum attachment,
|
||||
GLuint texture, GLint level, GLenum face ) ;
|
||||
|
||||
CONSTANT: GL_GEOMETRY_SHADER_EXT HEX: 8DD9
|
||||
CONSTANT: GL_GEOMETRY_VERTICES_OUT_EXT HEX: 8DDA
|
||||
|
@ -1924,7 +2181,6 @@ CONSTANT: GL_GEOMETRY_OUTPUT_TYPE_EXT HEX: 8DDC
|
|||
CONSTANT: GL_MAX_GEOMETRY_TEXTURE_IMAGE_UNITS_EXT HEX: 8C29
|
||||
CONSTANT: GL_MAX_GEOMETRY_VARYING_COMPONENTS_EXT HEX: 8DDD
|
||||
CONSTANT: GL_MAX_VERTEX_VARYING_COMPONENTS_EXT HEX: 8DDE
|
||||
CONSTANT: GL_MAX_VARYING_COMPONENTS_EXT HEX: 8B4B
|
||||
CONSTANT: GL_MAX_GEOMETRY_UNIFORM_COMPONENTS_EXT HEX: 8DDF
|
||||
CONSTANT: GL_MAX_GEOMETRY_OUTPUT_VERTICES_EXT HEX: 8DE0
|
||||
CONSTANT: GL_MAX_GEOMETRY_TOTAL_OUTPUT_COMPONENTS_EXT HEX: 8DE1
|
||||
|
@ -1935,110 +2191,63 @@ CONSTANT: GL_TRIANGLE_STRIP_ADJACENCY_EXT HEX: D
|
|||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_LAYER_TARGETS_EXT HEX: 8DA8
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_LAYER_COUNT_EXT HEX: 8DA9
|
||||
CONSTANT: GL_FRAMEBUFFER_ATTACHMENT_LAYERED_EXT HEX: 8DA7
|
||||
ALIAS: GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_LAYER_EXT GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_3D_ZOFFSET_EXT
|
||||
CONSTANT: GL_PROGRAM_POINT_SIZE_EXT HEX: 8642
|
||||
|
||||
|
||||
! GL_EXT_framebuffer_object
|
||||
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_DIMENSIONS_EXT HEX: 8CD9
|
||||
CONSTANT: GL_FRAMEBUFFER_INCOMPLETE_FORMATS_EXT HEX: 8CDA
|
||||
|
||||
! GL_ARB_texture_float
|
||||
|
||||
CONSTANT: GL_ALPHA32F_ARB HEX: 8816
|
||||
CONSTANT: GL_INTENSITY32F_ARB HEX: 8817
|
||||
CONSTANT: GL_LUMINANCE32F_ARB HEX: 8818
|
||||
CONSTANT: GL_LUMINANCE_ALPHA32F_ARB HEX: 8819
|
||||
CONSTANT: GL_ALPHA16F_ARB HEX: 881C
|
||||
CONSTANT: GL_INTENSITY16F_ARB HEX: 881D
|
||||
CONSTANT: GL_LUMINANCE16F_ARB HEX: 881E
|
||||
CONSTANT: GL_LUMINANCE_ALPHA16F_ARB HEX: 881F
|
||||
CONSTANT: GL_TEXTURE_LUMINANCE_TYPE_ARB HEX: 8C14
|
||||
CONSTANT: GL_TEXTURE_INTENSITY_TYPE_ARB HEX: 8C15
|
||||
|
||||
! GL_EXT_texture_integer
|
||||
|
||||
|
||||
GL-FUNCTION: void glClearColorIiEXT { } ( GLint r, GLint g, GLint b, GLint a ) ;
|
||||
GL-FUNCTION: void glClearColorIuiEXT { } ( GLuint r, GLuint g, GLuint b, GLuint a ) ;
|
||||
GL-FUNCTION: void glTexParameterIivEXT { } ( GLenum target, GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: void glTexParameterIuivEXT { } ( GLenum target, GLenum pname, GLuint* params ) ;
|
||||
GL-FUNCTION: void glGetTexParameterIivEXT { } ( GLenum target, GLenum pname, GLint* params ) ;
|
||||
GL-FUNCTION: void glGetTexParameterIuivEXT { } ( GLenum target, GLenum pname, GLuint* params ) ;
|
||||
|
||||
CONSTANT: GL_RGBA_INTEGER_MODE_EXT HEX: 8D9E
|
||||
|
||||
CONSTANT: GL_RGBA32UI_EXT HEX: 8D70
|
||||
CONSTANT: GL_RGB32UI_EXT HEX: 8D71
|
||||
CONSTANT: GL_ALPHA32UI_EXT HEX: 8D72
|
||||
CONSTANT: GL_INTENSITY32UI_EXT HEX: 8D73
|
||||
CONSTANT: GL_LUMINANCE32UI_EXT HEX: 8D74
|
||||
CONSTANT: GL_LUMINANCE_ALPHA32UI_EXT HEX: 8D75
|
||||
|
||||
CONSTANT: GL_RGBA16UI_EXT HEX: 8D76
|
||||
CONSTANT: GL_RGB16UI_EXT HEX: 8D77
|
||||
CONSTANT: GL_ALPHA16UI_EXT HEX: 8D78
|
||||
CONSTANT: GL_INTENSITY16UI_EXT HEX: 8D79
|
||||
CONSTANT: GL_LUMINANCE16UI_EXT HEX: 8D7A
|
||||
CONSTANT: GL_LUMINANCE_ALPHA16UI_EXT HEX: 8D7B
|
||||
|
||||
CONSTANT: GL_RGBA8UI_EXT HEX: 8D7C
|
||||
CONSTANT: GL_RGB8UI_EXT HEX: 8D7D
|
||||
CONSTANT: GL_ALPHA8UI_EXT HEX: 8D7E
|
||||
CONSTANT: GL_INTENSITY8UI_EXT HEX: 8D7F
|
||||
CONSTANT: GL_LUMINANCE8UI_EXT HEX: 8D80
|
||||
CONSTANT: GL_LUMINANCE_ALPHA8UI_EXT HEX: 8D81
|
||||
|
||||
CONSTANT: GL_RGBA32I_EXT HEX: 8D82
|
||||
CONSTANT: GL_RGB32I_EXT HEX: 8D83
|
||||
CONSTANT: GL_ALPHA32I_EXT HEX: 8D84
|
||||
CONSTANT: GL_INTENSITY32I_EXT HEX: 8D85
|
||||
CONSTANT: GL_LUMINANCE32I_EXT HEX: 8D86
|
||||
CONSTANT: GL_LUMINANCE_ALPHA32I_EXT HEX: 8D87
|
||||
|
||||
CONSTANT: GL_RGBA16I_EXT HEX: 8D88
|
||||
CONSTANT: GL_RGB16I_EXT HEX: 8D89
|
||||
CONSTANT: GL_ALPHA16I_EXT HEX: 8D8A
|
||||
CONSTANT: GL_INTENSITY16I_EXT HEX: 8D8B
|
||||
CONSTANT: GL_LUMINANCE16I_EXT HEX: 8D8C
|
||||
CONSTANT: GL_LUMINANCE_ALPHA16I_EXT HEX: 8D8D
|
||||
|
||||
CONSTANT: GL_RGBA8I_EXT HEX: 8D8E
|
||||
CONSTANT: GL_RGB8I_EXT HEX: 8D8F
|
||||
CONSTANT: GL_ALPHA8I_EXT HEX: 8D90
|
||||
CONSTANT: GL_INTENSITY8I_EXT HEX: 8D91
|
||||
CONSTANT: GL_LUMINANCE8I_EXT HEX: 8D92
|
||||
CONSTANT: GL_LUMINANCE_ALPHA8I_EXT HEX: 8D93
|
||||
|
||||
CONSTANT: GL_RED_INTEGER_EXT HEX: 8D94
|
||||
CONSTANT: GL_GREEN_INTEGER_EXT HEX: 8D95
|
||||
CONSTANT: GL_BLUE_INTEGER_EXT HEX: 8D96
|
||||
CONSTANT: GL_ALPHA_INTEGER_EXT HEX: 8D97
|
||||
CONSTANT: GL_RGB_INTEGER_EXT HEX: 8D98
|
||||
CONSTANT: GL_RGBA_INTEGER_EXT HEX: 8D99
|
||||
CONSTANT: GL_BGR_INTEGER_EXT HEX: 8D9A
|
||||
CONSTANT: GL_BGRA_INTEGER_EXT HEX: 8D9B
|
||||
CONSTANT: GL_LUMINANCE_INTEGER_EXT HEX: 8D9C
|
||||
CONSTANT: GL_LUMINANCE_ALPHA_INTEGER_EXT HEX: 8D9D
|
||||
CONSTANT: GL_LUMINANCE_INTEGER_EXT HEX: 8D9C
|
||||
CONSTANT: GL_LUMINANCE_ALPHA_INTEGER_EXT HEX: 8D9D
|
||||
|
||||
|
||||
! GL_EXT_transform_feedback
|
||||
|
||||
|
||||
GL-FUNCTION: void glBindBufferRangeEXT { } ( GLenum target, GLuint index, GLuint buffer,
|
||||
GLintptr offset, GLsizeiptr size ) ;
|
||||
GL-FUNCTION: void glBindBufferOffsetEXT { } ( GLenum target, GLuint index, GLuint buffer,
|
||||
GLintptr offset ) ;
|
||||
GL-FUNCTION: void glBindBufferBaseEXT { } ( GLenum target, GLuint index, GLuint buffer ) ;
|
||||
|
||||
GL-FUNCTION: void glBeginTransformFeedbackEXT { } ( GLenum primitiveMode ) ;
|
||||
GL-FUNCTION: void glEndTransformFeedbackEXT { } ( ) ;
|
||||
|
||||
GL-FUNCTION: void glTransformFeedbackVaryingsEXT { } ( GLuint program, GLsizei count,
|
||||
GLchar** varyings, GLenum bufferMode ) ;
|
||||
GL-FUNCTION: void glGetTransformFeedbackVaryingEXT { } ( GLuint program, GLuint index,
|
||||
GLsizei bufSize, GLsizei* length,
|
||||
GLsizei* size, GLenum* type, GLchar* name ) ;
|
||||
|
||||
GL-FUNCTION: void glGetIntegerIndexedvEXT { } ( GLenum param, GLuint index, GLint* values ) ;
|
||||
GL-FUNCTION: void glGetBooleanIndexedvEXT { } ( GLenum param, GLuint index, GLboolean* values ) ;
|
||||
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_BUFFER_EXT HEX: 8C8E
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_BUFFER_START_EXT HEX: 8C84
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_BUFFER_SIZE_EXT HEX: 8C85
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_BUFFER_BINDING_EXT HEX: 8C8F
|
||||
CONSTANT: GL_INTERLEAVED_ATTRIBS_EXT HEX: 8C8C
|
||||
CONSTANT: GL_SEPARATE_ATTRIBS_EXT HEX: 8C8D
|
||||
CONSTANT: GL_PRIMITIVES_GENERATED_EXT HEX: 8C87
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_PRIMITIVES_WRITTEN_EXT HEX: 8C88
|
||||
CONSTANT: GL_RASTERIZER_DISCARD_EXT HEX: 8C89
|
||||
CONSTANT: GL_MAX_TRANSFORM_FEEDBACK_INTERLEAVED_COMPONENTS_EXT HEX: 8C8A
|
||||
CONSTANT: GL_MAX_TRANSFORM_FEEDBACK_SEPARATE_ATTRIBS_EXT HEX: 8C8B
|
||||
CONSTANT: GL_MAX_TRANSFORM_FEEDBACK_SEPARATE_COMPONENTS_EXT HEX: 8C80
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_VARYINGS_EXT HEX: 8C83
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_BUFFER_MODE_EXT HEX: 8C7F
|
||||
CONSTANT: GL_TRANSFORM_FEEDBACK_VARYING_MAX_LENGTH_EXT HEX: 8C76
|
||||
GL-FUNCTION: void glClearColorIiEXT { } ( GLint r, GLint g, GLint b, GLint a ) ;
|
||||
GL-FUNCTION: void glClearColorIuiEXT { } ( GLuint r, GLuint g, GLuint b, GLuint a ) ;
|
||||
|
||||
|
|
|
@ -0,0 +1 @@
|
|||
Joe Groff
|
File diff suppressed because it is too large
Load Diff
|
@ -0,0 +1 @@
|
|||
Forward-compatible subset of OpenGL 3.1
|
|
@ -45,7 +45,7 @@ HELP: bind-texture-unit
|
|||
{ $description "Binds texture " { $snippet "id" } " to texture target " { $snippet "target" } " of texture unit " { $snippet "unit" } ". Equivalent to " { $snippet "unit glActiveTexture target id glBindTexture" } "." } ;
|
||||
|
||||
HELP: set-draw-buffers
|
||||
{ $values { "buffers" "A sequence of buffer words (e.g. " { $snippet "GL_BACK" } ", " { $snippet "GL_COLOR_ATTACHMENT0_EXT" } ")"} }
|
||||
{ $values { "buffers" "A sequence of buffer words (e.g. " { $snippet "GL_BACK" } ", " { $snippet "GL_COLOR_ATTACHMENT0" } ")"} }
|
||||
{ $description "Wrapper for " { $link glDrawBuffers } ". Sets up the buffers named in the sequence for simultaneous drawing." } ;
|
||||
|
||||
HELP: do-attribs
|
||||
|
|
|
@ -65,7 +65,7 @@ PREDICATE: fragment-shader < gl-shader (fragment-shader?) ;
|
|||
glCreateProgram
|
||||
[
|
||||
[ swap [ glAttachShader ] with each ]
|
||||
[ swap [ first2 swap glBindFragDataLocationEXT ] with each ] bi-curry bi*
|
||||
[ swap [ first2 swap glBindFragDataLocation ] with each ] bi-curry bi*
|
||||
]
|
||||
[ glLinkProgram ]
|
||||
[ ] tri
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
! Copyright (C) 2009 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: tools.test opengl.textures opengl.textures.private
|
||||
images kernel namespaces accessors sequences ;
|
||||
USING: tools.test opengl.gl opengl.textures opengl.textures.private
|
||||
images kernel namespaces accessors sequences literals ;
|
||||
IN: opengl.textures.tests
|
||||
|
||||
[
|
||||
|
@ -15,4 +15,25 @@ IN: opengl.textures.tests
|
|||
{ { 10 30 } { 30 300 } }
|
||||
}
|
||||
[ [ image new swap >>dim ] map ] map image-locs
|
||||
] unit-test
|
||||
] unit-test
|
||||
|
||||
${ GL_RGBA8 GL_RGBA GL_UNSIGNED_BYTE }
|
||||
[ RGBA ubyte-components (image-format) ] unit-test
|
||||
|
||||
${ GL_RGBA8 GL_BGRA GL_UNSIGNED_BYTE }
|
||||
[ BGRA ubyte-components (image-format) ] unit-test
|
||||
|
||||
${ GL_RGBA8 GL_BGRA GL_UNSIGNED_INT_8_8_8_8_REV }
|
||||
[ ARGB ubyte-components (image-format) ] unit-test
|
||||
|
||||
${ GL_RGBA32F GL_RGBA GL_FLOAT }
|
||||
[ RGBA float-components (image-format) ] unit-test
|
||||
|
||||
${ GL_RGBA32UI GL_BGRA_INTEGER GL_UNSIGNED_INT }
|
||||
[ BGRA uint-integer-components (image-format) ] unit-test
|
||||
|
||||
${ GL_RGB9_E5 GL_RGB GL_UNSIGNED_INT_5_9_9_9_REV }
|
||||
[ BGR u-9-9-9-e5-components (image-format) ] unit-test
|
||||
|
||||
${ GL_R11F_G11F_B10F GL_RGB GL_UNSIGNED_INT_10F_11F_11F_REV }
|
||||
[ BGR float-11-11-10-components (image-format) ] unit-test
|
||||
|
|
|
@ -4,7 +4,7 @@ USING: accessors assocs cache colors.constants destructors kernel
|
|||
opengl opengl.gl opengl.capabilities combinators images
|
||||
images.tesselation grouping specialized-arrays.float sequences math
|
||||
math.vectors math.matrices generalizations fry arrays namespaces
|
||||
system locals ;
|
||||
system locals literals ;
|
||||
IN: opengl.textures
|
||||
|
||||
SYMBOL: non-power-of-2-textures?
|
||||
|
@ -22,46 +22,235 @@ SYMBOL: non-power-of-2-textures?
|
|||
|
||||
: delete-texture ( id -- ) [ glDeleteTextures ] (delete-gl-object) ;
|
||||
|
||||
GENERIC: component-type>type ( component-type -- internal-format type )
|
||||
GENERIC: component-order>format ( type component-order -- type format )
|
||||
GENERIC: component-order>integer-format ( type component-order -- type format )
|
||||
ERROR: unsupported-component-order component-order component-type ;
|
||||
|
||||
ERROR: unsupported-component-order component-order ;
|
||||
CONSTANT: image-internal-formats H{
|
||||
{ { A ubyte-components } $ GL_ALPHA8 }
|
||||
{ { A ushort-components } $ GL_ALPHA16 }
|
||||
{ { A half-components } $ GL_ALPHA16F_ARB }
|
||||
{ { A float-components } $ GL_ALPHA32F_ARB }
|
||||
{ { A byte-integer-components } $ GL_ALPHA8I_EXT }
|
||||
{ { A ubyte-integer-components } $ GL_ALPHA8UI_EXT }
|
||||
{ { A short-integer-components } $ GL_ALPHA16I_EXT }
|
||||
{ { A ushort-integer-components } $ GL_ALPHA16UI_EXT }
|
||||
{ { A int-integer-components } $ GL_ALPHA32I_EXT }
|
||||
{ { A uint-integer-components } $ GL_ALPHA32UI_EXT }
|
||||
|
||||
M: ubyte-components component-type>type drop GL_RGBA8 GL_UNSIGNED_BYTE ;
|
||||
M: ushort-components component-type>type drop GL_RGBA16 GL_UNSIGNED_SHORT ;
|
||||
M: half-components component-type>type drop GL_RGBA16F_ARB GL_HALF_FLOAT_ARB ;
|
||||
M: float-components component-type>type drop GL_RGBA32F_ARB GL_FLOAT ;
|
||||
M: byte-integer-components component-type>type drop GL_RGBA8I_EXT GL_BYTE ;
|
||||
M: short-integer-components component-type>type drop GL_RGBA16I_EXT GL_SHORT ;
|
||||
M: int-integer-components component-type>type drop GL_RGBA32I_EXT GL_INT ;
|
||||
M: ubyte-integer-components component-type>type drop GL_RGBA8I_EXT GL_UNSIGNED_BYTE ;
|
||||
M: ushort-integer-components component-type>type drop GL_RGBA16I_EXT GL_UNSIGNED_SHORT ;
|
||||
M: uint-integer-components component-type>type drop GL_RGBA32I_EXT GL_UNSIGNED_INT ;
|
||||
{ { L ubyte-components } $ GL_LUMINANCE8 }
|
||||
{ { L ushort-components } $ GL_LUMINANCE16 }
|
||||
{ { L half-components } $ GL_LUMINANCE16F_ARB }
|
||||
{ { L float-components } $ GL_LUMINANCE32F_ARB }
|
||||
{ { L byte-integer-components } $ GL_LUMINANCE8I_EXT }
|
||||
{ { L ubyte-integer-components } $ GL_LUMINANCE8UI_EXT }
|
||||
{ { L short-integer-components } $ GL_LUMINANCE16I_EXT }
|
||||
{ { L ushort-integer-components } $ GL_LUMINANCE16UI_EXT }
|
||||
{ { L int-integer-components } $ GL_LUMINANCE32I_EXT }
|
||||
{ { L uint-integer-components } $ GL_LUMINANCE32UI_EXT }
|
||||
|
||||
M: RGB component-order>format drop GL_RGB ;
|
||||
M: BGR component-order>format drop GL_BGR ;
|
||||
M: RGBA component-order>format drop GL_RGBA ;
|
||||
M: ARGB component-order>format
|
||||
swap GL_UNSIGNED_BYTE =
|
||||
[ drop GL_UNSIGNED_INT_8_8_8_8_REV GL_BGRA ]
|
||||
{ { R ubyte-components } $ GL_R8 }
|
||||
{ { R ushort-components } $ GL_R16 }
|
||||
{ { R half-components } $ GL_R16F }
|
||||
{ { R float-components } $ GL_R32F }
|
||||
{ { R byte-integer-components } $ GL_R8I }
|
||||
{ { R ubyte-integer-components } $ GL_R8UI }
|
||||
{ { R short-integer-components } $ GL_R16I }
|
||||
{ { R ushort-integer-components } $ GL_R16UI }
|
||||
{ { R int-integer-components } $ GL_R32I }
|
||||
{ { R uint-integer-components } $ GL_R32UI }
|
||||
|
||||
{ { INTENSITY ubyte-components } $ GL_INTENSITY8 }
|
||||
{ { INTENSITY ushort-components } $ GL_INTENSITY16 }
|
||||
{ { INTENSITY half-components } $ GL_INTENSITY16F_ARB }
|
||||
{ { INTENSITY float-components } $ GL_INTENSITY32F_ARB }
|
||||
{ { INTENSITY byte-integer-components } $ GL_INTENSITY8I_EXT }
|
||||
{ { INTENSITY ubyte-integer-components } $ GL_INTENSITY8UI_EXT }
|
||||
{ { INTENSITY short-integer-components } $ GL_INTENSITY16I_EXT }
|
||||
{ { INTENSITY ushort-integer-components } $ GL_INTENSITY16UI_EXT }
|
||||
{ { INTENSITY int-integer-components } $ GL_INTENSITY32I_EXT }
|
||||
{ { INTENSITY uint-integer-components } $ GL_INTENSITY32UI_EXT }
|
||||
|
||||
{ { DEPTH ushort-components } $ GL_DEPTH_COMPONENT16 }
|
||||
{ { DEPTH u-24-components } $ GL_DEPTH_COMPONENT24 }
|
||||
{ { DEPTH uint-components } $ GL_DEPTH_COMPONENT32 }
|
||||
{ { DEPTH float-components } $ GL_DEPTH_COMPONENT32F }
|
||||
|
||||
{ { LA ubyte-components } $ GL_LUMINANCE8_ALPHA8 }
|
||||
{ { LA ushort-components } $ GL_LUMINANCE16_ALPHA16 }
|
||||
{ { LA half-components } $ GL_LUMINANCE_ALPHA16F_ARB }
|
||||
{ { LA float-components } $ GL_LUMINANCE_ALPHA32F_ARB }
|
||||
{ { LA byte-integer-components } $ GL_LUMINANCE_ALPHA8I_EXT }
|
||||
{ { LA ubyte-integer-components } $ GL_LUMINANCE_ALPHA8UI_EXT }
|
||||
{ { LA short-integer-components } $ GL_LUMINANCE_ALPHA16I_EXT }
|
||||
{ { LA ushort-integer-components } $ GL_LUMINANCE_ALPHA16UI_EXT }
|
||||
{ { LA int-integer-components } $ GL_LUMINANCE_ALPHA32I_EXT }
|
||||
{ { LA uint-integer-components } $ GL_LUMINANCE_ALPHA32UI_EXT }
|
||||
|
||||
{ { RG ubyte-components } $ GL_RG8 }
|
||||
{ { RG ushort-components } $ GL_RG16 }
|
||||
{ { RG half-components } $ GL_RG16F }
|
||||
{ { RG float-components } $ GL_RG32F }
|
||||
{ { RG byte-integer-components } $ GL_RG8I }
|
||||
{ { RG ubyte-integer-components } $ GL_RG8UI }
|
||||
{ { RG short-integer-components } $ GL_RG16I }
|
||||
{ { RG ushort-integer-components } $ GL_RG16UI }
|
||||
{ { RG int-integer-components } $ GL_RG32I }
|
||||
{ { RG uint-integer-components } $ GL_RG32UI }
|
||||
|
||||
{ { DEPTH-STENCIL u-24-8-components } $ GL_DEPTH24_STENCIL8 }
|
||||
{ { DEPTH-STENCIL float-32-u-8-components } $ GL_DEPTH32F_STENCIL8 }
|
||||
|
||||
{ { RGB ubyte-components } $ GL_RGB8 }
|
||||
{ { RGB ushort-components } $ GL_RGB16 }
|
||||
{ { RGB half-components } $ GL_RGB16F }
|
||||
{ { RGB float-components } $ GL_RGB32F }
|
||||
{ { RGB byte-integer-components } $ GL_RGB8I }
|
||||
{ { RGB ubyte-integer-components } $ GL_RGB8UI }
|
||||
{ { RGB byte-integer-components } $ GL_RGB8I }
|
||||
{ { RGB ubyte-integer-components } $ GL_RGB8UI }
|
||||
{ { RGB short-integer-components } $ GL_RGB16I }
|
||||
{ { RGB ushort-integer-components } $ GL_RGB16UI }
|
||||
{ { RGB int-integer-components } $ GL_RGB32I }
|
||||
{ { RGB uint-integer-components } $ GL_RGB32UI }
|
||||
{ { RGB u-5-6-5-components } $ GL_RGB5 }
|
||||
{ { RGB u-9-9-9-e5-components } $ GL_RGB9_E5 }
|
||||
{ { RGB float-11-11-10-components } $ GL_R11F_G11F_B10F }
|
||||
|
||||
{ { RGBA ubyte-components } $ GL_RGBA8 }
|
||||
{ { RGBA ushort-components } $ GL_RGBA16 }
|
||||
{ { RGBA half-components } $ GL_RGBA16F }
|
||||
{ { RGBA float-components } $ GL_RGBA32F }
|
||||
{ { RGBA byte-integer-components } $ GL_RGBA8I }
|
||||
{ { RGBA ubyte-integer-components } $ GL_RGBA8UI }
|
||||
{ { RGBA byte-integer-components } $ GL_RGBA8I }
|
||||
{ { RGBA ubyte-integer-components } $ GL_RGBA8UI }
|
||||
{ { RGBA short-integer-components } $ GL_RGBA16I }
|
||||
{ { RGBA ushort-integer-components } $ GL_RGBA16UI }
|
||||
{ { RGBA int-integer-components } $ GL_RGBA32I }
|
||||
{ { RGBA uint-integer-components } $ GL_RGBA32UI }
|
||||
{ { RGBA u-5-5-5-1-components } $ GL_RGB5_A1 }
|
||||
{ { RGBA u-10-10-10-2-components } $ GL_RGB10_A2 }
|
||||
}
|
||||
|
||||
GENERIC: fix-internal-component-order ( order -- order' )
|
||||
|
||||
M: object fix-internal-component-order ;
|
||||
M: BGR fix-internal-component-order drop RGB ;
|
||||
M: BGRA fix-internal-component-order drop RGBA ;
|
||||
M: ARGB fix-internal-component-order drop RGBA ;
|
||||
M: ABGR fix-internal-component-order drop RGBA ;
|
||||
M: RGBX fix-internal-component-order drop RGBA ;
|
||||
M: BGRX fix-internal-component-order drop RGBA ;
|
||||
M: XRGB fix-internal-component-order drop RGBA ;
|
||||
M: XBGR fix-internal-component-order drop RGBA ;
|
||||
|
||||
: image-internal-format ( component-order component-type -- internal-format )
|
||||
2dup
|
||||
[ fix-internal-component-order ] dip 2array image-internal-formats at
|
||||
[ 2nip ] [ unsupported-component-order ] if* ;
|
||||
|
||||
: reversed-type? ( component-type -- ? )
|
||||
{ u-9-9-9-e5-components float-11-11-10-components } member? ;
|
||||
|
||||
: (component-order>format) ( component-order component-type -- gl-format )
|
||||
dup unnormalized-integer-components? [
|
||||
swap {
|
||||
{ A [ drop GL_ALPHA_INTEGER_EXT ] }
|
||||
{ L [ drop GL_LUMINANCE_INTEGER_EXT ] }
|
||||
{ R [ drop GL_RED_INTEGER ] }
|
||||
{ LA [ drop GL_LUMINANCE_ALPHA_INTEGER_EXT ] }
|
||||
{ RG [ drop GL_RG_INTEGER ] }
|
||||
{ BGR [ drop GL_BGR_INTEGER ] }
|
||||
{ RGB [ drop GL_RGB_INTEGER ] }
|
||||
{ BGRA [ drop GL_BGRA_INTEGER ] }
|
||||
{ RGBA [ drop GL_RGBA_INTEGER ] }
|
||||
{ BGRX [ drop GL_BGRA_INTEGER ] }
|
||||
{ RGBX [ drop GL_RGBA_INTEGER ] }
|
||||
[ swap unsupported-component-order ]
|
||||
} case
|
||||
] [
|
||||
swap {
|
||||
{ A [ drop GL_ALPHA ] }
|
||||
{ L [ drop GL_LUMINANCE ] }
|
||||
{ R [ drop GL_RED ] }
|
||||
{ LA [ drop GL_LUMINANCE_ALPHA ] }
|
||||
{ RG [ drop GL_RG ] }
|
||||
{ BGR [ reversed-type? GL_RGB GL_BGR ? ] }
|
||||
{ RGB [ reversed-type? GL_BGR GL_RGB ? ] }
|
||||
{ BGRA [ drop GL_BGRA ] }
|
||||
{ RGBA [ drop GL_RGBA ] }
|
||||
{ ARGB [ drop GL_BGRA ] }
|
||||
{ ABGR [ drop GL_RGBA ] }
|
||||
{ BGRX [ drop GL_BGRA ] }
|
||||
{ RGBX [ drop GL_RGBA ] }
|
||||
{ XRGB [ drop GL_BGRA ] }
|
||||
{ XBGR [ drop GL_RGBA ] }
|
||||
{ INTENSITY [ drop GL_INTENSITY ] }
|
||||
{ DEPTH [ drop GL_DEPTH_COMPONENT ] }
|
||||
{ DEPTH-STENCIL [ drop GL_DEPTH_STENCIL ] }
|
||||
[ swap unsupported-component-order ]
|
||||
} case
|
||||
] if ;
|
||||
|
||||
GENERIC: (component-type>type) ( component-order component-type -- gl-type )
|
||||
|
||||
M: object (component-type>type) unsupported-component-order ;
|
||||
|
||||
: four-channel-alpha-first? ( component-order component-type -- ? )
|
||||
over component-count 4 =
|
||||
[ drop alpha-channel-precedes-colors? ]
|
||||
[ unsupported-component-order ] if ;
|
||||
M: BGRA component-order>format drop GL_BGRA ;
|
||||
M: BGRX component-order>format drop GL_BGRA ;
|
||||
M: LA component-order>format drop GL_LUMINANCE_ALPHA ;
|
||||
M: L component-order>format drop GL_LUMINANCE ;
|
||||
|
||||
M: object component-order>format unsupported-component-order ;
|
||||
: not-alpha-first ( component-order component-type -- )
|
||||
over alpha-channel-precedes-colors?
|
||||
[ unsupported-component-order ]
|
||||
[ 2drop ] if ;
|
||||
|
||||
M: RGB component-order>integer-format drop GL_RGB_INTEGER_EXT ;
|
||||
M: BGR component-order>integer-format drop GL_BGR_INTEGER_EXT ;
|
||||
M: RGBA component-order>integer-format drop GL_RGBA_INTEGER_EXT ;
|
||||
M: BGRA component-order>integer-format drop GL_BGRA_INTEGER_EXT ;
|
||||
M: BGRX component-order>integer-format drop GL_BGRA_INTEGER_EXT ;
|
||||
M: LA component-order>integer-format drop GL_LUMINANCE_ALPHA_INTEGER_EXT ;
|
||||
M: L component-order>integer-format drop GL_LUMINANCE_INTEGER_EXT ;
|
||||
M: ubyte-components (component-type>type)
|
||||
drop alpha-channel-precedes-colors?
|
||||
[ GL_UNSIGNED_INT_8_8_8_8_REV ]
|
||||
[ GL_UNSIGNED_BYTE ] if ;
|
||||
|
||||
M: object component-order>integer-format unsupported-component-order ;
|
||||
M: ushort-components (component-type>type) not-alpha-first GL_UNSIGNED_SHORT ;
|
||||
M: uint-components (component-type>type) not-alpha-first GL_UNSIGNED_INT ;
|
||||
M: half-components (component-type>type) not-alpha-first GL_HALF_FLOAT ;
|
||||
M: float-components (component-type>type) not-alpha-first GL_FLOAT ;
|
||||
M: byte-integer-components (component-type>type) not-alpha-first GL_BYTE ;
|
||||
M: ubyte-integer-components (component-type>type) not-alpha-first GL_UNSIGNED_BYTE ;
|
||||
M: short-integer-components (component-type>type) not-alpha-first GL_SHORT ;
|
||||
M: ushort-integer-components (component-type>type) not-alpha-first GL_UNSIGNED_SHORT ;
|
||||
M: int-integer-components (component-type>type) not-alpha-first GL_INT ;
|
||||
M: uint-integer-components (component-type>type) not-alpha-first GL_UNSIGNED_INT ;
|
||||
|
||||
M: u-5-5-5-1-components (component-type>type)
|
||||
four-channel-alpha-first?
|
||||
[ GL_UNSIGNED_SHORT_1_5_5_5_REV ]
|
||||
[ GL_UNSIGNED_SHORT_5_5_5_1 ] if ;
|
||||
|
||||
M: u-5-6-5-components (component-type>type) 2drop GL_UNSIGNED_SHORT_5_6_5 ;
|
||||
|
||||
M: u-10-10-10-2-components (component-type>type)
|
||||
four-channel-alpha-first?
|
||||
[ GL_UNSIGNED_INT_2_10_10_10_REV ]
|
||||
[ GL_UNSIGNED_INT_10_10_10_2 ] if ;
|
||||
|
||||
M: u-24-components (component-type>type)
|
||||
over DEPTH =
|
||||
[ 2drop GL_UNSIGNED_INT ] [ unsupported-component-order ] if ;
|
||||
|
||||
M: u-24-8-components (component-type>type)
|
||||
over DEPTH-STENCIL =
|
||||
[ 2drop GL_UNSIGNED_INT_24_8 ] [ unsupported-component-order ] if ;
|
||||
|
||||
M: u-9-9-9-e5-components (component-type>type)
|
||||
over BGR =
|
||||
[ 2drop GL_UNSIGNED_INT_5_9_9_9_REV ] [ unsupported-component-order ] if ;
|
||||
|
||||
M: float-11-11-10-components (component-type>type)
|
||||
over BGR =
|
||||
[ 2drop GL_UNSIGNED_INT_10F_11F_11F_REV ] [ unsupported-component-order ] if ;
|
||||
|
||||
: image-data-format ( component-order component-type -- gl-format gl-type )
|
||||
[ (component-order>format) ] [ (component-type>type) ] 2bi ;
|
||||
|
||||
SLOT: display-list
|
||||
|
||||
|
@ -71,6 +260,12 @@ GENERIC: draw-scaled-texture ( dim texture -- )
|
|||
|
||||
DEFER: make-texture
|
||||
|
||||
: (image-format) ( component-order component-type -- internal-format format type )
|
||||
[ image-internal-format ] [ image-data-format ] 2bi ;
|
||||
|
||||
: image-format ( image -- internal-format format type )
|
||||
[ component-order>> ] [ component-type>> ] bi (image-format) ;
|
||||
|
||||
<PRIVATE
|
||||
|
||||
TUPLE: single-texture image dim loc texture-coords texture display-list disposed ;
|
||||
|
@ -80,15 +275,6 @@ TUPLE: single-texture image dim loc texture-coords texture display-list disposed
|
|||
[ dup 1 = [ next-power-of-2 ] unless ] map
|
||||
] unless ;
|
||||
|
||||
: image-format ( image -- internal-format format type )
|
||||
dup component-type>>
|
||||
[ nip component-type>type ]
|
||||
[
|
||||
unnormalized-integer-components?
|
||||
[ component-order>> component-order>integer-format ]
|
||||
[ component-order>> component-order>format ] if
|
||||
] 2bi swap ;
|
||||
|
||||
:: tex-image ( image bitmap -- )
|
||||
image image-format :> type :> format :> internal-format
|
||||
GL_TEXTURE_2D 0 internal-format
|
||||
|
|
|
@ -42,6 +42,7 @@ IN: windows.offscreen
|
|||
swap >>dim
|
||||
swap >>bitmap
|
||||
BGRX >>component-order
|
||||
ubyte-components >>component-type
|
||||
t >>upside-down? ;
|
||||
|
||||
: with-memory-dc ( quot: ( hDC -- ) -- )
|
||||
|
@ -50,4 +51,4 @@ IN: windows.offscreen
|
|||
:: make-bitmap-image ( dim dc quot -- image )
|
||||
dim dc make-bitmap [ &DeleteObject drop ] dip
|
||||
quot dip
|
||||
dim bitmap>image ; inline
|
||||
dim bitmap>image ; inline
|
||||
|
|
|
@ -120,14 +120,13 @@ TUPLE: bunny-outlined
|
|||
framebuffer framebuffer-dim ;
|
||||
|
||||
: outlining-supported? ( -- ? )
|
||||
"2.0" {
|
||||
"3.0" {
|
||||
"GL_ARB_shader_objects"
|
||||
"GL_ARB_draw_buffers"
|
||||
"GL_ARB_multitexture"
|
||||
} has-gl-version-or-extensions? {
|
||||
"GL_EXT_framebuffer_object"
|
||||
"GL_ARB_texture_float"
|
||||
} has-gl-extensions? and ;
|
||||
} has-gl-version-or-extensions? ;
|
||||
|
||||
: pass1-program ( -- program )
|
||||
vertex-shader-source <vertex-shader> check-gl-shader
|
||||
|
@ -154,14 +153,14 @@ TUPLE: bunny-outlined
|
|||
GL_TEXTURE_2D 0 iformat dim first2 0 xformat GL_UNSIGNED_BYTE f glTexImage2D ;
|
||||
|
||||
:: (attach-framebuffer-texture) ( texture attachment -- )
|
||||
GL_FRAMEBUFFER_EXT attachment GL_TEXTURE_2D texture 0 glFramebufferTexture2DEXT
|
||||
GL_DRAW_FRAMEBUFFER attachment GL_TEXTURE_2D texture 0 glFramebufferTexture2D
|
||||
gl-error ;
|
||||
|
||||
: (make-framebuffer) ( color-texture normal-texture depth-texture -- framebuffer )
|
||||
3array gen-framebuffer dup [
|
||||
swap GL_COLOR_ATTACHMENT0_EXT
|
||||
GL_COLOR_ATTACHMENT1_EXT
|
||||
GL_DEPTH_ATTACHMENT_EXT 3array [ (attach-framebuffer-texture) ] 2each
|
||||
swap GL_COLOR_ATTACHMENT0
|
||||
GL_COLOR_ATTACHMENT1
|
||||
GL_DEPTH_ATTACHMENT 3array [ (attach-framebuffer-texture) ] 2each
|
||||
check-framebuffer
|
||||
] with-framebuffer ;
|
||||
|
||||
|
@ -182,8 +181,8 @@ MACRO: (framebuffer-texture>>draw) ( iformat xformat setter -- )
|
|||
: (make-framebuffer-textures) ( draw dim -- draw color normal depth )
|
||||
{
|
||||
[ drop ]
|
||||
[ GL_RGBA16F_ARB GL_RGBA [ >>color-texture ] (framebuffer-texture>>draw) ]
|
||||
[ GL_RGBA16F_ARB GL_RGBA [ >>normal-texture ] (framebuffer-texture>>draw) ]
|
||||
[ GL_RGBA16F GL_RGBA [ >>color-texture ] (framebuffer-texture>>draw) ]
|
||||
[ GL_RGBA16F GL_RGBA [ >>normal-texture ] (framebuffer-texture>>draw) ]
|
||||
[
|
||||
GL_DEPTH_COMPONENT32 GL_DEPTH_COMPONENT
|
||||
[ >>depth-texture ] (framebuffer-texture>>draw)
|
||||
|
@ -202,17 +201,17 @@ MACRO: (framebuffer-texture>>draw) ( iformat xformat setter -- )
|
|||
[ drop ] [ remake-framebuffer ] if ;
|
||||
|
||||
: clear-framebuffer ( -- )
|
||||
GL_COLOR_ATTACHMENT0_EXT glDrawBuffer
|
||||
GL_COLOR_ATTACHMENT0 glDrawBuffer
|
||||
0.15 0.15 0.15 1.0 glClearColor
|
||||
GL_COLOR_BUFFER_BIT GL_DEPTH_BUFFER_BIT bitor glClear
|
||||
GL_COLOR_ATTACHMENT1_EXT glDrawBuffer
|
||||
GL_COLOR_ATTACHMENT1 glDrawBuffer
|
||||
0.0 0.0 0.0 0.0 glClearColor
|
||||
GL_COLOR_BUFFER_BIT glClear ;
|
||||
|
||||
: (pass1) ( geom draw -- )
|
||||
dup framebuffer>> [
|
||||
clear-framebuffer
|
||||
{ GL_COLOR_ATTACHMENT0_EXT GL_COLOR_ATTACHMENT1_EXT } set-draw-buffers
|
||||
{ GL_COLOR_ATTACHMENT0 GL_COLOR_ATTACHMENT1 } set-draw-buffers
|
||||
pass1-program>> (draw-cel-shaded-bunny)
|
||||
] with-framebuffer ;
|
||||
|
||||
|
|
|
@ -148,14 +148,14 @@ M: spheres-world distance-step
|
|||
|
||||
: (make-reflection-depthbuffer) ( -- depthbuffer )
|
||||
gen-renderbuffer [
|
||||
GL_RENDERBUFFER_EXT swap glBindRenderbufferEXT
|
||||
GL_RENDERBUFFER_EXT GL_DEPTH_COMPONENT32 (reflection-dim) glRenderbufferStorageEXT
|
||||
GL_RENDERBUFFER swap glBindRenderbuffer
|
||||
GL_RENDERBUFFER GL_DEPTH_COMPONENT32 (reflection-dim) glRenderbufferStorage
|
||||
] keep ;
|
||||
|
||||
: (make-reflection-framebuffer) ( depthbuffer -- framebuffer )
|
||||
gen-framebuffer dup [
|
||||
swap [ GL_FRAMEBUFFER_EXT GL_DEPTH_ATTACHMENT_EXT GL_RENDERBUFFER_EXT ] dip
|
||||
glFramebufferRenderbufferEXT
|
||||
swap [ GL_DRAW_FRAMEBUFFER GL_DEPTH_ATTACHMENT GL_RENDERBUFFER ] dip
|
||||
glFramebufferRenderbuffer
|
||||
] with-framebuffer ;
|
||||
|
||||
: (plane-program) ( -- program )
|
||||
|
@ -244,9 +244,9 @@ M: spheres-world pref-dim*
|
|||
|
||||
: (reflection-face) ( gadget face -- )
|
||||
swap reflection-texture>> [
|
||||
GL_FRAMEBUFFER_EXT
|
||||
GL_COLOR_ATTACHMENT0_EXT
|
||||
] 2dip 0 glFramebufferTexture2DEXT
|
||||
GL_DRAW_FRAMEBUFFER
|
||||
GL_COLOR_ATTACHMENT0
|
||||
] 2dip 0 glFramebufferTexture2D
|
||||
check-framebuffer ;
|
||||
|
||||
: (draw-reflection-texture) ( gadget -- )
|
||||
|
|
Loading…
Reference in New Issue