Rename grf -> graphics.

Full names are better.
This commit is contained in:
Brad Nelson
2022-03-07 14:51:15 -08:00
parent c3939327eb
commit 83e57c2c42
13 changed files with 23 additions and 23 deletions

View File

@ -453,7 +453,7 @@ e: check-opcodes
;e
e: check-desktop
out: grf
out: graphics
check-args
check-ansi
;e
@ -474,7 +474,7 @@ DEFINED? windows [IF]
e: test-windows-forth-namespace
internals voclist
out: internals
out: grf
out: graphics
out: ansi
out: editor
out: streams
@ -513,7 +513,7 @@ e: test-posix-forth-namespace
internals voclist
out: sockets
out: internals
out: grf
out: graphics
out: ansi
out: editor
out: streams

View File

@ -36,7 +36,7 @@
\ Key/Button constants:
\ LEFT-BUTTON MIDDLE-BUTTON RIGHT-BUTTON
vocabulary grf grf definitions
vocabulary graphics graphics definitions
vocabulary internals
0 constant IDLE
@ -70,7 +70,7 @@ key-state key-count erase
: key-state! ( f k ) key-count mod key-state + c! ;
grf definitions also internals
graphics definitions also internals
: pixel ( w h -- a ) width * + 4* backbuffer + ;

View File

@ -28,7 +28,7 @@
\ screen>g ( x y -- x' y' ) Transform screen to viewport
also internals
grf definitions
graphics definitions
0 value color
@ -62,7 +62,7 @@ gstack value gp
top h 1- for left over w hline 1+ next drop
;
grf definitions also internals
graphics definitions also internals
: box { left top w h }
left sx * tx + 16 rshift

View File

@ -13,7 +13,7 @@
\ See the License for the specific language governing permissions and
\ limitations under the License.
grf
graphics
-1 -1 window

View File

@ -16,7 +16,7 @@
\ Drawing:
\ heart ( x y h -- )
grf internals definitions
graphics internals definitions
\ For t = 0 to 2pi
\ x = -16 to 16
@ -79,7 +79,7 @@ heart-end heart-size 0 fill
loop
;
grf definitions also internals
graphics definitions also internals
: heart 0 { x y s r }
x sx * tx + 16 rshift