Mercurial > repos > rhope

comparison kernel.rhope @ 50:689fb73e7612

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add support for various integer literals and add support for raw pointers to objects and raw pointers to arrays in the FFI
author Mike Pavone <pavone@retrodev.com>
date Fri, 16 Apr 2010 01:57:04 -0400
parents 3e20ed8959c4
children 079200bc3e75
comparison
equal deleted inserted replaced
49:3e20ed8959c4 50:689fb73e7612
20 Num(Int64,Naked) 20 Num(Int64,Naked)
21 } 21 }
22 22
23 If@Int64[num:yes,no] 23 If@Int64[num:yes,no]
24 { 24 {
25 yes,no <- If[[num]!=[0]] 25 yes,no <- If[[num]!=[0i64]]
26 } 26 }
27 27
28 Blueprint Int32 28 Blueprint Int32
29 { 29 {
30 Num(Int32,Naked) 30 Num(Int32,Naked)
31 } 31 }
32 32
33 If@Int32[num:yes,no] 33 If@Int32[num:yes,no]
34 { 34 {
35 yes,no <- If[[num]!=[0]] 35 yes,no <- If[[num]!=[0i32]]
36 } 36 }
37 37
38 Blueprint Int16 38 Blueprint Int16
39 { 39 {
40 Num(Int16,Naked) 40 Num(Int16,Naked)
41 } 41 }
42 42
43 If@Int16[num:yes,no] 43 If@Int16[num:yes,no]
44 { 44 {
45 yes,no <- If[[num]!=[0]] 45 yes,no <- If[[num]!=[0i16]]
46 } 46 }
47 47
48 Blueprint Int8 48 Blueprint Int8
49 { 49 {
50 Num(Int8,Naked) 50 Num(Int8,Naked)
51 } 51 }
52 52
53 If@Int8[num:yes,no] 53 If@Int8[num:yes,no]
54 { 54 {
55 yes,no <- If[[num]!=[0]] 55 yes,no <- If[[num]!=[0i8]]
56 } 56 }
57 57
58 Blueprint UInt64 58 Blueprint UInt64
59 { 59 {
60 Num(UInt64,Naked) 60 Num(UInt64,Naked)
61 } 61 }
62 62
63 If@UInt64[num:yes,no] 63 If@UInt64[num:yes,no]
64 { 64 {
65 yes,no <- If[[num]!=[0]] 65 yes,no <- If[[num]!=[0u64]]
66 } 66 }
67 67
68 Blueprint UInt32 68 Blueprint UInt32
69 { 69 {
70 Num(UInt32,Naked) 70 Num(UInt32,Naked)
71 } 71 }
72 72
73 If@UInt32[num:yes,no] 73 If@UInt32[num:yes,no]
74 { 74 {
75 yes,no <- If[[num]!=[0]] 75 yes,no <- If[[num]!=[0u32]]
76 } 76 }
77 77
78 Blueprint UInt16 78 Blueprint UInt16
79 { 79 {
80 Num(UInt16,Naked) 80 Num(UInt16,Naked)
81 } 81 }
82 82
83 If@UInt16[num:yes,no] 83 If@UInt16[num:yes,no]
84 { 84 {
85 yes,no <- If[[num]!=[0]] 85 yes,no <- If[[num]!=[0u16]]
86 } 86 }
87 87
88 Blueprint UInt8 88 Blueprint UInt8
89 { 89 {
90 Num(UInt8,Naked) 90 Num(UInt8,Naked)
91 } 91 }
92 92
93 If@UInt8[num:yes,no] 93 If@UInt8[num:yes,no]
94 { 94 {
95 yes,no <- If[[num]!=[0]] 95 yes,no <- If[[num]!=[0u8]]
96 } 96 }
97 97
98 98
99 Blueprint Array 99 Blueprint Array
100 { 100 {