File: test_step.pro

package info (click to toggle)
gnudatalanguage 0.9.5-2
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 15,228 kB
  • ctags: 11,455
  • sloc: cpp: 143,352; makefile: 426; sh: 103; ansic: 44; awk: 18; python: 6
file content (17 lines) | stat: -rw-r--r-- 346 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
pro test_step
  spawn, 'echo "' $
  + '.compile test_step.pro ' + string(10b) $
  + 'test_step_helper, a' + string(10b) $
  + '.step' + string(10b) $
  + 'print, a' + string(10b) $
  + '" | ../src/gdl -quiet', out
  if fix(out[n_elements(out) - 1]) ne 2 then exit, status=1
end

pro test_step_helper, a
  a = 1
  stop
  a = 2
  a = 3
  a = 4
end