diff options
| author | Geoffrey Mainland <gmainlan@microsoft.com> | 2013-09-15 17:20:09 -0400 |
|---|---|---|
| committer | Geoffrey Mainland <gmainlan@microsoft.com> | 2013-09-22 22:34:00 -0400 |
| commit | 26a960c662cdfdfb24ec8ed3e013c686dfdca4cd (patch) | |
| tree | f99cd0e0fddc6d44f18c4d69841b41697e618408 /compiler/ghci/ByteCodeAsm.lhs | |
| parent | 49f4c12e0ad53f9d10c74c4a04c485f89293c4b6 (diff) | |
| download | haskell-26a960c662cdfdfb24ec8ed3e013c686dfdca4cd.tar.gz | |
Add support for 512-bit-wide vectors.
Diffstat (limited to 'compiler/ghci/ByteCodeAsm.lhs')
| -rw-r--r-- | compiler/ghci/ByteCodeAsm.lhs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/ghci/ByteCodeAsm.lhs b/compiler/ghci/ByteCodeAsm.lhs index e6cec874f4..7e5ef354a9 100644 --- a/compiler/ghci/ByteCodeAsm.lhs +++ b/compiler/ghci/ByteCodeAsm.lhs @@ -463,6 +463,7 @@ push_alts F = bci_PUSH_ALTS_F push_alts D = bci_PUSH_ALTS_D push_alts V16 = error "push_alts: vector" push_alts V32 = error "push_alts: vector" +push_alts V64 = error "push_alts: vector" return_ubx :: ArgRep -> Word16 return_ubx V = bci_RETURN_V @@ -473,6 +474,7 @@ return_ubx F = bci_RETURN_F return_ubx D = bci_RETURN_D return_ubx V16 = error "return_ubx: vector" return_ubx V32 = error "return_ubx: vector" +return_ubx V64 = error "return_ubx: vector" -- Make lists of host-sized words for literals, so that when the -- words are placed in memory at increasing addresses, the |