diff sources/indirect-example.cbc @ 0:e9ecd5b5f29a

first commit.
author kent <kent@cr.ie.u-ryukyu.ac.jp>
date Fri, 29 Jan 2010 15:45:41 +0900
parents
children 8ef81ff8cb52
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/sources/indirect-example.cbc	Fri Jan 29 15:45:41 2010 +0900
@@ -0,0 +1,8 @@
+code somesegment( . . . ) {
+    code (*codepoint)();
+    /*  do something */
+    if ( )
+        goto nextsegment();
+    else
+        goto (*segmentpointer)();
+}