← Back to branch summary

~ubuntu-branches/ubuntu/utopic/critcl/utopic

« back to all changes in this revision

Viewing changes to test/basic.tcl

  • Committer: Package Import Robot
  • Author(s): Andrew Shadura
  • Date: 2013-05-11 00:08:06 UTC
  • Revision ID: package-import@ubuntu.com-20130511000806-7hq1zc3fnn0gat79
Tags: upstream-3.1.9
Import upstream version 3.1.9

Show diffs side-by-side

added added

removed removed

Lines of Context:
test/basic.tcl
 
1
package require critcl
 
2
 
 
3
critcl::cproc add {int x int y} int {
 
4
    return x + y;
 
5
}
 
6
 
 
7
critcl::cproc cube {int x} int {
 
8
    return x * x * x;
 
9
}
 
10
 
 
11
puts stderr "add 1 + 2 = [add 1 2]"
 
12
puts stderr "cube 2 = [cube 2]"