suzanne.soy/tock-mirror
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Implemented the ROTATELEFT and ROTATERIGHT intrinsics

Browse Source
This commit is contained in:
Neil Brown 2009-01-25 21:31:41 +00:00
parent 0b2708b2ed
commit 65171e4492
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
support/tock_intrinsics_arith.h
View File

@ -110,12 +110,12 @@ static inline INT occam_ASHIFTLEFT (INT x, INT places, const char *pos) {
static inline INT occam_ROTATERIGHT (INT, INT, const char *) occam_unused;
static inline INT occam_ROTATERIGHT (INT x, INT places, const char *pos) {
return 0;
return (INT)((UINT)x >> places) | (x << (CHAR_BIT*sizeof(INT) - places));
}
static inline INT occam_ROTATELEFT (INT, INT, const char *) occam_unused;
static inline INT occam_ROTATELEFT (INT x, INT places, const char *pos) {
return 0;
return (x << places) | (INT)((UINT)x >> (CHAR_BIT*sizeof(INT) - places));
}