update elements and fix some bugs

lib/src/prism/components/prism-scheme.js

 Prism.languages.scheme = {
-    'boolean' : /#(t|f){1}/,
-    'comment' : /;.*/,
-    'keyword' : {
-                pattern : /([(])(define(-syntax|-library|-values)?|(case-)?lambda|let(-values|(rec)?(\*)?)?|else|if|cond|begin|delay|delay-force|parameterize|guard|set!|(quasi-)?quote|syntax-rules)/,
+        'comment' : /;.*/,
+        'string' :  /"(?:[^"\\\r\n]|\\.)*?"|'[^('\s]*/,
+        'keyword' : {
+                pattern : /(\()(?:define(?:-syntax|-library|-values)?|(?:case-)?lambda|let(?:\*|rec)?(?:-values)?|else|if|cond|begin|delay(?:-force)?|parameterize|guard|set!|(?:quasi-)?quote|syntax-rules)/,
                 lookbehind : true
-    },
-    'builtin' : {
-                pattern :  /([(])(cons|car|cdr|null\?|pair\?|boolean\?|eof-object\?|char\?|procedure\?|number\?|port\?|string\?|vector\?|symbol\?|bytevector\?|list|call-with-current-continuation|call\/cc|append|abs|apply|eval)\b/,
+        },
+        'builtin' : {
+                pattern :  /(\()(?:(?:cons|car|cdr|list|call-with-current-continuation|call\/cc|append|abs|apply|eval)\b|null\?|pair\?|boolean\?|eof-object\?|char\?|procedure\?|number\?|port\?|string\?|vector\?|symbol\?|bytevector\?)/,
                 lookbehind : true
-    },
-    'string' :  /(["])(?:(?=(\\?))\2.)*?\1|'[^('|\s)]+/, //thanks http://stackoverflow.com/questions/171480/regex-grabbing-values-between-quotation-marks
-    'number' : /(\s|\))[-+]?[0-9]*\.?[0-9]+((\s*)[-+]{1}(\s*)[0-9]*\.?[0-9]+i)?/,
-    'operator': /(\*|\+|\-|%|\/|<=|=>|>=|<|=|>)/,
-    'function' : {
-                pattern : /([(])[^(\s|\))]*\s/,
+        },
+        'number' : {
+                pattern: /(\s|\))[-+]?[0-9]*\.?[0-9]+(?:\s*[-+]\s*[0-9]*\.?[0-9]+i)?\b/,
+                lookbehind: true
+        },
+        'boolean' : /#[tf]/,
+        'operator': {
+                pattern: /(\()(?:[-+*%\/]|[<>]=?|=>?)/,
+                lookbehind: true
+        },
+        'function' : {
+                pattern : /(\()[^\s()]*(?=\s)/,
                 lookbehind : true
-    },
-    'punctuation' : /[()]/
-};
-
-    
-
-    
+        },
+        'punctuation' : /[()]/
+};