c65124c1ac010d450efcfb409aaa2cf8a2683f61
[occt.git] / src / OpenGl / OpenGl_ShaderProgram.hxx
1 // Created on: 2013-09-19
2 // Created by: Denis BOGOLEPOV
3 // Copyright (c) 2013-2014 OPEN CASCADE SAS
4 //
5 // This file is part of Open CASCADE Technology software library.
6 //
7 // This library is free software; you can redistribute it and/or modify it under
8 // the terms of the GNU Lesser General Public License version 2.1 as published
9 // by the Free Software Foundation, with special exception defined in the file
10 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11 // distribution for complete text of the license and disclaimer of any warranty.
12 //
13 // Alternatively, this file may be used under the terms of Open CASCADE
14 // commercial license or contractual agreement.
15
16 #ifndef _OpenGl_ShaderProgram_Header
17 #define _OpenGl_ShaderProgram_Header
18
19 #include <NCollection_DataMap.hxx>
20 #include <NCollection_Sequence.hxx>
21 #include <TCollection_AsciiString.hxx>
22
23 #include <Graphic3d_ShaderObject.hxx>
24 #include <Graphic3d_ShaderProgram.hxx>
25
26 #include <InterfaceGraphic_tgl_all.hxx>
27
28 #include <OpenGl_Vec.hxx>
29 #include <OpenGl_Matrix.hxx>
30 #include <OpenGl_ShaderObject.hxx>
31 #include <Handle_OpenGl_ShaderProgram.hxx>
32
33 //! The enumeration of OCCT-specific OpenGL/GLSL variables.
34 enum OpenGl_StateVariable
35 {
36   // OpenGL matrix state
37   OpenGl_OCC_MODEL_WORLD_MATRIX,
38   OpenGl_OCC_WORLD_VIEW_MATRIX,
39   OpenGl_OCC_PROJECTION_MATRIX,
40   OpenGl_OCC_MODEL_WORLD_MATRIX_INVERSE,
41   OpenGl_OCC_WORLD_VIEW_MATRIX_INVERSE,
42   OpenGl_OCC_PROJECTION_MATRIX_INVERSE,
43   OpenGl_OCC_MODEL_WORLD_MATRIX_TRANSPOSE,
44   OpenGl_OCC_WORLD_VIEW_MATRIX_TRANSPOSE,
45   OpenGl_OCC_PROJECTION_MATRIX_TRANSPOSE,
46   OpenGl_OCC_MODEL_WORLD_MATRIX_INVERSE_TRANSPOSE,
47   OpenGl_OCC_WORLD_VIEW_MATRIX_INVERSE_TRANSPOSE,
48   OpenGl_OCC_PROJECTION_MATRIX_INVERSE_TRANSPOSE,
49
50   // OpenGL clip planes state
51   OpenGl_OCC_CLIP_PLANE_EQUATIONS,
52   OpenGl_OCC_CLIP_PLANE_SPACES,
53   OpenGl_OCC_CLIP_PLANE_COUNT,
54
55   // OpenGL light state
56   OpenGl_OCC_LIGHT_SOURCE_COUNT,
57   OpenGl_OCC_LIGHT_SOURCE_TYPES,
58   OpenGl_OCC_LIGHT_SOURCE_PARAMS,
59   OpenGl_OCC_LIGHT_AMBIENT,
60
61   // Material state
62   OpenGl_OCCT_ACTIVE_SAMPLER,
63   OpenGl_OCCT_TEXTURE_ENABLE,
64   OpenGl_OCCT_DISTINGUISH_MODE,
65   OpenGl_OCCT_FRONT_MATERIAL,
66   OpenGl_OCCT_BACK_MATERIAL,
67   OpenGl_OCCT_COLOR,
68
69   OpenGl_OCCT_POINT_SIZE,
70
71   // DON'T MODIFY THIS ITEM (insert new items before it)
72   OpenGl_OCCT_NUMBER_OF_STATE_VARIABLES
73 };
74
75 class OpenGl_ShaderProgram;
76
77 //! Interface for generic setter of user-defined uniform variables.
78 struct OpenGl_SetterInterface
79 {
80   //! Sets user-defined uniform variable to specified program.
81   virtual void Set (const Handle(OpenGl_Context)&           theCtx,
82                     const Handle(Graphic3d_ShaderVariable)& theVariable,
83                     OpenGl_ShaderProgram*                   theProgram) = 0;
84
85   //! Destructor
86   virtual ~OpenGl_SetterInterface() {}
87 };
88
89 //! List of OpenGL shader objects.
90 typedef NCollection_Sequence<Handle(OpenGl_ShaderObject)>    OpenGl_ShaderList;
91
92 //! List of shader variable setters.
93 typedef NCollection_DataMap<size_t, OpenGl_SetterInterface*> OpenGl_SetterList;
94
95 //! Support tool for setting user-defined uniform variables.
96 class OpenGl_VariableSetterSelector
97 {
98 public:
99
100   //! Creates new setter selector.
101   OpenGl_VariableSetterSelector();
102
103   //! Releases memory resources of setter selector.
104   ~OpenGl_VariableSetterSelector();
105
106   //! Sets user-defined uniform variable to specified program.
107   void Set (const Handle(OpenGl_Context)&           theCtx,
108             const Handle(Graphic3d_ShaderVariable)& theVariable,
109             OpenGl_ShaderProgram*                   theProgram) const;
110
111 private:
112
113   //! List of variable setters.
114   OpenGl_SetterList mySetterList;
115 };
116
117 //! Defines types of uniform state variables.
118 enum OpenGl_UniformStateType
119 {
120   OpenGl_LIGHT_SOURCES_STATE,
121   OpenGl_CLIP_PLANES_STATE,
122   OpenGl_MODEL_WORLD_STATE,
123   OpenGl_WORLD_VIEW_STATE,
124   OpenGl_PROJECTION_STATE,
125   OpenGl_MATERIALS_STATE
126 };
127
128 //! Total number of state types.
129 const int MaxStateTypes = 6;
130
131 //! Wrapper for OpenGL program object.
132 class OpenGl_ShaderProgram : public OpenGl_Resource
133 {
134   friend class OpenGl_Workspace;
135
136 public:
137
138   //! Non-valid shader name.
139   static const GLuint NO_PROGRAM = 0;
140
141   //! Invalid location of uniform/attribute variable.
142   static const GLint INVALID_LOCATION = -1;
143
144   //! List of pre-defined OCCT state uniform variables.
145   static Standard_CString PredefinedKeywords[OpenGl_OCCT_NUMBER_OF_STATE_VARIABLES];
146
147 protected:
148
149   //! Creates uninitialized shader program.
150   Standard_EXPORT OpenGl_ShaderProgram (const Handle(Graphic3d_ShaderProgram)& theProxy = NULL);
151
152   static OpenGl_VariableSetterSelector mySetterSelector;
153
154 public:
155
156   //! Releases resources of shader program.
157   Standard_EXPORT virtual ~OpenGl_ShaderProgram();
158
159   //! Creates new empty shader program of specified type.
160   Standard_EXPORT Standard_Boolean Create (const Handle(OpenGl_Context)& theCtx);
161
162   //! Destroys shader program.
163   Standard_EXPORT virtual void Release (OpenGl_Context* theCtx);
164
165   //! Attaches shader object to the program object.
166   Standard_EXPORT Standard_Boolean AttachShader (const Handle(OpenGl_Context)&      theCtx,
167                                                  const Handle(OpenGl_ShaderObject)& theShader);
168
169   //! Detaches shader object to the program object.
170   Standard_EXPORT Standard_Boolean DetachShader (const Handle(OpenGl_Context)&      theCtx,
171                                                  const Handle(OpenGl_ShaderObject)& theShader);
172
173   //! Initializes program object with the list of shader objects.
174   Standard_EXPORT Standard_Boolean Initialize (const Handle(OpenGl_Context)&     theCtx,
175                                                const Graphic3d_ShaderObjectList& theShaders);
176
177   //! Links the program object.
178   Standard_EXPORT Standard_Boolean Link (const Handle(OpenGl_Context)& theCtx);
179
180   //! Fetches information log of the last link operation.
181   Standard_EXPORT Standard_Boolean FetchInfoLog (const Handle(OpenGl_Context)& theCtx,
182                                                  TCollection_AsciiString&      theLog);
183
184   //! Fetches uniform variables from proxy shader program.
185   Standard_EXPORT Standard_Boolean ApplyVariables (const Handle(OpenGl_Context)& theCtx);
186
187   //! @return true if current object was initialized
188   inline bool IsValid() const
189   {
190     return myProgramID != NO_PROGRAM;
191   }
192
193   //! @return program ID
194   inline GLuint ProgramId() const
195   {
196     return myProgramID;
197   }
198
199 private:
200
201   //! Returns index of last modification of variables of specified state type.
202   Standard_EXPORT Standard_Size ActiveState (const OpenGl_UniformStateType theType) const;
203
204   //! Updates index of last modification of variables of specified state type.
205   Standard_EXPORT void UpdateState (const OpenGl_UniformStateType theType,
206                                     const Standard_Size           theIndex);
207
208 public:
209
210   //! Returns location of the specific uniform variable.
211   Standard_EXPORT GLint GetUniformLocation (const Handle(OpenGl_Context)& theCtx,
212                                             const GLchar*                 theName) const;
213
214   //! Returns index of the generic vertex attribute by variable name.
215   Standard_EXPORT GLint GetAttributeLocation (const Handle(OpenGl_Context)& theCtx,
216                                               const GLchar*                 theName) const;
217
218   //! Returns location of the OCCT state uniform variable.
219   Standard_EXPORT GLint GetStateLocation (const GLuint theVariable) const;
220
221 public:
222
223   //! Returns the value of the integer uniform variable.
224   Standard_EXPORT Standard_Boolean GetUniform (const Handle(OpenGl_Context)& theCtx,
225                                                const GLchar*                 theName,
226                                                OpenGl_Vec4i&                 theValue) const;
227
228   Standard_EXPORT Standard_Boolean GetUniform (const Handle(OpenGl_Context)& theCtx,
229                                                GLint                         theLocation,
230                                                OpenGl_Vec4i&                 theValue) const;
231
232   //! Returns the value of the float uniform variable.
233   Standard_EXPORT Standard_Boolean GetUniform (const Handle(OpenGl_Context)& theCtx,
234                                                const GLchar*                 theName,
235                                                OpenGl_Vec4&                  theValue) const;
236
237   //! Returns the value of the float uniform variable.
238   Standard_EXPORT Standard_Boolean GetUniform (const Handle(OpenGl_Context)& theCtx,
239                                                GLint                         theLocation,
240                                                OpenGl_Vec4&                  theValue) const;
241
242 public:
243
244   //! Returns the integer vertex attribute.
245   Standard_EXPORT Standard_Boolean GetAttribute (const Handle(OpenGl_Context)& theCtx,
246                                                  const GLchar*                 theName,
247                                                  OpenGl_Vec4i&                 theValue) const;
248
249   //! Returns the integer vertex attribute.
250   Standard_EXPORT Standard_Boolean GetAttribute (const Handle(OpenGl_Context)& theCtx,
251                                                  GLint                         theIndex,
252                                                  OpenGl_Vec4i&                 theValue) const;
253
254   //! Returns the float vertex attribute.
255   Standard_EXPORT Standard_Boolean GetAttribute (const Handle(OpenGl_Context)& theCtx,
256                                                  const GLchar*                 theName,
257                                                  OpenGl_Vec4&                  theValue) const;
258
259   //! Returns the float vertex attribute.
260   Standard_EXPORT Standard_Boolean GetAttribute (const Handle(OpenGl_Context)& theCtx,
261                                                  GLint                         theIndex,
262                                                  OpenGl_Vec4&                  theValue) const;
263
264 public:
265
266   //! Wrapper for glBindAttribLocation()
267   Standard_EXPORT Standard_Boolean SetAttributeName (const Handle(OpenGl_Context)& theCtx,
268                                                      GLint                         theIndex,
269                                                      const GLchar*                 theName);
270
271   //! Wrapper for glVertexAttrib1f()
272   Standard_EXPORT Standard_Boolean SetAttribute (const Handle(OpenGl_Context)& theCtx,
273                                                  const GLchar*                 theName,
274                                                  GLfloat                       theValue);
275
276   //! Wrapper for glVertexAttrib1f()
277   Standard_EXPORT Standard_Boolean SetAttribute (const Handle(OpenGl_Context)& theCtx,
278                                                  GLint                         theIndex,
279                                                  GLfloat                       theValue);
280
281   //! Wrapper for glVertexAttrib2fv()
282   Standard_EXPORT Standard_Boolean SetAttribute (const Handle(OpenGl_Context)& theCtx,
283                                                  const GLchar*                 theName,
284                                                  const OpenGl_Vec2&            theValue);
285
286   //! Wrapper for glVertexAttrib2fv()
287   Standard_EXPORT Standard_Boolean SetAttribute (const Handle(OpenGl_Context)& theCtx,
288                                                  GLint                         theIndex,
289                                                  const OpenGl_Vec2&            theValue);
290
291   //! Wrapper for glVertexAttrib3fv()
292   Standard_EXPORT Standard_Boolean SetAttribute (const Handle(OpenGl_Context)& theCtx,
293                                                  const GLchar*                 theName,
294                                                  const OpenGl_Vec3&            theValue);
295
296   //! Wrapper for glVertexAttrib3fv()
297   Standard_EXPORT Standard_Boolean SetAttribute (const Handle(OpenGl_Context)& theCtx,
298                                                  GLint                         theIndex,
299                                                  const OpenGl_Vec3&            theValue);
300
301   //! Wrapper for glVertexAttrib4fv()
302   Standard_EXPORT Standard_Boolean SetAttribute (const Handle(OpenGl_Context)& theCtx,
303                                                  const GLchar*                 theName,
304                                                  const OpenGl_Vec4&            theValue);
305
306   //! Wrapper for glVertexAttrib4fv()
307   Standard_EXPORT Standard_Boolean SetAttribute (const Handle(OpenGl_Context)& theCtx,
308                                                  GLint                         theIndex,
309                                                  const OpenGl_Vec4&            theValue);
310
311 public:
312
313   //! Specifies the value of the integer uniform variable.
314   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
315                                                const GLchar*                 theName,
316                                                GLint                         theValue);
317
318   //! Specifies the value of the integer uniform variable.
319   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
320                                                GLint                         theLocation,
321                                                GLint                         theValue);
322
323   //! Specifies the value of the integer uniform 2D vector.
324   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
325                                                const GLchar*                 theName,
326                                                const OpenGl_Vec2i&           theValue);
327
328   //! Specifies the value of the integer uniform 2D vector.
329   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
330                                                GLint                         theLocation,
331                                                const OpenGl_Vec2i&           theValue);
332
333   //! Specifies the value of the integer uniform 3D vector.
334   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
335                                                const GLchar*                 theName,
336                                                const OpenGl_Vec3i&           theValue);
337
338   //! Specifies the value of the integer uniform 3D vector.
339   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
340                                                GLint                         theLocation,
341                                                const OpenGl_Vec3i&           theValue);
342
343   //! Specifies the value of the integer uniform 4D vector.
344   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
345                                                const GLchar*                 theName,
346                                                const OpenGl_Vec4i&           theValue);
347
348   //! Specifies the value of the integer uniform 4D vector.
349   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
350                                                GLint                         theLocation,
351                                                const OpenGl_Vec4i&           theValue);
352
353 public:
354
355   //! Specifies the value of the float uniform variable.
356   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
357                                                const GLchar*                 theName,
358                                                GLfloat                       theValue);
359
360   //! Specifies the value of the float uniform variable.
361   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
362                                                GLint                         theLocation,
363                                                GLfloat                       theValue);
364
365   //! Specifies the value of the float uniform 2D vector.
366   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
367                                                const GLchar*                 theName,
368                                                const OpenGl_Vec2&            theValue);
369
370   //! Specifies the value of the float uniform 2D vector.
371   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
372                                                GLint                         theLocation,
373                                                const OpenGl_Vec2&            theValue);
374
375   //! Specifies the value of the float uniform 3D vector.
376   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
377                                                const GLchar*                 theName,
378                                                const OpenGl_Vec3&            theValue);
379
380   //! Specifies the value of the float uniform 3D vector.
381   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
382                                                GLint                         theLocation,
383                                                const OpenGl_Vec3&            theValue);
384
385   //! Specifies the value of the float uniform 4D vector.
386   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
387                                                const GLchar*                 theName,
388                                                const OpenGl_Vec4&            theValue);
389
390   //! Specifies the value of the float uniform 4D vector.
391   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
392                                                GLint                         theLocation,
393                                                const OpenGl_Vec4&            theValue);
394
395 public:
396
397   //! Specifies the value of the float uniform 4x4 matrix.
398   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
399                                                const GLchar*                 theName,
400                                                const OpenGl_Matrix&          theValue,
401                                                GLboolean                     theTranspose = GL_FALSE);
402
403   //! Specifies the value of the float uniform 4x4 matrix.
404   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
405                                                GLint                         theLocation,
406                                                const OpenGl_Matrix&          theValue,
407                                                GLboolean                     theTranspose = GL_FALSE);
408
409   //! Specifies the value of the float uniform 4x4 matrix.
410   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
411                                                const GLchar*                 theName,
412                                                const Tmatrix3&               theValue,
413                                                GLboolean                     theTranspose = GL_FALSE);
414
415   //! Specifies the value of the float uniform 4x4 matrix.
416   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
417                                                GLint                         theLocation,
418                                                const Tmatrix3&               theValue,
419                                                GLboolean                     theTranspose = GL_FALSE);
420
421   //! Specifies the value of the float uniform array
422   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
423                                                GLint                         theLocation,
424                                                GLuint                        theCount,
425                                                const Standard_ShortReal*     theData);
426
427   //! Specifies the value of the float2 uniform array
428   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
429                                                GLint                         theLocation,
430                                                GLuint                        theCount,
431                                                const OpenGl_Vec2*            theData);
432
433   //! Specifies the value of the float3 uniform array
434   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
435                                                GLint                         theLocation,
436                                                GLuint                        theCount,
437                                                const OpenGl_Vec3*            theData);
438
439   //! Specifies the value of the float4 uniform array
440   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
441                                                GLint                         theLocation,
442                                                GLuint                        theCount,
443                                                const OpenGl_Vec4*            theData);
444
445   //! Specifies the value of the integer uniform array
446   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
447                                                GLint                         theLocation,
448                                                GLuint                        theCount,
449                                                const Standard_Integer*       theData);
450
451   //! Specifies the value of the int2 uniform array
452   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
453                                                GLint                         theLocation,
454                                                GLuint                        theCount,
455                                                const OpenGl_Vec2i*           theData);
456
457   //! Specifies the value of the int3 uniform array
458   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
459                                                GLint                         theLocation,
460                                                GLuint                        theCount,
461                                                const OpenGl_Vec3i*           theData);
462
463   //! Specifies the value of the int4 uniform array
464   Standard_EXPORT Standard_Boolean SetUniform (const Handle(OpenGl_Context)& theCtx,
465                                                GLint                         theLocation,
466                                                GLuint                        theCount,
467                                                const OpenGl_Vec4i*           theData);
468
469 public:
470
471   //! Specifies the value of the sampler uniform variable.
472   Standard_EXPORT Standard_Boolean SetSampler (const Handle(OpenGl_Context)& theCtx,
473                                                const GLchar*                 theName,
474                                                const GLenum                  theTextureUnit);
475
476   //! Specifies the value of the sampler uniform variable.
477   Standard_EXPORT Standard_Boolean SetSampler (const Handle(OpenGl_Context)& theCtx,
478                                                GLint                         theLocation,
479                                                const GLenum                  theTextureUnit);
480
481 protected:
482
483   //! Increments counter of users.
484   //! Used by OpenGl_ShaderManager.
485   //! @return true when resource has been restored from delayed release queue
486   bool Share()
487   {
488     return ++myShareCount == 1;
489   }
490
491   //! Decrements counter of users.
492   //! Used by OpenGl_ShaderManager.
493   //! @return true when there are no more users of this program has been left
494   bool UnShare()
495   {
496     return --myShareCount == 0;
497   }
498
499 protected:
500
501   GLuint                          myProgramID;     //!< Handle of OpenGL shader program
502   OpenGl_ShaderList               myShaderObjects; //!< List of attached shader objects
503   Handle(Graphic3d_ShaderProgram) myProxy;         //!< Proxy shader program (from application layer)
504   Standard_Integer                myShareCount;    //!< program users count, initialized with 1 (already shared by one user)
505
506 protected:
507
508   Standard_Size myCurrentState[MaxStateTypes];  //!< defines last modification for variables of each state type
509
510   //! Stores locations of OCCT state uniform variables.
511   GLint myStateLocations[OpenGl_OCCT_NUMBER_OF_STATE_VARIABLES];
512
513 public:
514
515   DEFINE_STANDARD_RTTI (OpenGl_ShaderProgram)
516   friend class OpenGl_ShaderManager;
517
518 };
519
520 template<class T>
521 struct OpenGl_VariableSetter : public OpenGl_SetterInterface
522 {
523   virtual void Set (const Handle(OpenGl_Context)&           theCtx,
524                     const Handle(Graphic3d_ShaderVariable)& theVariable,
525                     OpenGl_ShaderProgram*                   theProgram)
526   {
527     theProgram->SetUniform (theCtx,
528                             theVariable->Name().ToCString(),
529                             theVariable->Value()->As<T>());
530   }
531 };
532
533 namespace OpenGl_HashMapInitializer
534 {
535   template<class K, class V>
536   struct MapListOfType
537   {
538     NCollection_DataMap<K, V> myDictionary;
539
540     MapListOfType (K theKey, V theValue)
541     {
542       myDictionary.Bind (theKey, theValue);
543     }
544
545     MapListOfType& operator() (K theKey, V theValue)
546     {
547       myDictionary.Bind (theKey, theValue);
548       return *this;
549     }
550
551     operator const NCollection_DataMap<K, V>& () const
552     {
553       return myDictionary;
554     }
555   };
556
557   template<class K, class V>
558   MapListOfType<K, V> CreateListOf (K theKey, V theValue)
559   {
560     return MapListOfType<K, V> (theKey, theValue);
561   }
562 }
563
564 #endif // _OpenGl_ShaderProgram_Header