equal
deleted
inserted
replaced
686 RETURN (__mkSmallInteger( (char *)&dummy.l - (char *)&dummy.c )); |
686 RETURN (__mkSmallInteger( (char *)&dummy.l - (char *)&dummy.c )); |
687 %} |
687 %} |
688 " |
688 " |
689 ExternalBytes longAlignment |
689 ExternalBytes longAlignment |
690 " |
690 " |
|
691 ! |
|
692 |
|
693 nativeByteOrder |
|
694 "returns the underlying CPU's native byte order as |
|
695 a symbol; either #msb or #lsb" |
|
696 |
|
697 %{ /* NOCONTEXT */ |
|
698 #ifndef __SCHTEAM__ |
|
699 # ifdef __LSBFIRST__ |
|
700 RETURN ( @symbol(lsb) ); |
|
701 # else |
|
702 RETURN ( @symbol(msb) ); |
|
703 # endif |
|
704 #endif |
|
705 %}. |
|
706 self primitiveFailed. |
|
707 |
|
708 " |
|
709 ExternalBytes nativeByteOrder |
|
710 " |
|
711 |
|
712 "Created: / 17-03-2019 / 12:57:28 / Claus Gittinger" |
691 ! |
713 ! |
692 |
714 |
693 pointerAlignment |
715 pointerAlignment |
694 "return the alignement of pointers in structs and unions" |
716 "return the alignement of pointers in structs and unions" |
695 |
717 |