refactor text builder to use z-index for creating text vector
This commit is contained in:
@@ -41,7 +41,7 @@ struct
|
|||||||
val textAcc = Vector.concat textAcc
|
val textAcc = Vector.concat textAcc
|
||||||
val bgAcc = Vector.concat bgAcc
|
val bgAcc = Vector.concat bgAcc
|
||||||
val vec = Vector.concat [textAcc, bgAcc, cursorAcc]
|
val vec = Vector.concat [textAcc, bgAcc, cursorAcc]
|
||||||
val drawMsg = DRAW_TEXT cursorAcc
|
val drawMsg = DRAW_TEXT vec
|
||||||
in
|
in
|
||||||
DRAW drawMsg :: msgs
|
DRAW drawMsg :: msgs
|
||||||
end
|
end
|
||||||
@@ -79,6 +79,7 @@ struct
|
|||||||
( chr
|
( chr
|
||||||
, Real32.fromInt posX
|
, Real32.fromInt posX
|
||||||
, Real32.fromInt posY
|
, Real32.fromInt posY
|
||||||
|
, 0.05
|
||||||
, scale
|
, scale
|
||||||
, windowWidth
|
, windowWidth
|
||||||
, windowHeight
|
, windowHeight
|
||||||
|
|||||||
2
shf.mlb
2
shf.mlb
@@ -3,7 +3,7 @@ $(SML_LIB)/basis/basis.mlb
|
|||||||
(* LIBRARIES *)
|
(* LIBRARIES *)
|
||||||
lib/brolib-sml/src/line_gap.sml
|
lib/brolib-sml/src/line_gap.sml
|
||||||
lib/brolib-sml/src/gap_set.sml
|
lib/brolib-sml/src/gap_set.sml
|
||||||
lib/cozette-sml/fonts/cozette-ascii.mlb
|
lib/cozette-sml/fonts-with-z-index/cozette-ascii.mlb
|
||||||
|
|
||||||
(* FUNCTIONAL CORE *)
|
(* FUNCTIONAL CORE *)
|
||||||
message-types/input-msg.sml
|
message-types/input-msg.sml
|
||||||
|
|||||||
Reference in New Issue
Block a user