on master help sign in
Added missing parenthesis in C code generation.
c50d7c5Fabian Thorand
src/IRTS/CodegenC.hs+1−1
@@ -437,7 +437,7 @@ doOp v (LSExt (ITFixed from) ITChar) [x]
437doOp v (LSExt (ITFixed from) (ITFixed to)) [x]
437doOp v (LSExt (ITFixed from) (ITFixed to)) [x]
438 | nativeTyWidth from < nativeTyWidth to = bitCoerce v "S" from to x
438 | nativeTyWidth from < nativeTyWidth to = bitCoerce v "S" from to x
439doOp v (LZExt ITNative (ITFixed to)) [x]
439doOp v (LZExt ITNative (ITFixed to)) [x]
440− = v ++ "idris_b" ++ show (nativeTyWidth to) ++ "const(vm, (uintptr_t)GETINT(" ++ creg x ++ ")"
440+ = v ++ "idris_b" ++ show (nativeTyWidth to) ++ "const(vm, (uintptr_t)GETINT(" ++ creg x ++ "))"
441doOp v (LZExt ITChar (ITFixed to)) [x]
441doOp v (LZExt ITChar (ITFixed to)) [x]
442 = doOp v (LZExt ITNative (ITFixed to)) [x]
442 = doOp v (LZExt ITNative (ITFixed to)) [x]
443doOp v (LZExt (ITFixed from) ITNative) [x]
443doOp v (LZExt (ITFixed from) ITNative) [x]