Java Locks.seize_lock Examples

Example #1

File: operation_queues.java Project: anukat2015/larkc-platform-2.5-rev1797-with-sim

 @SubL(source = "cycl/operation-queues.lisp", position = 9125)
 public static final SubLObject local_operation_storage_queue_enqueue(SubLObject operation) {
   {
     final SubLThread thread = SubLProcess.currentSubLThread();
     {
       SubLObject lock = $local_operation_storage_queue_lock$.getDynamicValue(thread);
       SubLObject release = NIL;
       try {
         release = Locks.seize_lock(lock);
         queues.enqueue(operation, $local_operation_storage_queue$.getGlobalValue());
       } finally {
         if ((NIL != release)) {
           Locks.release_lock(lock);
         }
       }
     }
     return NIL;
   }
 }

Example #2

File: operation_queues.java Project: anukat2015/larkc-platform-2.5-rev1797-with-sim

 @SubL(source = "cycl/operation-queues.lisp", position = 5157)
 public static final SubLObject transcript_queue_dequeue() {
   {
     final SubLThread thread = SubLProcess.currentSubLThread();
     {
       SubLObject ans = NIL;
       SubLObject lock = $transcript_queue_lock$.getDynamicValue(thread);
       SubLObject release = NIL;
       try {
         release = Locks.seize_lock(lock);
         ans = queues.dequeue($transcript_queue$.getGlobalValue());
       } finally {
         if ((NIL != release)) {
           Locks.release_lock(lock);
         }
       }
       return ans;
     }
   }
 }