@@ -508,7 +508,7 @@ doForeign vs env (ret : fname : world : args)
508508 return (l', r')
509509 splitArg _ = ifail $ "Badly formed foreign function call: " ++
510510 show (ret : fname : world : args)
511−
511+
512512
513513 toFDesc (Constant (Str str)) = FStr str
514514 toFDesc tm