fork download
  1. : #define :
  2. ;
  3. #define __MAX_COLOR__ 6
  4. ; __MAX_COLOR__
  5.  
  6. #define color __MAX_COLOR__
  7. ; ' max ' color = 5
  8.  
  9. #define cyan 48
  10. ; base color cyan
  11.  
  12. #define pink 431
  13. ; create pale pink color
  14.  
  15. #define orange -477
  16. ; orange : another color ; - ( )
  17.  
  18. #define gelb rot + pink
  19. ; orange + pink
  20.  
  21. #define blau gelb + cyan
  22. ; orange , pink and cyan
  23.  
  24. #define rot blau + orange
  25. ; another #define ;
  26.  
  27. ;
  28.  
  29. variable rosa = 35 - gelb + rosa ; rosa rosa rosa !
  30.  
  31. variable purple = 803 * blau ; . . . create deep purple
  32.  
  33. variable green = 23 * rot + purple ;
  34.  
  35. purple = 517 * rot ; green ( next to last . . . )
  36.  
  37. green = 53 * ( rosa + 1 ) / ( color - 6 ) ; . . . and over
Compilation error #stdin compilation error #stdout 0s 0KB
stdin
Standard input is empty
compilation info
Mozart Compiler 1.4.0 (20080704) playing Oz 3

%%% feeding file prog.oz

%*************************** parse error ************************
%**
%** syntax error, unexpected ':'
%**
%** in file "./prog.oz", line 1, column 42
%** ------------------ rejected (1 error)
stdout
Standard output is empty