ranger - mirror of ranger - a simple, vim-like file manager

path: root/doc/pydoc/ranger.ext.openstruct.html

	Commit message (Expand)	Author	Age	Files	Lines
*	updated TODO and pydoc	hut	2010-03-21	1	-2/+2
*	updated pydoc	hut	2010-03-12	1	-2/+2
*	updated pydoc	hut	2010-03-12	1	-22/+101
*	incremented version number and updated pydoc html files v1.0.3	hut	2010-02-16	1	-4/+4
*	updated pydoc documentation	hut	2010-01-13	1	-1/+13
*	moved pydoc pages to doc/pydoc	hut	2009-12-25	1	-0/+53

mp;id=2e3b597fe85b654e82b891c22d50754fa5a26156'>^

d4b4d018 ^

f184c95e ^

b96af395 ^

f184c95e ^

0ca35d02 ^

d4b4d018 ^

7d2c2d55 ^

4b62edd8 ^

7d2c2d55 ^

f184c95e ^

6
7
8

15
16

(function factorial [
  (default-space:space-address <- new space:literal 30:literal)
  (n:integer <- next-input)
  { begin
    ; if n=0 return 1
    (zero?:boolean <- equal n:integer 0:literal)
    (break-unless zero?:boolean)
    (reply 1:literal)
  }
  ; return n*factorial(n-1)
  (x:integer <- subtract n:integer 1:literal)
  (subresult:integer <- factorial x:integer)
  (result:integer <- multiply subresult:integer n:integer)
  (reply result:integer)
])

(function main [
  (1:integer <- factorial 5:literal)
  ($print (("result: " literal)))
  (print-integer nil:literal/terminal 1:integer)
  ($print (("\n" literal)))
])