Mercurial > repos > tabletprog
comparison modules/bytearray.tp @ 180:270d31c6c4cd
Add support for jmps and labels in x86 module
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Sat, 24 Aug 2013 15:08:00 -0700 |
parents | e823e104b845 |
children | fb922651db29 |
comparison
equal
deleted
inserted
replaced
179:75aca5f87969 | 180:270d31c6c4cd |
---|---|
57 totalSize <- bytes fold: 0 with: :acc el { | 57 totalSize <- bytes fold: 0 with: :acc el { |
58 acc + (el length) | 58 acc + (el length) |
59 } | 59 } |
60 ba <- executable: totalSize | 60 ba <- executable: totalSize |
61 bytes fold: 0 with: :idx el { | 61 bytes fold: 0 with: :idx el { |
62 el fold: idx with: :idx byte { | 62 el flattenTo: ba at: idx |
63 ba set: idx byte | |
64 idx + 1 | |
65 } | |
66 } | 63 } |
67 ba | 64 ba |
68 } | 65 } |
69 } | 66 } |