Added missing test files

Author: FractalFir

src/compile_test.rs

@@ -570,7 +570,11 @@ test_lib! {recursive}
 test_lib! {tuple}
 
 run_test! {arthm,add}
+
 run_test! {arthm,mul}
+
+run_test! {types,tuple_structs}
+
 run_test! {arthm,sub}
 run_test! {types,enums}
 run_test! {types,nbody}

test/recursive.rs

@@ -0,0 +1,108 @@
+pub struct LinkedListNode<T>{
+    next:*mut Self,
+    val:T,
+}
+pub struct BetterLinkedList<T>{
+    next:Option<*mut Self>,
+    val:T,
+}
+pub struct DoubleLinkedListNode<T>{
+    next:*mut Self,
+    prev:*mut Self,
+    val:T,
+}
+pub struct BetterDoubleLinkedListNode<T>{
+    next:Option<*mut Self>,
+    prev:Option<*mut Self>,
+    val:T,
+}
+#[no_mangle]
+pub fn get_nth(curr:*mut LinkedListNode<usize>,nth:usize)->Option<usize>{
+    if nth == 0{
+        Some(unsafe{(*curr).val})
+    }
+    else{
+         let next = unsafe{(*curr).next};
+         if next == core::ptr::null_mut(){
+            None
+         }
+         else{
+            get_nth(next,nth - 1)
+         }
+    }
+}
+#[no_mangle]
+pub fn get_nth_b(curr:*mut BetterLinkedList<usize>,nth:usize)->Option<usize>{
+    if nth == 0{
+        Some(unsafe{(*curr).val})
+    }
+    else{
+         let next = unsafe{(*curr).next};
+         if let Some(next) = next{
+            get_nth_b(next,nth - 1)//None
+         }
+         else{
+            None
+         }
+    }
+}
+#[no_mangle]
+pub fn get_nth_d(curr:*mut DoubleLinkedListNode<usize>,nth:usize)->Option<usize>{
+    if nth == 0{
+        Some(unsafe{(*curr).val})
+    }
+    else{
+         let next = unsafe{(*curr).next};
+         if next == core::ptr::null_mut(){
+            None
+         }
+         else{
+            get_nth_d(next,nth - 1)
+         }
+    }
+}
+#[no_mangle]
+pub fn get_nth_back_d(curr:*mut DoubleLinkedListNode<usize>,nth:usize)->Option<usize>{
+    if nth == 0{
+        Some(unsafe{(*curr).val})
+    }
+    else{
+         let prev = unsafe{(*curr).prev};
+         if prev == core::ptr::null_mut(){
+            None
+         }
+         else{
+            get_nth_d(prev,nth - 1)
+         }
+    }
+}
+#[no_mangle]
+pub fn get_nth_db(curr:*mut BetterDoubleLinkedListNode<usize>,nth:usize)->Option<usize>{
+    if nth == 0{
+        Some(unsafe{(*curr).val})
+    }
+    else{
+         let next = unsafe{(*curr).next};
+         if let Some(next) = next{
+            get_nth_db(next,nth - 1)
+         }
+         else{
+            None
+         }
+    }
+}
+#[no_mangle]
+pub fn get_nth_back_db(curr:*mut BetterDoubleLinkedListNode<usize>,nth:usize)->Option<usize>{
+    if nth == 0{
+        Some(unsafe{(*curr).val})
+    }
+    else{
+         let prev = unsafe{(*curr).prev};
+         if let Some(prev) = prev{
+            get_nth_db(prev,nth - 1)
+         }
+         else{
+            None
+         }
+    }
+}

test/tuple.rs

@@ -0,0 +1,13 @@
+#![allow(improper_ctypes_definitions)]
+pub struct Inner{
+}
+pub struct TupleOwner{
+    tuple:(usize,*mut Inner)
+}
+#[no_mangle]
+pub extern "C" fn set_inner(owner:&mut TupleOwner,inner:*mut Inner){
+    owner.tuple = (77,inner);
+}
+pub extern "C" fn read_inner(owner:&TupleOwner)->&*mut Inner{
+    &owner.tuple.1
+}

test/types/tuple_structs.rs

@@ -0,0 +1,10 @@
+#![feature(lang_items,adt_const_params,associated_type_defaults,core_intrinsics,start)]
+#![allow(internal_features,incomplete_features,unused_variables,dead_code)]
+#![no_std]
+struct TupleStyleStruct(u32,u8);
+include!("../common.rs");
+fn main(){
+    let mut tst = black_box(TupleStyleStruct(black_box(8),1));
+    tst.0 += tst.1 as u32;
+    black_box(tst);
+}