hyung-hwan/moo
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

added more experimental xcb code

Browse Source
This commit is contained in:
hyunghwan.chung
2017-03-24 18:09:34 +00:00
parent 3fcfcff0ad
commit df1619bf7d
4 changed files with 60 additions and 93 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
moo/kernel/Mill.moo
View File

@ -269,11 +269,7 @@ class MyObject(Object)
method(#class) main
{
|a i|
System _getUint8(1,2).
'JJJJJJJJJJ' dump.
a := 100.
## PROBLEM: the following double loop will exhaust the stack
(*

26
moo/kernel/System.moo
View File

@ -120,31 +120,5 @@ extend System
method(#class,#primitive) _putUint32 (rawptr, offset, value).
method(#class,#primitive) _putUint64 (rawptr, offset, value),
*)
(*
method(#class) getUint8: rawptr at: offset
{
<primitive: #_get_uint8>
}
method(#class) getUint16: rawptr at: offset
{
<primitive: #_get_uint16>
}
method(#class) getUint32: rawptr at: offset
{
<primitive: #_get_uint32>
}
method(#class) getUint64: rawptr at: offset
{
<primitive: #_get_uint64>
}
method(#class) putUint8: value rawptr: rawptr at: offset
{
<primitive: #_get_uint8>
}*)
}