I hereby claim:
- I am esasse on github.
- I am esasse (https://keybase.io/esasse) on keybase.
- I have a public key ASDD68C7WBmZde3I8qxk8x16HJjJJMiW2oafooyBmrsGNAo
To claim this, I am signing this object:
I hereby claim:
To claim this, I am signing this object:
| { | |
| "color_scheme": "Packages/User/Railscasts (SL).tmTheme", | |
| "ensure_newline_at_eof_on_save": true, | |
| "hot_exit": false, | |
| "ignored_packages": | |
| [ | |
| "RubyTest", | |
| "Markdown", | |
| "Vintage" | |
| ], |
| { | |
| "color_scheme": "Packages/User/Railscasts.tmTheme", | |
| "hot_exit": false, | |
| "ignored_packages": | |
| [ | |
| "Vintage" | |
| ], | |
| "remember_open_files": false, | |
| "rulers": | |
| [ |
| { | |
| "Version": "2012-10-17", | |
| "Statement": [ | |
| { | |
| "Action": [ | |
| "s3:PutObject" | |
| ], | |
| "Sid": "Stmt1377549922000", | |
| "Resource": [ | |
| "arn:aws:s3:::bucket-name/*" |
| function NewUUID32: string; | |
| var | |
| GUID: TGUID; | |
| begin | |
| CoCreateGuid(GUID); | |
| SetLength(Result, 32); | |
| StrLFmt(PChar(Result), 32,'%.8x%.4x%.4x%.2x%.2x%.2x%.2x%.2x%.2x%.2x%.2x', | |
| [Guid.D1, Guid.D2, Guid.D3, Guid.D4[0], Guid.D4[1], Guid.D4[2], Guid.D4[3], | |
| Guid.D4[4], Guid.D4[5], Guid.D4[6], Guid.D4[7]]); | |
| end; |
| CREATE OR ALTER PROCEDURE GEN_UUID32 RETURNS (RESULT CHAR(32)) | |
| AS | |
| DECLARE VARIABLE UUID36 CHAR(36); | |
| BEGIN | |
| SELECT | |
| UUID_TO_CHAR(GEN_UUID()) | |
| FROM RDB$DATABASE | |
| INTO :UUID36; | |
| SELECT |