Import VBCC source snapshot (29/04/2022)
diff --git a/datatypes/dtf.c b/datatypes/dtf.c
new file mode 100644
index 0000000..be36f46
--- /dev/null
+++ b/datatypes/dtf.c
@@ -0,0 +1,11 @@
+from)
+{
+  DTTTYPE to=0;
+  int i,j=0;
+  for(i=sizeof(from.a)-1;i>=0;i--)
+    to=(to<<8)|(from.a[i]&255);
+
+  to<<=(sizeof(to)*8)-BITSIZE;
+  to>>=(sizeof(to)*8)-BITSIZE;
+  return to;
+}