steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fix endian issue

cvs
Slava Pestov 2005-10-25 04:17:25 +00:00
parent cd10fc269d
commit a827a56c15
2 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
TODO.FACTOR.txt
View File

@ -1,6 +1,9 @@
0.79: 0.79:
- fix remaining cosmetic issues in UI - tutorial gradient does not appear
- sig11 on first startup
- fix initial font metrics being incorrect
- fix solid boundary paint
- investigate UI on Linux/x86 - investigate UI on Linux/x86
- swap @{ and { syntax - swap @{ and { syntax
- get stuff in examples dir running in the ui - get stuff in examples dir running in the ui
@ -95,6 +98,7 @@
+ kernel: + kernel:
- better prettyprinting of cond
- better handling of random arrangements of html words when - better handling of random arrangements of html words when
prettyprinting prettyprinting
- friendlier .factor-rc load error handling - friendlier .factor-rc load error handling

8
library/freetype/freetype-gl.factor
View File

@ -129,12 +129,10 @@ C: font ( handle -- font )
: with-locked-block ( size quot -- | quot: address -- ) : with-locked-block ( size quot -- | quot: address -- )
swap 1 calloc [ swap call ] keep free ; inline swap 1 calloc [ swap call ] keep free ; inline
: b/b>w 8 shift bitor ;
: copy-pixel ( bit tex -- bit tex ) : copy-pixel ( bit tex -- bit tex )
f pick alien-unsigned-1 255 b/b>w 255 f pick set-alien-unsigned-1 1+
f pick set-alien-unsigned-2 f pick alien-unsigned-1
>r 1+ r> 2 + ; f pick set-alien-unsigned-1 >r 1+ r> 1+ ;
: (copy-row) ( bit tex bitend texend -- bitend texend ) : (copy-row) ( bit tex bitend texend -- bitend texend )
>r pick over >= [ >r pick over >= [