/* Berkeley Version */ #3 "LINE include " #include #5 "LINE include " #include #7 "LINE #pragma upc_strict" #pragma upc_strict #9 "LINE #pragma upc_relaxed" #pragma upc_relaxed #12 "LINE int shared sx1;" int shared sx1; #14 "LINE int shared sx2[THREADS];" int shared sx2[THREADS]; #16 "LINE int shared [2] sx3[THREADS];" int shared [2] sx3[THREADS]; #18 "LINE int* shared sp1;" int* shared sp1; #20 "LINE upc_lock_t *tp1, *tp2;" upc_lock_t *tp1, *tp2; #22 "LINE int main()" int main() { #25 "LINE int x;" int x; #27 "LINE int *p;" int *p; #29 "LINE void *vp = NULL;" void *vp = NULL; #31 "LINE x = MYTHREAD;" x = MYTHREAD; #33 "LINE x = THREADS;" x = THREADS; #35 "LINE x = UPC_MAX_BLOCK_SIZE;" x = UPC_MAX_BLOCK_SIZE; #37 "LINE x = upc_localsizeof (sx1);" x = upc_localsizeof (sx1); #39 "LINE x = upc_blocksizeof (sx2);" x = upc_blocksizeof (sx2); #41 "LINE x = upc_elemsizeof (sx3);" x = upc_elemsizeof (sx3); #43 "LINE p = (int*) &sx1;" p = (int*) &sx1; #45 "LINE p = sp1;" p = sp1; #47 "LINE printf (%p, p);" printf ("%p", p); #49 "LINE upc_notify;" upc_notify; #51 "LINE upc_notify 10;" upc_notify 10; #53 "LINE upc_wait;" upc_wait; #55 "LINE upc_wait 10;" upc_wait 10; #57 "LINE upc_barrier;" upc_barrier; #59 "LINE upc_barrier 10;" upc_barrier 10; #61 "LINE upc_fence;" upc_fence; #63 "LINE upc_forall(x = 0; x < THREADS; x++; &sx2[x]) {}" upc_forall(x = 0; x < THREADS; x++; &sx2[x]) {} #65 "LINE upc_global_alloc (10, 5);" upc_global_alloc (10, 5); #67 "LINE upc_all_alloc (10, 5);" upc_all_alloc (10, 5); #69 "LINE upc_alloc (10);" upc_alloc (10); #71 "LINE upc_local_alloc (10, 5);" upc_local_alloc (10, 5); #73 "LINE upc_threadof (&sx1);" upc_threadof (&sx1); #75 "LINE upc_threadof (&sx2[1]);" upc_threadof (&sx2[1]); #77 "LINE upc_resetphase (sx2);" upc_resetphase (sx2); #79 "LINE upc_addrfield (sx2);" upc_addrfield (sx2); #81 "LINE upcaffinitysize (10, 10, 1);" upcaffinitysize (10, 10, 1); #83 "LINE upc_free (&sx1);" upc_free (&sx1); #85 "LINE tp1 = upc_global_lock_alloc();" tp1 = upc_global_lock_alloc(); #87 "LINE tp2 = upc_all_lock_alloc ();" tp2 = upc_all_lock_alloc (); #88 "LINE upc_lock (tp1);" upc_lock (tp1); #91 "LINE upc_unlock (tp1);" upc_unlock (tp1); #93 "LINE upc_lock_attempt (tp2);" upc_lock_attempt (tp2); #95 "LINE upc_unlock (tp2);" upc_unlock (tp2); #97 "LINE upc_lock_free (tp1);" upc_lock_free (tp1); #99 "LINE upc_memcpy (sx2, sx3, 10);" upc_memcpy (sx2, sx3, 10); #101 "LINE upc_memget (vp, sx2, 10);" upc_memget (vp, sx2, 10); #103 "LINE upc_memput (sx2, vp, 10);" upc_memput (sx2, vp, 10); #105 "LINE upc_memset (sx2, 5, 10);" upc_memset (sx2, 5, 10); #107 "LINE upc_global_exit (1); " upc_global_exit (1); }