Code: Select all
SUB PROCEDURE foo()
END SUB
SUB function getAtomic16bits(DIM p as ^WORD) as WORD
dim n as WORD
n = p^
foo() ' compiler hangs in a loop with this BUT only if the preceding line of code is compiled
getAtomic16bits = n
END SUB