Skip to content

Instantly share code, notes, and snippets.

@adh
Created June 7, 2009 14:50
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save adh/125360 to your computer and use it in GitHub Desktop.
Save adh/125360 to your computer and use it in GitHub Desktop.
dfsch_object_t* dfsch_cdr(dfsch_object_t* pair){
return (((((size_t)(((((((size_t)((pair))) & 0x02) == 0x02)) ? (pair) : dfsch_assert_instance((pair), (&dfsch_pair_type))))) & 0x03) == 0x03) ? (((dfsch_object_t**)(((size_t)(((((((size_t)((pair))) & 0x02) == 0x02)) ? (pair) : dfsch_assert_instance((pair), (&dfsch_pair_type))))) & ~0x03))[1] == ((dfsch_object_t*)((size_t) -1)) ? ((dfsch_object_t**)(((size_t)(((((((size_t)((pair))) & 0x02) == 0x02)) ? (pair) : dfsch_assert_instance((pair), (&dfsch_pair_type))))) & ~0x03))[2] : (dfsch_object_t*)(((dfsch_object_t**)(((((((size_t)((pair))) & 0x02) == 0x02)) ? (pair) : dfsch_assert_instance((pair), (&dfsch_pair_type)))))+1)): (((dfsch_pair_t*)(((size_t)(((((((size_t)((pair))) & 0x02) == 0x02)) ? (pair) : dfsch_assert_instance((pair), (&dfsch_pair_type))))) & (((((size_t)(((((((size_t)((pair))) & 0x02) == 0x02)) ? (pair) : dfsch_assert_instance((pair), (&dfsch_pair_type))))) & 0x03) == 0x03) ? ~0x03L : ~0x07L)))->cdr));
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment