Edit

kc3-lang/kc3/libc3/s64.c

Branch :

  • libc3/s64.c 
  • /* c3
 * Copyright 2022 kmx.io <contact@kmx.io>
 *
 * Permission is hereby granted to use this software excepted
 * on Apple computers granted the above copyright notice and
 * this permission paragraph are included in all copies and
 * substantial portions of this software.
 *
 * THIS SOFTWARE IS PROVIDED "AS-IS" WITHOUT ANY GUARANTEE OF
 * PURPOSE AND PERFORMANCE. IN NO EVENT WHATSOEVER SHALL THE
 * AUTHOR BE CONSIDERED LIABLE FOR THE USE AND PERFORMANCE OF
 * THIS SOFTWARE.
 */
#include "s64.h"

s8 s64_compare (s64 a, s64 b)
{
  if (a < b)
    return -1;
  if (a > b)
    return 1;
  return 0;
}

s8 s64_compare_u64 (s64 a, u64 b)
{
  if (b >= 0x8000000000000000)
    return -1;
  if (a < (s64) b)
    return -1;
  if (a > (s64) b)
    return 1;
  return 0;
}

t_hash_context * s64_hash_update (t_hash_context *context, s64 x)
{
  return hash_update(context, &x, sizeof(x));
}