Mercurial > repos > rhope
comparison kernel.rhope @ 71:c40c3d399133
Add Int32@String and Get Char. Fix stack bug
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Fri, 18 Jun 2010 15:07:09 -0400 |
parents | d0ce696786cc |
children | a844c623c7df |
comparison
equal
deleted
inserted
replaced
70:1bfcf5f8fa69 | 71:c40c3d399133 |
---|---|
36 } | 36 } |
37 | 37 |
38 Foreign C:libc | 38 Foreign C:libc |
39 { | 39 { |
40 write[filedes(Int32,Naked),buf(Array,Raw Pointer),nbyte(Int64,Naked):written(Int32,Naked)] | 40 write[filedes(Int32,Naked),buf(Array,Raw Pointer),nbyte(Int64,Naked):written(Int32,Naked)] |
41 read[filedes(Int32,Naked),buf(Array,Raw Pointer,Mutable),nbyte(Int64,Naked):read(Int64,Naked),buf] | |
41 } | 42 } |
42 | 43 |
43 _Print Int32[n,buf:out] | 44 _Print Int32[n,buf:out] |
44 { | 45 { |
45 If[[n] < [10i32]] | 46 If[[n] < [10i32]] |