2016-12-27 08:10:47 -08:00

34 lines
781 B
Plaintext
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/// @section StringLiteralRef
record StringLiteralRef (
sizep : Pointer[SizeT],
);
/// @section predicates
overload ContiguousSequence?(#StringLiteralRef) : Bool = true;
[s when StringLiteral?(s)]
overload ContiguousSequence?(#Static[s]) : Bool = true;
/// @section size, begin, end, index
forceinline overload size(a:StringLiteralRef) = a.sizep^;
forceinline overload begin(a:StringLiteralRef) : Pointer[Char] = Pointer[Char](a.sizep + 1);
forceinline overload end(a:StringLiteralRef) = begin(a) + size(a);
[I when Integer?(I)]
forceinline overload index(a:StringLiteralRef, i:I) : ByRef[Char] {
assert["boundsChecks"](i >= 0 and i < size(a), "StringLiteralRef index out of bounds");
return ref (begin(a) + i)^;
}
foo() = """
long\tlong
story
"""