Bitmap test adjustments

- fill in unix bitmaps
- combine the horizontal metafunction test cases into a single bitmap

collects/redex/tests/bitmap-test.rkt

@@ -170,30 +170,25 @@
        "metafunction-Name-vertical.png")
 
 ;; in horizontal mode:
-(btest (parameterize ([metafunction-pict-style 'left-right])
-         (render-metafunction Name))
+(btest (vl-append 
+        (parameterize ([metafunction-pict-style 'left-right])
+          (render-metafunction Name))
+        (parameterize ([metafunction-pict-style 'left-right/beside-side-conditions])
+          (render-metafunction Name))
+        (parameterize ([metafunction-pict-style 'left-right/vertical-side-conditions])
+          (render-metafunction Name))
+        (parameterize ([metafunction-pict-style 'left-right/compact-side-conditions])
+          (render-metafunction Name))
+        (parameterize ([metafunction-pict-style 'left-right/compact-side-conditions]
+                       [linebreaks '(#t #f)])
+          (render-metafunction Name))
+        (parameterize ([metafunction-pict-style 'left-right/compact-side-conditions]
+                       [linebreaks '(#f #t)])
+          (render-metafunction Name))
+        (parameterize ([metafunction-pict-style 'left-right/beside-side-conditions]
+                       [linebreaks '(#t #f)])
+          (render-metafunction Name)))
        "metafunction-Name-horizontal.png")
-(btest (parameterize ([metafunction-pict-style 'left-right/beside-side-conditions])
-         (render-metafunction Name))
-       "metafunction-Name-horizontal-scbeside.png")
-(btest (parameterize ([metafunction-pict-style 'left-right/vertical-side-conditions])
-         (render-metafunction Name))
-       "metafunction-Name-horizontal-scvert.png")
-(btest (parameterize ([metafunction-pict-style 'left-right/compact-side-conditions])
-         (render-metafunction Name))
-       "metafunction-Name-horizontal-sccompact.png")
-(btest (parameterize ([metafunction-pict-style 'left-right/compact-side-conditions]
-                      [linebreaks '(#t #f)])
-         (render-metafunction Name))
-       "metafunction-Name-horizontal-lb1.png")
-(btest (parameterize ([metafunction-pict-style 'left-right/compact-side-conditions]
-                      [linebreaks '(#f #t)])
-         (render-metafunction Name))
-       "metafunction-Name-horizontal-lb2.png")
-(btest (parameterize ([metafunction-pict-style 'left-right/beside-side-conditions]
-                      [linebreaks '(#t #f)])
-         (render-metafunction Name))
-       "metafunction-Name-horizontal-scbeside-lb1.png")
 
 ;; makes sure that there is no overlap inside or across metafunction calls  
 ;; or when there are unquotes involved