rename some glut enums
authorDaniel Hartwig <mandyke@gmail.com>
Sun, 10 Feb 2013 07:33:00 +0000 (15:33 +0800)
committerDaniel Hartwig <mandyke@gmail.com>
Sun, 10 Feb 2013 07:33:00 +0000 (15:33 +0800)
* figl/glut/enums.scm (button-name, layer-name, cursor-name): Renamed
  to be less generic, and more inline with gl enums.

figl/glut/enums.scm

index 983ac36..f609f64 100644 (file)
 (define-module (figl glut enums)
   #:use-module (figl runtime)
   #:export (display-mode
-            button
+            button-name
             button-state
             special-key
             entry-state
             menu-status
             visibility-state
             color-component
-            layer
+            layer-name
             glut-state
             device-info
             layer-info
             modifier-key-state
-            cursor))
+            cursor-name))
 
 (define-bitfield
   display-mode
@@ -55,7 +55,7 @@
   (luminance 512))
 
 (define-enumeration
-  button
+  button-name
   (left-button 0)
   (middle-button 1)
   (right-button 2))
   (blue 2))
 
 (define-enumeration
-  layer
+  layer-name
   (normal 0)
   (overlay 1))
 
   (active-alt 4))
 
 (define-enumeration
-  cursor
+  cursor-name
   ;; Basic arrows
   (cursor-right-arrow 0)
   (cursor-left-arrow 1)