?login_element?

Subversion Repositories NedoOS

Rev

Rev 129 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1.     OUTPUT "dir_if_ifn.bin"     ; final output should be 8x 'v'
  2.  
  3.     ;; Check IF functionality in normal code
  4.     IF 5 < 3 && 2 < 10
  5.         false
  6.     ENDIF
  7.  
  8.     IF 3 < 5 && 2 < 10
  9.         halt    ; true
  10.     ENDIF
  11.  
  12.     IF 3 < 5
  13.         IF 5 < 3
  14.             nested false
  15.         ENDIF
  16.         IF 2 < 10
  17.             halt; nested true
  18.         ENDIF
  19.     ENDIF
  20.  
  21.     IF 5 < 3    ; top level is false
  22.         IF 5 < 3
  23.             nested false
  24.         ENDIF
  25.         IF 2 < 10
  26.             almost halt; nested true in false
  27.         ENDIF
  28.     ENDIF
  29.  
  30.     ; ELSE variants
  31.     IF 3 < 5
  32.         IF 5 < 3
  33.             nested false
  34.         ELSE
  35.             halt; nested true
  36.         ENDIF
  37.     ELSE        ; top level is false
  38.         IF 5 < 3
  39.             nested false
  40.         ELSE
  41.             almost halt; nested true in false
  42.         ENDIF
  43.     ENDIF
  44.  
  45.     ; check the multi-ELSE error
  46.     IF 3 < 2
  47.         false
  48.     ELSE
  49.         halt    ; true
  50.     ELSE        ; error (only single else is permitted)
  51.         false again
  52.     ELSE        ; error
  53.         false again
  54.     ENDIF
  55.  
  56.     ;; Check IFN functionality in normal code
  57.     IFN 5 < 3 && 2 < 10
  58.         halt    ; true
  59.     ENDIF
  60.  
  61.     IFN 3 < 5 && 2 < 10
  62.         false
  63.     ENDIF
  64.  
  65.     IFN 3 < 5   ; top level is false
  66.         IFN 5 < 3
  67.             almost halt; nested true in false
  68.         ENDIF
  69.         IFN 2 < 10
  70.             nested false
  71.         ENDIF
  72.     ENDIF
  73.  
  74.     IFN 5 < 3   ; true
  75.         IFN 5 < 3
  76.             halt; nested true
  77.         ENDIF
  78.         IFN 2 < 10
  79.             nested false
  80.         ENDIF
  81.     ENDIF
  82.  
  83.     ; ELSE variants
  84.     IFN 3 < 5   ; top level is false
  85.         IFN 5 < 3
  86.             almost halt; nested true in false
  87.         ELSE
  88.             nested false
  89.         ENDIF
  90.     ELSE        ; true
  91.         IFN 5 < 3
  92.             halt; nested true
  93.         ELSE
  94.             nested false
  95.         ENDIF
  96.     ENDIF
  97.  
  98.     ; check the multi-ELSE error
  99.     IFN 3 < 2
  100.         halt    ; true
  101.     ELSE
  102.         false
  103.     ELSE        ; error (only single else is permitted)
  104.         false again
  105.     ELSE        ; error
  106.         false again
  107.     ENDIF
  108.