cirru.cirru 520 B

123456789101112131415161718192021222324252627282930313233343536373839404142
  1. -- https://github.com/Cirru/cirru-gopher/blob/master/code/scope.cr,
  2. set a (int 2)
  3. print (self)
  4. set c (child)
  5. under c
  6. under parent
  7. print a
  8. print $ get c a
  9. set c x (int 3)
  10. print $ get c x
  11. set just-print $ code
  12. print a
  13. print just-print
  14. eval (self) just-print
  15. eval just-print
  16. print (string "string with space")
  17. print (string "escapes \n \"\\")
  18. brackets ((((()))))
  19. "eval" $ string "eval"
  20. print (add $ (int 1) (int 2))
  21. print $ unwrap $
  22. map (a $ int 1) (b $ int 2)
  23. print a
  24. int 1
  25. , b c
  26. int 2
  27. , d