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 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));
    }